all protocols (even virtual ones) moved to the Protocols folder

1 files changed, 280 insertions, 0 deletions

diff --git a/protocols/CurrencyRates/src/Chart.h b/protocols/CurrencyRates/src/Chart.h
new file mode 100644
index 0000000000..1247ead065
--- /dev/null
+++ b/protocols/CurrencyRates/src/Chart.h
@@ -0,0 +1,280 @@
+#ifndef __FAE7F26E_61ED_4951_BE87_5E022CDF21DF_Chart_h__
+#define __FAE7F26E_61ED_4951_BE87_5E022CDF21DF_Chart_h__
+
+#pragma once
+
+namespace detail
+{
+	template<class T> struct CConverter
+	{
+		static double Convert(const T& v)
+		{
+			return boost::numeric_cast<double>(v);
+		}
+
+		static tstring ToString(const T& v)
+		{
+			return boost::lexical_cast<tstring>(v);
+		}
+	};
+
+	template<> struct CConverter < double >
+	{
+		static double Convert(double v)
+		{
+			return v;
+		}
+
+		static tstring ToString(double v)
+		{
+			tostringstream s;
+			s.imbue(std::locale(""));
+			s << std::fixed << v;
+			return s.str();
+		}
+	};
+}
+
+template<class TXValue, class TYValue, class TXConverter = detail::CConverter<TXValue>, class TYConverter = detail::CConverter<TYValue> >
+class CChart
+{
+private:
+	typedef std::pair<TXValue, TYValue> TValue;
+	typedef std::vector<TValue> TValues;
+
+public:
+	CChart() : m_MaxY(), m_MinY()
+	{
+		memset(&m_rect, 0, sizeof(m_rect));
+	}
+
+	~CChart()
+	{
+	}
+
+	void AddValue(const TXValue& x, const TYValue& y)
+	{
+		if (m_aValues.empty())
+		{
+			m_MaxY = m_MinY = y;
+		}
+		else
+		{
+			m_MaxY = __max(y, m_MaxY);
+			m_MinY = __min(y, m_MinY);
+		}
+		m_aValues.push_back(std::make_pair(x, y));
+	}
+
+	void SetRect(int x, int y, int cx, int cy)
+	{
+		m_rect.left = x;
+		m_rect.right = x + cx;
+		m_rect.top = y;
+		m_rect.bottom = y + cy;
+	}
+
+	void Draw(HDC hdc) const
+	{
+		RECT rc = m_rect;
+		DrawBackground(hdc, rc);
+		if (false == m_aValues.empty())
+		{
+			::InflateRect(&rc, -10, -10);
+			DrawGrid(hdc, rc);
+			DrawAxis(hdc, rc);
+			DrawPoints(hdc, rc);
+		}
+		else
+		{
+			HFONT hFont = static_cast<HFONT>(::GetStockObject(DEFAULT_GUI_FONT));
+			HFONT hOldFont = static_cast<HFONT>(::SelectObject(hdc, hFont));
+
+			LPCTSTR pszText = TranslateT("There is nothing to show");
+			int nDrawTextResult = ::DrawText(hdc, pszText, -1, &rc, DT_SINGLELINE | DT_VCENTER | DT_CENTER);
+			assert(0 != nDrawTextResult);
+
+			::SelectObject(hdc, hOldFont);
+			BOOL bResult = ::DeleteObject(hFont);
+			assert(TRUE == bResult);
+		}
+	}
+
+private:
+	void DrawBackground(HDC hdc, RECT& rc) const
+	{
+		// 		HBRUSH hBrush = ::CreateSolidBrush(RGB(255,0,0));//user preferable background color here!
+		// 		::FillRect(hdc,&m_rect,hBrush);
+		// 		::DeleteBrush(hBrush);
+	}
+
+	void DrawGrid(HDC hdc, RECT& rc) const
+	{
+		enum{ number_of_lines = 5 };
+		HPEN hPen = ::CreatePen(PS_SOLID, 1, RGB(125, 125, 125));
+		HPEN hPenOld = static_cast<HPEN>(::SelectObject(hdc, hPen));
+		HFONT hFont = static_cast<HFONT>(::GetStockObject(DEFAULT_GUI_FONT));
+		HFONT hOldFont = static_cast<HFONT>(::SelectObject(hdc, hFont));
+
+		//vertical grid
+		int step = (rc.bottom - rc.top) / number_of_lines;
+		TYValue y_val = m_MinY + ((m_MaxY - m_MinY) / number_of_lines);
+		int nXIndent = 0;
+		for (int y = rc.bottom - step; y > rc.top; y -= step, y_val += ((m_MaxY - m_MinY) / number_of_lines))
+		{
+			tstring sY = TYConverter::ToString(y_val);
+			SIZE sizeText = { 0, 0 };
+			BOOL bResult = ::GetTextExtentPoint32(hdc, sY.c_str(), (int)sY.size(), &sizeText);
+			assert(TRUE == bResult);
+			nXIndent = __max(nXIndent, sizeText.cx);
+		}
+
+		y_val = m_MinY + ((m_MaxY - m_MinY) / number_of_lines);
+		nXIndent += 2;
+		rc.left += nXIndent;
+		for (int y = rc.bottom - step; y > rc.top; y -= step, y_val += ((m_MaxY - m_MinY) / number_of_lines))
+		{
+			tstring sY = TYConverter::ToString(y_val);
+			SIZE sizeText = { 0, 0 };
+			BOOL bResult = ::GetTextExtentPoint32(hdc, sY.c_str(), (int)sY.size(), &sizeText);
+			assert(TRUE == bResult);
+
+			RECT rcText = { rc.left - nXIndent, y - (sizeText.cy / 2), rc.left - 1, y + (sizeText.cy / 2) };
+			int nDrawTextResult = ::DrawText(hdc, sY.c_str(), -1, &rcText, DT_SINGLELINE | DT_VCENTER | DT_RIGHT);
+			assert(0 != nDrawTextResult);
+
+			bResult = ::MoveToEx(hdc, rc.left, y, NULL);
+			assert(TRUE == bResult);
+
+			bResult = ::LineTo(hdc, rc.right, y);
+			assert(TRUE == bResult);
+		}
+
+		// horizontal grid
+		HRGN rgnAllLables = ::CreateRectRgn(0, 0, 0, 0);
+		HRGN rgnTemporary = ::CreateRectRgn(0, 0, 0, 0);
+		bool bFixedRect = false;
+		step = (rc.right - rc.left) / number_of_lines;
+		TXValue x_val = m_aValues[0].first + ((m_aValues[m_aValues.size() - 1].first - m_aValues[0].first) / number_of_lines);
+		for (int x = rc.left + step; x < rc.right; x += step, x_val += ((m_aValues[m_aValues.size() - 1].first - m_aValues[0].first) / number_of_lines))
+		{
+			tstring sX = TXConverter::ToString(x_val);
+			SIZE sizeText = { 0, 0 };
+			BOOL bResult = ::GetTextExtentPoint32(hdc, sX.c_str(), (int)sX.size(), &sizeText);
+			assert(TRUE == bResult);
+
+			if (false == bFixedRect)
+			{
+				rc.bottom -= sizeText.cy + 2;
+				bFixedRect = true;
+			}
+
+			RECT rcText = { x - (sizeText.cx / 2), rc.bottom, x + (sizeText.cx / 2), rc.bottom + sizeText.cy - 1 };
+			// Draw a label if it doesn't overlap with previous ones
+			HRGN rgnCurrentLable = ::CreateRectRgnIndirect(&rcText);
+			if (NULLREGION == ::CombineRgn(rgnTemporary, rgnCurrentLable, rgnAllLables, RGN_AND))
+			{
+				int nDrawTextResult = ::DrawText(hdc, sX.c_str(), (int)sX.size(), &rcText, DT_SINGLELINE | DT_VCENTER | DT_CENTER);
+				assert(0 != nDrawTextResult);
+				int nCombineRgnResult = ::CombineRgn(rgnTemporary, rgnCurrentLable, rgnAllLables, RGN_OR);
+				assert(ERROR != nCombineRgnResult);
+				nCombineRgnResult = ::CombineRgn(rgnAllLables, rgnTemporary, NULL, RGN_COPY);
+				assert(ERROR != nCombineRgnResult);
+			}
+			bResult = ::DeleteObject(rgnCurrentLable);
+			assert(TRUE == bResult);
+
+			bResult = ::MoveToEx(hdc, x, rc.bottom, NULL);
+			assert(TRUE == bResult);
+
+			bResult = ::LineTo(hdc, x, rc.top);
+			assert(TRUE == bResult);
+		}
+
+		BOOL bResult = ::DeleteObject(rgnAllLables);
+		assert(TRUE == bResult);
+		bResult = ::DeleteObject(rgnTemporary);
+		assert(TRUE == bResult);
+
+		::SelectObject(hdc, hOldFont);
+		::SelectObject(hdc, hPenOld);
+		bResult = ::DeleteObject(hFont);
+		assert(TRUE == bResult);
+		bResult = ::DeleteObject(hPen);
+		assert(TRUE == bResult);
+	}
+
+	void DrawAxis(HDC hdc, RECT& rc) const
+	{
+		HPEN hPen = ::CreatePen(PS_SOLID, 2, RGB(0, 0, 0));
+		HPEN hPenOld = static_cast<HPEN>(::SelectObject(hdc, hPen));
+
+		// draw Y-axes
+		BOOL bResult = ::MoveToEx(hdc, rc.left + 1, rc.bottom - 1, NULL);
+		assert(TRUE == bResult);
+		bResult = ::LineTo(hdc, rc.left + 1, rc.top + 1);
+		assert(TRUE == bResult);
+
+		// draw X-axes
+		bResult = ::MoveToEx(hdc, rc.left + 1, rc.bottom - 1, NULL);
+		assert(TRUE == bResult);
+		bResult = ::LineTo(hdc, rc.right - 1, rc.bottom - 1);
+		assert(TRUE == bResult);
+
+		::SelectObject(hdc, hPenOld);
+		bResult = ::DeleteObject(hPen);
+		assert(TRUE == bResult);
+	}
+
+	void DrawPoints(HDC hdc, RECT& rc) const
+	{
+		TXValue xMin(m_aValues[0].first);
+		double dx = TXConverter::Convert(m_aValues[m_aValues.size() - 1].first - xMin);
+		double dY = TYConverter::Convert(m_MaxY - m_MinY);
+
+		HPEN hPen = ::CreatePen(PS_SOLID, 1, RGB(255, 0, 0));
+		HGDIOBJ hPenOld = ::SelectObject(hdc, hPen);
+
+		HBRUSH hBrush = ::CreateSolidBrush(RGB(255, 0, 0));
+		HGDIOBJ hBrushOld = ::SelectObject(hdc, hBrush);
+
+		bool bPrevValid = false;
+		int xPrex, yPrev;
+
+		BOOST_FOREACH(const TValue& v, m_aValues)
+		{
+			double k = TXConverter::Convert(v.first - xMin);
+
+			int x = rc.left + boost::numeric_cast<int>((rc.right - rc.left)*(k / dx));
+			k = TYConverter::Convert(v.second - m_MinY);
+			int y = rc.bottom - boost::numeric_cast<int>((rc.bottom - rc.top)*(k / dY));
+			::Ellipse(hdc, x - 5, y - 5, x + 5, y + 5);
+			if (bPrevValid)
+			{
+				BOOL bResult = ::MoveToEx(hdc, xPrex, yPrev, NULL);
+				assert(TRUE == bResult);
+				bResult = ::LineTo(hdc, x, y);
+				assert(TRUE == bResult);
+			}
+
+			xPrex = x, yPrev = y;
+			bPrevValid = true;
+		}
+
+		::SelectObject(hdc, hPenOld);
+		BOOL bResult = ::DeleteObject(hPen);
+		assert(TRUE == bResult);
+
+		::SelectObject(hdc, hBrushOld);
+		bResult = ::DeleteObject(hBrush);
+		assert(TRUE == bResult);
+	}
+
+private:
+	TValues m_aValues;
+	RECT m_rect;
+	TYValue m_MaxY;
+	TYValue m_MinY;
+};
+
+#endif // __FAE7F26E_61ED_4951_BE87_5E022CDF21DF_Chart_h__