path: root/plugins/TrafficCounter/src/misc.cpp

/*
Traffic Counter plugin for Miranda IM 
Copyright 2007-2011 Mironych.

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 "stdafx.h"

/* Ôóíêöèÿ ðàçáèðàåò ñòðîêó è âîçâðàùàåò ñïèñîê òåãîâ è ñîîòâåòñòâóþùèõ èì ñòðîê.
Àðãóìåíòû:
InputString - ñòðîêà äëÿ ðàçáîðà;
RowItemsList - ñïèñîê íàéäåííûõ ýëåìåíòîâ.
Âîçâðàùàåìîå çíà÷åíèå - êîëè÷åñòâî ýëåìåíòîâ â ñïèñêàõ. */

WORD GetRowItems(wchar_t *InputString, RowItemInfo **RowItemsList)
{
	wchar_t *begin, *end;
	WORD c = 0;

	// Èùåì ñëåâà îòêðûâàþùóþ ñêîáêó.
	begin = wcschr(InputString, '{');
	// Åñëè ñêîáêà íàéäåíà...
	if (begin) {
		// Âûäåëÿåì ïàìÿòü ïîä óêàçàòåëè
		*RowItemsList = (RowItemInfo*)mir_alloc(sizeof(RowItemInfo));
	}
	else return 0;

	do {
		// Ñðàçó âñëåä çà íåé èùåì çàêðûâàþùóþ.
		end = wcschr(begin, '}');

		// Âûäåëÿåì ïàìÿòü ïîä óêàçàòåëè
		*RowItemsList = (RowItemInfo*)mir_realloc(*RowItemsList, sizeof(RowItemInfo) * (c + 1));

		// Ðàçáèðàåì òåã.
		swscanf(begin + 1, L"%c%hd",
			&((*RowItemsList)[c].Alignment),
			&((*RowItemsList)[c].Interval));

		// Èùåì äàëåå îòêðûâàþùóþ ñêîáêó - ýòî êîíåö ñòðîêè, ñîîòâåòñòâóþùåé òåãó.
		begin = wcschr(end, '{');

		if (begin) {
			// Âûäåëÿåì ïàìÿòü ïîä ñòðîêó.
			(*RowItemsList)[c].String = (wchar_t*)mir_alloc(sizeof(wchar_t) * (begin - end));
			// Êîïèðóåì ñòðîêó.
			wcsncpy((*RowItemsList)[c].String, end + 1, begin - end - 1);
			(*RowItemsList)[c].String[begin - end - 1] = 0;
		}
		else {
			// Âûäåëÿåì ïàìÿòü ïîä ñòðîêó.
			(*RowItemsList)[c].String = (wchar_t*)mir_alloc(sizeof(wchar_t) * mir_tstrlen(end));
			// Êîïèðóåì ñòðîêó.
			wcsncpy((*RowItemsList)[c].String, end + 1, mir_tstrlen(end));
		}

		c++;
	} while (begin);

	return c;
}

/* Ôóíêöèÿ âîçâðàùàåò êîëè÷åñòâî äíåé â óêàçàííîì ìåñÿöå óêàçàííîãî ãîäà. */
BYTE DaysInMonth(BYTE Month, WORD Year)
{
	switch (Month) {
	case 1:
	case 3:
	case 5:
	case 7:
	case 8:
	case 10:
	case 12: return 31;
	case 4:
	case 6:
	case 9:
	case 11: return 30;
	case 2: return 28 + (BYTE)!((Year % 4) && ((Year % 100) || !(Year % 400)));
	}
	return 0;
}

// Ôóíêöèÿ îïðåäåëÿåò äåíü íåäåëè ïî äàòå
// 7 - ÂÑ, 1 - ÏÍ è ò. ä.
BYTE DayOfWeek(BYTE Day, BYTE Month, WORD Year)
{
	WORD a, y, m;

	a = (14 - Month) / 12;
	y = Year - a;
	m = Month + 12 * a - 2;

	a = (7000 + (Day + y + (y >> 2) - y / 100 + y / 400 + (31 * m) / 12)) % 7;
	if (!a) a = 7;

	return a;
}

/*
Àðãóìåíòû:
Value - êîëè÷åñòâî áàéò;
Unit - åäèíèöû èçìåðåíèÿ (0 - áàéòû, 1 - êèëîáàéòû, 2 - ìåãàáàéòû, 3 - àâòîìàòè÷åñêè);
Buffer - àäðåñ ñòðîêè äëÿ çàïèñè ðåçóëüòàòà;
Size - ðàçìåð áóôåðà.
Âîçâðàùàåìîå çíà÷åíèå: òðåáóåìûé ðàçìåð áóôåðà.
*/
size_t GetFormattedTraffic(DWORD Value, BYTE Unit, wchar_t *Buffer, size_t Size)
{
	wchar_t Str1[32], szUnit[4] = { ' ', 0 };
	DWORD Divider;
	NUMBERFMT nf = { 0, 1, 3, L",", L" ", 0 };
	wchar_t *Res; // Ïðîìåæóòî÷íûé ðåçóëüòàò.

	switch (Unit) {
	case 0: //bytes
		Divider = 1;
		nf.NumDigits = 0;
		szUnit[0] = 0;
		break;
	case 1: // KB
		Divider = 0x400;
		nf.NumDigits = 2;
		break;
	case 2: // MB
		Divider = 0x100000;
		nf.NumDigits = 2;
		break;
	case 3: // Adaptive
		nf.NumDigits = 2;
		if (Value < 0x100000) { Divider = 0x400; szUnit[1] = 'K'; szUnit[2] = 'B'; }
		else { Divider = 0x100000; szUnit[1] = 'M'; szUnit[2] = 'B'; }
		break;
	default:
		return 0;
	}

	mir_sntprintf(Str1, L"%d.%d", Value / Divider, Value % Divider);
	size_t l = GetNumberFormat(LOCALE_USER_DEFAULT, 0, Str1, &nf, NULL, 0);
	if (!l) return 0;
	l += mir_tstrlen(szUnit) + 1;
	Res = (wchar_t*)malloc(l * sizeof(wchar_t));
	if (!Res) return 0;
	GetNumberFormat(LOCALE_USER_DEFAULT, 0, Str1, &nf, Res, (int)l);
	mir_tstrcat(Res, szUnit);

	if (Size && Buffer) {
		mir_tstrcpy(Buffer, Res);
		l = mir_tstrlen(Buffer);
	}
	else l = mir_tstrlen(Res) + 1;

	free(Res);
	return l;
}

/* Ïðåîáðàçîâàíèå èíòåðâàëà âðåìåíè â åãî ñòðîêîâîå ïðåäñòàâëåíèå
Àðãóìåíòû:
Duration: èíòåðâàë âðåìåíè â ñåêóíäàõ;
Format: ñòðîêà ôîðìàòà;
Buffer: àäðåñ áóôåðà, êóäà ôóíêöèÿ ïîìåùàåò ðåçóëüòàò.
Size - ðàçìåð áóôåðà. */

size_t GetDurationFormatM(DWORD Duration, wchar_t *Format, wchar_t *Buffer, size_t Size)
{
	size_t Length;
	DWORD q;
	WORD TokenIndex, FormatIndex;
	wchar_t Token[256],  // Àêêóìóëÿòîð.
		*Res; // Ïðîìåæóòî÷íûé ðåçóëüòàò.

	Res = (wchar_t*)malloc(sizeof(wchar_t)); // Âûäåëÿåì ÷óòü-÷óòü ïàìÿòè ïîä ðåçóëüòàò, íî ýòî òîëüêî íà÷àëî.
	//SecureZeroMemory(Res, sizeof(wchar_t));
	Res[0] = 0;

	for (FormatIndex = 0; Format[FormatIndex];) {
		// Èùåì òîêåíû. Ñ÷èòàåòñÿ, ÷òî òîêåí - òîëüêî áóêâû.
		TokenIndex = 0;
		q = iswalpha(Format[FormatIndex]);
		// Êîïèðóåì ñèìâîëû â àêêóìóëÿòîð äî ñìåíû ôëàãà.
		do {
			Token[TokenIndex++] = Format[FormatIndex++];
		} while (q == iswalpha(Format[FormatIndex]));
		Token[TokenIndex] = 0;

		// ×òî ïîëó÷èëè â àêêóìóëÿòîðå?
		if (!mir_tstrcmp(Token, L"d")) {
			q = Duration / (60 * 60 * 24);
			mir_sntprintf(Token, L"%d", q);
			Duration -= q * 60 * 60 * 24;
		}
		else if (!mir_tstrcmp(Token, L"h")) {
			q = Duration / (60 * 60);
			mir_sntprintf(Token, L"%d", q);
			Duration -= q * 60 * 60;
		}
		else if (!mir_tstrcmp(Token, L"hh")) {
			q = Duration / (60 * 60);
			mir_sntprintf(Token, L"%02d", q);
			Duration -= q * 60 * 60;
		}
		else if (!mir_tstrcmp(Token, L"m")) {
			q = Duration / 60;
			mir_sntprintf(Token, L"%d", q);
			Duration -= q * 60;
		}
		else if (!mir_tstrcmp(Token, L"mm")) {
			q = Duration / 60;
			mir_sntprintf(Token, L"%02d", q);
			Duration -= q * 60;
		}
		else if (!mir_tstrcmp(Token, L"s")) {
			q = Duration;
			mir_sntprintf(Token, L"%d", q);
			Duration -= q;
		}
		else if (!mir_tstrcmp(Token, L"ss")) {
			q = Duration;
			mir_sntprintf(Token, L"%02d", q);
			Duration -= q;
		}

		// Äîáàâèì ïàìÿòè, åñëè íóæíî.
		Length = mir_tstrlen(Res) + mir_tstrlen(Token) + 1;
		Res = (wchar_t*)realloc(Res, Length * sizeof(wchar_t));
		mir_tstrcat(Res, Token);
	}

	if (Size && Buffer) {
		wcsncpy(Buffer, Res, Size);
		Length = mir_tstrlen(Buffer);
	}
	else Length = mir_tstrlen(Res) + 1;

	free(Res);
	return Length;
}

/* Ðåçóëüòàò:
-1 - st1 < st2
0 - st1 = st2
+1 - st1 > st2
*/
signed short int TimeCompare(SYSTEMTIME st1, SYSTEMTIME st2)
{
	signed short int a, b, c, d;

	a = st1.wYear - st2.wYear;
	b = st1.wMonth - st2.wMonth;
	c = st1.wDay - st2.wDay;
	d = st1.wHour - st2.wHour;

	if (a < 0) return -1;
	if (a > 0) return +1;

	if (b < 0) return -1;
	if (b > 0) return +1;

	if (c < 0) return -1;
	if (c > 0) return +1;

	if (d < 0) return -1;
	if (d > 0) return +1;
	return 0;
}