//
// Copyright (c) 2002
// Ronald Kevin Burton
//
// Z poniższym kodem nie jest związana żadna gwarancja poprawności działania.
// Program został dołączony do książki ".NET CLR. Księga eksperta" w celu
// ilustracji koncepcji i zasad przedstawionych w tej książce. Program może być 
// używany na własne ryzyko.
//
// Przyznaje się prawo do użycia lub kopiowania tego oprogramowania do dowolnego celu
// bez konieczności ponoszenia żadnych opłat pod warunkiem, że powyższe uwagi zostaną 
// zachowane we wszystkich kopiach. Przyznaje się także prawo do modyfikacji kodu
// i dystrybucji zmodyfikowanego kodu pod warunkiem zachowania powyższych uwag
// oraz dołączenia informacji mówiącej o modyfikacji kodu.
//
// 
// HeapAllocationDlg.cpp : plik implementacji
//

#include "stdafx.h"
#include "HeapAllocation.h"
#include "HeapAllocationDlg.h"
#include "LinkedList.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif


// Okno dialogowe CAboutDlg używane przez App About

class CAboutDlg : public CDialog
{
public:
	CAboutDlg();

// Dane okna dialogowego
	enum { IDD = IDD_ABOUTBOX };

	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // Obsługa DDX/DDV

// Implementacja
protected:
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
END_MESSAGE_MAP()


// Okno dialogowe CHeapAllocationDlg



CHeapAllocationDlg::CHeapAllocationDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CHeapAllocationDlg::IDD, pParent)
{
	head = NULL;
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CHeapAllocationDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	DDX_Control(pDX, IDC_ALLOCATETIME, allocateTimeCtrl);
	DDX_Control(pDX, IDC_DEALLOCATETIME, deallocateTimeCtrl);
}

BEGIN_MESSAGE_MAP(CHeapAllocationDlg, CDialog)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	//}}AFX_MSG_MAP
	ON_BN_CLICKED(IDC_ALLOCATEBUTTON, OnAllocate)
	ON_BN_CLICKED(IDC_DEALLOCATEBUTTON, OnDeallocate)
	ON_WM_CLOSE()
END_MESSAGE_MAP()


// Procedury obsługi wiadomości CHeapAllocationDlg

BOOL CHeapAllocationDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// Dodaje element menu "O programie..." do menu systemowego.

	// IDM_ABOUTBOX musi znajdować się w zasięgu poleceń systemowych.
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);

	CMenu* pSysMenu = GetSystemMenu(FALSE);
	if (pSysMenu != NULL)
	{
		CString strAboutMenu;
		strAboutMenu.LoadString(IDS_ABOUTBOX);
		if (!strAboutMenu.IsEmpty())
		{
			pSysMenu->AppendMenu(MF_SEPARATOR);
			pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
		}
	}

	// Ustawienie ikonki dla tego okna dialogowego. Struktura wykonuje to automatycznie,
	//  jeśli główne okno aplikacji nie jest oknem dialogowym.
	SetIcon(m_hIcon, TRUE);			// Ustawienie dużej ikonki
	SetIcon(m_hIcon, FALSE);		// Ustawienie małej ikonki

	head = new LinkedList();
	
	GetDlgItem(IDC_ALLOCATEBUTTON)->EnableWindow(TRUE);
	GetDlgItem(IDC_DEALLOCATEBUTTON)->EnableWindow(FALSE);

	return TRUE;  // zwrócenie TRUE, chyba że ognisko ustawiono na element sterujący
}

void CHeapAllocationDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
	{
		CAboutDlg dlgAbout;
		dlgAbout.DoModal();
	}
	else
	{
		CDialog::OnSysCommand(nID, lParam);
	}
}

// Jeśli do okna dialogowego zostanie dodany przycisk minimalizacji, poniższy kod będzie niezbędny
//  do przeciągania ikonki. W przypadku aplikacji MFC korzystających z modelu dokument/widok
//  zostanie to wykonane automatycznie przez strukturę.

void CHeapAllocationDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // kontekst urządzenia służący do rysowania

		SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);

		// Wypośrodkowanie ikonki w prostokącie klienta
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;

		// Rysowanie ikonki
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

// System wywołuje tę funkcję w celu uzyskania wskaźnika, kiedy użytkownik przeciąga
//  zminimalizowane okno.
HCURSOR CHeapAllocationDlg::OnQueryDragIcon()
{
	return static_cast<HCURSOR>(m_hIcon);
}

void CHeapAllocationDlg::OnAllocate()
{
	if(head == NULL)
	{
		head = new LinkedList();
	}
	__int64 start, stop, freq;
	QueryPerformanceCounter((LARGE_INTEGER*)&start);
	LinkedList *node = NULL;
	for(int i = 0;i < 100000;i++)
	{
		node = new LinkedList(head);
		head = node;
	}
	QueryPerformanceCounter((LARGE_INTEGER*)&stop);
	QueryPerformanceFrequency((LARGE_INTEGER*)&freq);
	double elapsed = (double)(stop - start)/(double)freq;
	TCHAR buffer[64];
	_stprintf(buffer, _T("%.3lf"), elapsed * 1000.0);
	allocateTimeCtrl.SetWindowText(buffer);
	GetDlgItem(IDC_DEALLOCATEBUTTON)->EnableWindow(TRUE);
}

void CHeapAllocationDlg::OnDeallocate()
{
	__int64 start, stop, freq;
	QueryPerformanceCounter((LARGE_INTEGER*)&start);
	LinkedList *node = head;
	LinkedList *temp;
	while(node)
	{
		temp = node->link;
		delete node;
		node = temp;
	}
	head = NULL;
	QueryPerformanceCounter((LARGE_INTEGER*)&stop);
	QueryPerformanceFrequency((LARGE_INTEGER*)&freq);
	double elapsed = (double)(stop - start)/(double)freq;
	TCHAR buffer[64];
	_stprintf(buffer, _T("%.3lf"), elapsed * 1000.0);
	deallocateTimeCtrl.SetWindowText(buffer);
	GetDlgItem(IDC_DEALLOCATEBUTTON)->EnableWindow(FALSE);
}

void CHeapAllocationDlg::OnClose()
{
	LinkedList *node = head;
	LinkedList *temp;
	while(node)
	{
		temp = node->link;
		delete node;
		node = temp;
	}
	head = NULL;
	CDialog::OnClose();
}
