// Sample1Dlg.cpp : implementation file
//

#include "stdafx.h"
#include "Sample1.h"
#include "Sample1Dlg.h"
#include "acces32.h"

int Address;
bool TimerEnabled = false;
CString PortPanels[3];

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif


/////////////////////////////////////////////////////////////////////////////
// CSample1Dlg dialog

CSample1Dlg::CSample1Dlg(CWnd* pParent /*=NULL*/)
	: CDialog(CSample1Dlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CSample1Dlg)
	m_PortLabel0 = _T("0000000000000000");
	m_PortLabel1 = _T("0000000000000000");
	m_PortLabel2 = _T("0000000000000000");
	m_BaseEdit = _T("300");
	m_Instructions = _T("Sample 0");
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CSample1Dlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CSample1Dlg)
	DDX_Control(pDX, IDC_DEV_LIST, m_deviceList);
	DDX_Control(pDX, IDC_BaseEdit, m_BaseEditCtrl);
	DDX_Control(pDX, IDOK, m_StartButtonCtrl);
	DDX_Control(pDX, IDCANCEL, m_ExitButtonCtrl);
	DDX_Text(pDX, IDC_PortLabel0, m_PortLabel0);
	DDX_Text(pDX, IDC_PortLabel1, m_PortLabel1);
	DDX_Text(pDX, IDC_PortLabel2, m_PortLabel2);
	DDX_Text(pDX, IDC_BaseEdit, m_BaseEdit);
	DDX_Text(pDX, IDC_Instructions, m_Instructions);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CSample1Dlg, CDialog)
	//{{AFX_MSG_MAP(CSample1Dlg)
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDCANCEL, OnExitButtonClick)
	ON_BN_CLICKED(IDOK, OnStartTestButtonClick)
	ON_WM_TIMER()
	ON_CBN_SELCHANGE(IDC_DEV_LIST, OnSelchangeDevList)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CSample1Dlg message handlers

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

	// Set the icon for this dialog.  The framework does this automatically
	//  when the application's main window is not a dialog
	SetIcon(m_hIcon, TRUE);			// Set big icon
	SetIcon(m_hIcon, FALSE);		// Set small icon

   if (InPortB(0x61) == 0xAA55) {
      MessageBox("ACCESNT.SYS not detected. Please copy ACCESNT.SYS into [NT]/system32/drivers and re-run this sample.", "Warning", MB_OK);
   }

	
	




	m_Instructions = "Sample 1:\r\n";
    
	m_Instructions += "This program will perform a walking bit on each of the IDO-48's ports. ";
	
	m_Instructions += "For PCI cards select the card from a drop down list.\r\nFor ISA cards select the ISA option ";
	
	m_Instructions += "from the drop down box and enter the Base Address in hex for the card.";

    UpdateData(false);

	GetDeviceInfo();
	
	return TRUE;  // return TRUE  unless you set the focus to a control
}

// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.

void CSample1Dlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting

		SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

		// Center icon in client rectangle
		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;

		// Draw the icon
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CSample1Dlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CSample1Dlg::OnExitButtonClick() 
{
   exit(0);	
}

void CSample1Dlg::OnStartTestButtonClick() 
{
   if (TimerEnabled)
   {
      TimerEnabled = false;
      m_StartButtonCtrl.SetWindowText("Start Test");
	  m_BaseEditCtrl.EnableWindow(true);
	  KillTimer(0);
   }
   else
   {
      TimerEnabled = true;
	  UpdateData(true);
      sscanf(m_BaseEdit.GetBuffer(0), "%x", &Address);

      m_StartButtonCtrl.SetWindowText("Abort Test");
	  m_BaseEditCtrl.EnableWindow(false);
	  SetTimer(0, 500, NULL);
   }	
}

void CSample1Dlg::OnTimer(UINT nIDEvent) 
{
   int port, i;
   unsigned output,mask;
   unsigned char ofs[] = { 0,1,2,4,5,6 }; // Table of offsets to input registers
   static unsigned data = 1;

   PortPanels[0] = "";
   PortPanels[1] = "";
   PortPanels[2] = "";

   for (port = 0; port <= 2; port++) {
      // Read the 16 input channels of current port
      //data = InPortB(Address + ofs[2*port])*256;
      //data += InPortB(Address + ofs[(2*port)+1]);
	   OutPortB(Address + ofs[2*port], data);
	   OutPortB(Address + ofs[2 * port + 1], data);

	   output = data | (data << 8);

      // Check the status of each bit field and display result
      mask = 1;
      for (i = 0; i < 16; i++) {
         if (mask & output)
            PortPanels[port].Insert(0,"1");
         else
            PortPanels[port].Insert(0,"0");

         mask <<= 1;
      }  //  end for i
   
   }  //  end for port

   m_PortLabel0 = PortPanels[0];
   m_PortLabel1 = PortPanels[1];
   m_PortLabel2 = PortPanels[2];
   
   UpdateData(false);

	data <<= 1;

	if (data > 0xf0)
		data = 1;

	
	CDialog::OnTimer(nIDEvent);
}

void CSample1Dlg::GetDeviceInfo()
{
	HKEY key;
	unsigned long dataType, dataLength;
	long cardsFound;
	TPCI_COMMON_CONFIG buf[64];
	char cardString[128];

	numCards = 0;

	RegOpenKeyEx(HKEY_LOCAL_MACHINE, regKey, 0, KEY_READ, &key);

	dataLength = sizeof(cardsFound);

	if (RegQueryValueEx(key, "NumDevices", NULL, &dataType, (PUCHAR)&cardsFound, &dataLength) != ERROR_SUCCESS)
		cardsFound = 0;
	else
	{
		dataLength = cardsFound * sizeof(TPCI_COMMON_CONFIG);
		RegQueryValueEx(key, "PCICommonConfig", NULL, &dataType, (PUCHAR)buf, &dataLength);
	}

	for (int count = 0; count < cardsFound; count++)
	{
		if ( buf[count].VendorID == 0x494f )
			switch ( buf[count].DeviceID )
			{
				case 0x0520:
					cardAddresses[numCards] = buf[count].BaseAddresses[2] & 0xFFF8;
					sprintf(cardString, "%d: PCI-IDO-48", numCards);
					m_deviceList.AddString(cardString);
					numCards++;
				break;
				case 0x0508:
					cardAddresses[numCards] = buf[count].BaseAddresses[2] & 0xFFF8;
					sprintf(cardString, "%d: PCI-IDO-16A", numCards);
					m_deviceList.AddString(cardString);
					numCards++;
				break;
				case 0x0518:
					cardAddresses[numCards] = buf[count].BaseAddresses[2] & 0xFFF8;
					sprintf(cardString, "%d: PCI-IDO-32A", numCards);
					m_deviceList.AddString(cardString);
					numCards++;
				break;
				case 0x0521:
					cardAddresses[numCards] = buf[count].BaseAddresses[2] & 0xFFF8;
					sprintf(cardString, "%d: PCI-IDO-48A", numCards);
					m_deviceList.AddString(cardString);
					numCards++;
				break;
			}
	}


	cardAddresses[numCards] = 0x300;
	m_deviceList.AddString("ISA-IDO-48 (Enter Base Address below)");

	m_deviceList.SetCurSel(0);

	sprintf(cardString, "%x", cardAddresses[0]);

	m_BaseEdit = cardString;

	UpdateData(false);

	
}

void CSample1Dlg::OnSelchangeDevList() 
{
	// TODO: Add your control notification handler code here

	char addString[8];

	sprintf(addString, "%x", cardAddresses[m_deviceList.GetCurSel()]);

	m_BaseEdit = addString;

	UpdateData(false);
	
}