// DecimMonDlg.cpp : 実装ファイル
//

#include "stdafx.h"
#include "DecimMon.h"
#include "DecimMonDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif


// アプリケーションのバージョン情報に使われる CAboutDlg ダイアログ

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

// ダイアログ データ
	enum { IDD = IDD_ABOUTBOX };

	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV サポート

// 実装
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()


// CDecimMonDlg ダイアログ




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

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

BEGIN_MESSAGE_MAP(CDecimMonDlg, CDialog)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	//}}AFX_MSG_MAP
	ON_BN_CLICKED(IDC_BUT_FS, &CDecimMonDlg::OnBnClickedButFs)
	ON_BN_CLICKED(IDC_BUT_FS2, &CDecimMonDlg::OnBnClickedButFs2)
	ON_BN_CLICKED(IDC_BUT_FS3, &CDecimMonDlg::OnBnClickedButFs3)
	ON_WM_CLOSE()
//	ON_WM_DESTROY()
END_MESSAGE_MAP()


// CDecimMonDlg メッセージ ハンドラ

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

	// "バージョン情報..." メニューをシステム メニューに追加します。

	// IDM_ABOUTBOX は、システム コマンドの範囲内になければなりません。
	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);
		}
	}

	// このダイアログのアイコンを設定します。アプリケーションのメイン ウィンドウがダイアログでない場合、
	//  Framework は、この設定を自動的に行います。
	SetIcon(m_hIcon, TRUE);			// 大きいアイコンの設定
	SetIcon(m_hIcon, FALSE);		// 小さいアイコンの設定

	// TODO: 初期化をここに追加します。
	BOOL TargetFound = FALSE;
	// COM0からCOM255まで調べる
	int i;
	for(i = 0; i < 256; i++) { 
		// COMXを開く
		BOOL succeeded = ComPortFindOpen(i);
		if(succeeded) {
			Sleep(100);
			if(AssertProNameReq()) {
				// プロダクト名が正しければbreak
				TargetFound = TRUE;
				break;
			}
			// プロダクト名が違うならばCOMXを閉じる
			m_Serial.Close();
		}
	}

	if(!TargetFound) {
		// ターゲットが見つからないときは警告ダイアログ
		AfxMessageBox("ターゲットが見つかりません。 \r\n以下を試してください。 \r\n\r\n(1)シリアルポートの接続を確認する。  \r\n(2)ターゲットにDecimFunc.cが書き込まれているか確認。 \r\n", MB_OK|MB_ICONEXCLAMATION);
	}
	Sleep(100);

	return TRUE;  // フォーカスをコントロールに設定した場合を除き、TRUE を返します。
}

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

// ダイアログに最小化ボタンを追加する場合、アイコンを描画するための
//  下のコードが必要です。ドキュメント/ビュー モデルを使う MFC アプリケーションの場合、
//  これは、Framework によって自動的に設定されます。

void CDecimMonDlg::OnPaint()
{
	if (IsIconic())
	{
		CPaintDC dc(this); // 描画のデバイス コンテキスト

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

		// クライアントの四角形領域内の中央
		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;

		// アイコンの描画
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

// ユーザーが最小化したウィンドウをドラッグしているときに表示するカーソルを取得するために、
//  システムがこの関数を呼び出します。
HCURSOR CDecimMonDlg::OnQueryDragIcon()
{
	return static_cast<HCURSOR>(m_hIcon);
}

// COMポートを見つけて開く関数。comxを開けたらTRUEを返す。
BOOL CDecimMonDlg::ComPortFindOpen(int comx)
{
	int PortSelected = -1;
	BOOL valid_port = FALSE;
	HKEY  hCom  = NULL;
	CString tmpstr = "";
	CString leftkey, rightkey;
	CString comport; // , vcpport;
	// パソコンのレジストリ情報を見る
	if(RegOpenKeyEx(HKEY_LOCAL_MACHINE, "HARDWARE\\DEVICEMAP\\SERIALCOMM", 0, KEY_READ, &hCom) == ERROR_SUCCESS){
		DWORD dwIdx = 0;
		TCHAR szKey[256];
		TCHAR szData[256];
		while(1){
			szKey[0]  = 0;
			szData[0] = 0;
			DWORD dwType=0;
			DWORD dwSize = sizeof(szKey);
			if(RegEnumValue(hCom, dwIdx, szKey, &dwSize, NULL, &dwType, NULL, NULL) != ERROR_SUCCESS)
				break;
			if(dwType==REG_SZ){
				DWORD dwCount = sizeof(szData);
				RegQueryValueEx(hCom, szKey, NULL, &dwType, (LPBYTE)szData, &dwCount);
				// COMポートの番号を調べる
				comport = CString(szData);
				comport.Replace("COM", "");
				if(atoi(comport) == comx) {
					// COMポートの番号とcomxが一致したらbreak
					PortSelected = atoi(comport);
					break; // while loop 
				}
			}
			dwIdx++;
		}
	}
	if(hCom) RegCloseKey(hCom);

	// 見つかったポートを開く
	if(PortSelected != -1) {
		if(m_Serial.Open(PortSelected, 57600)) { // succeeded 
			// 成功したらTRUEにする
			valid_port = TRUE;
			UpdateData(FALSE);
			UpdateWindow();
		}
	}

	if(!valid_port) {
		valid_port = FALSE;
		UpdateData(FALSE);
		UpdateWindow();
	} 
	// 成功したらTRUEを返す
	return valid_port;
}

void CDecimMonDlg::DrawAll()
{
	CWnd* h=GetDlgItem(IDC_CNT_BG);
	CRect r;
	h->GetClientRect(r);
	CDC* pDC = h->GetDC();

	pDC->SetMapMode(MM_ANISOTROPIC); // able to change coordinates
	pDC->SetWindowExt(SCALEX, SCALEY); // window size
//	pDC->SetViewportExt(400, -250); // invert the polarity
	pDC->SetViewportExt(SCALEX, SCALEY); // not invert the polarity
	pDC->SetViewportOrg(0, 0); // original position

	CString tmpstr;
	int i, tmpint;
	for(i = 0; i < MAXDATAN; i++) {
		tmpstr = "";
		for(int k = 0; k < 5; k++) tmpstr += RDD[i*5+k];
		tmpint = atoi(tmpstr);
		WVD[i] = tmpint;
	}

	DrawWaveFrame(pDC, 0, 0);
	if(Mode == 0) {
		DrawWave(pDC, 0, 0, WVD, 30*2, RGB(255, 0, 0));
	} else {
		DrawWave(pDC, 0, 0, WVD, 30, RGB(255, 0, 0));
	}

	h->ReleaseDC(pDC);
}

void CDecimMonDlg::DrawWave(CDC* pDC, int x0, int y0, double* xW, int imax, COLORREF col) {
	int i;
	CPen	myPen;
	CPen*	pOldPen;

	// TRANSPARENTの赤いテキストを描画する
	pDC->SetBkMode(TRANSPARENT);
	pDC->SetTextColor(RGB(0,0,0));
	
	CFont   font;         // フォントオブジェクト
	LOGFONT stFont;       // フォント定義
	
	// 変更されないフォント属性を設定する
	memset(&stFont, 0, sizeof(LOGFONT));
//	stFont.lfHeight = MulDiv(24, -pDC->GetDeviceCaps(LOGPIXELSY), 72);
	stFont.lfHeight = 14;
	stFont.lfWeight = FW_NORMAL;
//	stFont.lfCharSet = SHIFTJIS_CHARSET;
	stFont.lfCharSet = ANSI_CHARSET;
	stFont.lfClipPrecision = CLIP_LH_ANGLES;
//	strcpy(stFont.lfFaceName, "ＭＳ Ｐゴシック");
	strcpy(stFont.lfFaceName, "Arial");
	
	stFont.lfEscapement = 0;
		
	// フォントを作り、DCに指定する
	font.CreateFontIndirect(&stFont);
	CFont* pOldFont = pDC->SelectObject(&font);

	myPen.CreatePen(PS_SOLID, 1, col);
	pOldPen = pDC->SelectObject(&myPen);

	double xstep = double(SCALEX) / double(imax);
	int yi;
	for(i = 0; i < imax; i += 1) {
		yi = int(SCALEY/2 * xW[i] / 32768.0);
		if(yi > SCALEY/2) yi = SCALEY/2;
		if(yi < -SCALEY/2) yi = -SCALEY/2;
		pDC->MoveTo(0 + int(i*xstep), SCALEY*3/4);
		pDC->LineTo(0 + int(i*xstep), SCALEY*3/4 - yi);
	}

	pDC->SelectObject(pOldPen);
	myPen.DeleteObject();
}

void CDecimMonDlg::DrawWaveFrame(CDC* pDC, int x0, int y0) {
	CRect r;
	r.left = 0; r.top = 0;
	r.right = 0 + SCALEX; r.bottom = 0 + SCALEY;
	CBrush b;
	b.CreateSolidBrush(RGB(255,255,255));
	pDC->FillRect(r, &b);

	int i;
	CPen	myPen;
	CPen*	pOldPen;

	myPen.CreatePen(PS_DOT, 1, RGB(100,100,100));
	pOldPen = pDC->SelectObject(&myPen);

	for ( i = 1; i <= 3; i++ ) {
		pDC->MoveTo(x0, y0 + i*SCALEY/4);
		pDC->LineTo(x0 + SCALEX, y0 + i*SCALEY/4);
	}
	for ( i = 1; i <= 9; i++ ) {
		pDC->MoveTo(x0 + i*SCALEX/10, y0);
		pDC->LineTo(x0 + i*SCALEX/10, y0 + SCALEY);
	}

	pDC->SelectObject(pOldPen);
	myPen.DeleteObject();

	myPen.CreatePen(PS_SOLID, 1, RGB(0,0,0));
	pOldPen = pDC->SelectObject(&myPen);

	pDC->MoveTo(x0, y0);
	pDC->LineTo(x0 + SCALEX, y0);
	pDC->MoveTo(x0, y0 + SCALEY);
	pDC->LineTo(x0 + SCALEX, y0 + SCALEY);
	pDC->MoveTo(x0, y0);
	pDC->LineTo(x0, y0 + SCALEY);
	pDC->MoveTo(x0 + SCALEX, y0);
	pDC->LineTo(x0 + SCALEX, y0 + SCALEY);

	pDC->MoveTo(x0, y0 + 3*SCALEY/4);
	pDC->LineTo(x0 + SCALEX, y0 + 3*SCALEY/4);

	pDC->SelectObject(pOldPen);
	myPen.DeleteObject();

}

// プロダクト名をリクエストする関数
BOOL CDecimMonDlg::AssertProNameReq()
{
	int res = 0;
	CString tmpstr;
	int hostwait = 100;

	char tx[30];
	tmpstr = "p";
	strcpy(tx, tmpstr);
	int length = tmpstr.GetLength();
	// COMポートにREQPNを送信する。
	m_Serial.SendData(tx, length);

	Sleep(hostwait);

	res = m_Serial.ReadDataWaiting();

	char pid[30];
	// COMポートからデータを受信する。
	res = m_Serial.ReadData(pid, 30);

	// プロダクト名が正しいかどうかチェック。
	BOOL chktgt = TRUE;
	int i;
	for(i = 0; i < 3; i++) {
		if(pid[i] == 'K') break;
	}
	if(pid[i+1] != 'P') chktgt = FALSE;
	if(pid[i+2] != 'N') chktgt = FALSE;
	if(pid[i+3] != 'D') chktgt = FALSE;
	if(pid[i+4] != 'E') chktgt = FALSE;
	if(pid[i+5] != 'C') chktgt = FALSE;
	if(pid[i+6] != 'I') chktgt = FALSE;
	
	// 正しければTRUEを返す。
	return chktgt;
}

void CDecimMonDlg::OnBnClickedButFs()
{
	int res = 0;
	CString tmpstr;

	char tx[30], rx[1000];
	tmpstr = "a";
	strcpy(tx, tmpstr);
	int length = tmpstr.GetLength();
	// COMポートにREQPNを送信する。
	m_Serial.SendData(tx, length);

	Mode = 0;
	Sleep(200);

	res = m_Serial.ReadDataWaiting();

	res = m_Serial.ReadData(rx, MAXDATAN*5);
	int i;
//	for(i = 0; i < res; i++) {
//		if(i < MAXDATAN*5) RDD[i] = BYTE(rx[i]);
	for(i = 0; i < MAXDATAN*5; i++) { // modified for windows7 (?) 2011/8/12
		RDD[i] = BYTE(rx[i]);
	}
	UpdateData(FALSE);
	UpdateWindow();	
	DrawAll();
}

void CDecimMonDlg::OnBnClickedButFs2()
{
	int res = 0;
	CString tmpstr;

	char tx[30], rx[1000];
	tmpstr = "b";
	strcpy(tx, tmpstr);
	int length = tmpstr.GetLength();
	// COMポートにREQPNを送信する。
	m_Serial.SendData(tx, length);

	Mode = 1;
	Sleep(200);

	res = m_Serial.ReadDataWaiting();

	res = m_Serial.ReadData(rx, MAXDATAN*5);
	int i;
//	for(i = 0; i < res; i++) {
//		if(i < MAXDATAN*5) RDD[i] = BYTE(rx[i]);
	for(i = 0; i < MAXDATAN*5; i++) { // modified for windows7 (?) 2011/8/12
		RDD[i] = BYTE(rx[i]);
	}
	UpdateData(FALSE);
	UpdateWindow();	
	DrawAll();
}

void CDecimMonDlg::OnBnClickedButFs3()
{
	int res = 0;
	CString tmpstr;

	char tx[30], rx[1000];
	tmpstr = "c";
	strcpy(tx, tmpstr);
	int length = tmpstr.GetLength();
	// COMポートにREQPNを送信する。
	m_Serial.SendData(tx, length);

	Mode = 2;
	Sleep(200);

	res = m_Serial.ReadDataWaiting();

	res = m_Serial.ReadData(rx, MAXDATAN*5);
	int i;
//	for(i = 0; i < res; i++) {
//		if(i < MAXDATAN*5) RDD[i] = BYTE(rx[i]);
	for(i = 0; i < MAXDATAN*5; i++) { // modified for windows7 (?) 2011/8/12
		RDD[i] = BYTE(rx[i]);
	}
	UpdateData(FALSE);
	UpdateWindow();	
	DrawAll();
}

void CDecimMonDlg::OnClose()
{
	// TODO: ここにメッセージ ハンドラ コードを追加するか、既定の処理を呼び出します。
	m_Serial.Close();
	Sleep(200);

	CDialog::OnClose();
}