// modem_demoDlg.cpp : implementation file
//

#include "stdafx.h"
#include "modem_demo.h"
#include "modem_demoDlg.h"

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

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

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

// Dialog Data
	//{{AFX_DATA(CAboutDlg)
	enum { IDD = IDD_ABOUTBOX };
	//}}AFX_DATA

	// ClassWizard generated virtual function overrides
	//{{AFX_VIRTUAL(CAboutDlg)
	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
	//}}AFX_VIRTUAL

// Implementation
protected:
	//{{AFX_MSG(CAboutDlg)
	//}}AFX_MSG
	DECLARE_MESSAGE_MAP()
};

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

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

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
	//{{AFX_MSG_MAP(CAboutDlg)
		// No message handlers
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CModem_demoDlg dialog

CModem_demoDlg::CModem_demoDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CModem_demoDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CModem_demoDlg)
	m_PhoneNumber = _T("");
	m_ReceiveData = _T("");
	m_SendData = _T("");
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CModem_demoDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CModem_demoDlg)
	DDX_Control(pDX, IDC_BUTTON_SENDDATA, m_Send);
	DDX_Control(pDX, IDC_BUTTON_HANGUP, m_HangUp);
	DDX_Control(pDX, IDC_BUTTON_DIAL, m_Dial);
	DDX_Control(pDX, IDC_BUTTON_CLEAR, m_Clear);
	DDX_Text(pDX, IDC_EDIT_NUMBER, m_PhoneNumber);
	DDX_Text(pDX, IDC_EDIT_RCVDATA, m_ReceiveData);
	DDX_Text(pDX, IDC_EDIT_SENDDATA, m_SendData);
	DDX_Control(pDX, IDC_MSCOMM, m_comm);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CModem_demoDlg, CDialog)
	//{{AFX_MSG_MAP(CModem_demoDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BUTTON_DIAL, OnDial)
	ON_BN_CLICKED(IDC_BUTTON_HANGUP, OnHangup)
	ON_BN_CLICKED(IDC_BUTTON_SENDDATA, OnSenddata)
	ON_BN_CLICKED(IDC_BUTTON_CLEAR, OnClear)
	ON_WM_TIMER()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

BEGIN_EVENTSINK_MAP(CModem_demoDlg, CDialog)
    //{{AFX_EVENTSINK_MAP(CModem_demoDlg)
	ON_EVENT(CModem_demoDlg, IDC_MSCOMM, 1 /* OnComm */, OnComm, VTS_NONE)
	//}}AFX_EVENTSINK_MAP
END_EVENTSINK_MAP()

/////////////////////////////////////////////////////////////////////////////
// CModem_demoDlg message handlers

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

	// Add "About..." menu item to system menu.

	// IDM_ABOUTBOX must be in the system command range.
	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);
		}
	}

	// 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
	
	// TODO: Add extra initialization here
   if(m_comm.GetPortOpen())
   {
      m_comm.SetPortOpen(FALSE);//設置串口配置信息前先要關閉串口
   }                   
    m_comm.SetCommPort(2);//Com2串行口       
	m_comm.SetSettings("9600,n,8,1");//設置波特率為9600bps，無奇偶校驗位，數據位8位，停止位1位
	m_comm.SetInputMode(1);//設置數據通訊格式為二進制數組格式
	m_comm.SetRThreshold(1);//設置為每次接到一個字節數據就觸發OnComm事件
	if(!m_comm.GetPortOpen())  
	{
		m_comm.SetPortOpen(TRUE);
	}	
    m_comm.GetInput();//清除串口輸入緩沖區中殘留數據
	m_SendData="ATZ\r\n";//調制解調器初始化
    m_comm.SetOutput(COleVariant(m_SendData));

	m_ConnectOk=FALSE;
	GetDlgItem(IDC_BUTTON_DIAL)->EnableWindow(FALSE);
	GetDlgItem(IDC_BUTTON_SENDDATA)->EnableWindow(FALSE);
	GetDlgItem(IDC_BUTTON_HANGUP)->EnableWindow(FALSE);
	SetTimer(1,3000,NULL);

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

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

// 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 CModem_demoDlg::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 CModem_demoDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CModem_demoDlg::OnDial() 
{
	// TODO: Add your control notification handler code here
	stop=!stop;
	if(!stop)
	 {
       m_Dial.SetWindowText("停止撥號");
	   m_SendData="ATDT"+m_PhoneNumber+"\r\n";       //撥號
	   m_comm.SetOutput(COleVariant(m_SendData));
	   m_Dial.SetWindowText("停止撥號");
	   SetTimer(2,40000,NULL);
	 }
    else
     {
	  m_SendData="ATH0\r\n";                    //掛機 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  m_Dial.SetWindowText("重新撥號");
	}
}

void CModem_demoDlg::OnHangup() 
{
	// TODO: Add your control notification handler code here
      m_SendData="+++";                         //掛機 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  Sleep(3000);
	  m_SendData="ATH0\r\n";                    //掛機 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  m_Dial.EnableWindow(true);
      open=true;
	  m_ConnectOk=false;
	  m_Dial.SetWindowText("重新撥號");
}

void CModem_demoDlg::OnSenddata() 
{
	// TODO: Add your control notification handler code here
    if(!m_ConnectOk)
	{
	 MessageBox("請先撥號,建立連接!","消息",MB_ICONINFORMATION);
	}
	else
	{
	UpdateData(FALSE);
	m_comm.SetOutput(COleVariant(m_SendData));
	}
}

void CModem_demoDlg::OnClear() 
{
	// TODO: Add your control notification handler code here
	UpdateData(TRUE);
	if(!(m_SendData.GetLength()||m_ReceiveData.GetLength()))
	{
        MessageBox("數據區為空!","消息",MB_ICONINFORMATION);
	    return;
	}
	m_SendData.Empty();
	m_ReceiveData.Empty();
	UpdateData(FALSE);
}


void CModem_demoDlg::OnComm() 
{
	// TODO: Add your control notification handler code here
	Sleep(500);                              //確保接收數據的完整性(500ms)
    VARIANT m_input;
    char *str,*str1;
    int k,nEvent,i,len,m;
    CString str2;
    m_ReceiveData="";
    nEvent=m_comm.GetCommEvent();
	switch(nEvent)
	{
	case 2:
	   k=m_comm.GetInBufferCount();     //接收緩沖區的字符數目
	   if(k>0)
	   {
		   m_input=m_comm.GetInput();
		   str=(char*)(unsigned char*)m_input.parray->pvData;
	   }
	   i=0;
	   str1=str;
	   while(i<k)
	   {
		   i++;
		   str1++;
	   }
	   *str1='\0';                               
       str2=(const char*)str;             //清除字符串中的不必要字符
       m_ReceiveData=(const char *)str;
	   len=str2.GetLength();

       for(m=0;m<len;m++)
	   {
	   //if(isalnum(str2[m]))              //字母或數字 
	   if(isprint(str2[m]))                //可打印字符，不包括空格
	   //if(!ispunct(str2[m]))
	   m_ReceiveData+=str2[m];
	   }

      if(strcmp(m_ReceiveData,"CONNECT 2400")==0)
	  {
		 MessageBox("連接成功,可以發送數據!","消息",MB_ICONINFORMATION);
		 m_ConnectOk=TRUE;
		 GetDlgItem(IDC_BUTTON_DIAL)->EnableWindow(FALSE);
         GetDlgItem(IDC_BUTTON_SENDDATA)->EnableWindow(TRUE);
	     GetDlgItem(IDC_BUTTON_HANGUP)->EnableWindow(TRUE);
	  }
      else if(strcmp(m_ReceiveData,"OK")==0)
	  {
	    if(!m_ConnectOk)            
		 {
         KillTimer(1);
		 MessageBox("調制解調器初始化成功!","消息",MB_ICONINFORMATION);
		 GetDlgItem(IDC_BUTTON_DIAL)->EnableWindow(TRUE);
         return;		 
		}
		else
		{
		 m_SendData="ATH0\r\n"; //掛機
      	 m_comm.SetOutput(COleVariant(m_SendData));
		 open=true;
         m_Dial.SetWindowText("重新撥號");
		 m_Dial.EnableWindow(true);
	     m_ConnectOk=FALSE;
         MessageBox("連接超時，請檢查網絡!","消息",MB_ICONINFORMATION);
		 return;
		}
	  }
	  else if(strcmp(m_ReceiveData,"BUSY")==0)
	  {
	    MessageBox("線路忙,請稍候再撥!","消息",MB_ICONINFORMATION);
        m_Dial.EnableWindow(true);
	    open=true;
	    m_Dial.SetWindowText("重新撥號");
	    return;
	  }
	  else if(strcmp(m_ReceiveData,"NO DIALTONE")==0)
	  {
	   MessageBox("無撥號音或未連接電\n話線,請檢查設備!","消息",MB_ICONINFORMATION);
       m_Dial.EnableWindow(true);
	   open=true;
	   m_Dial.SetWindowText("重新撥號");
	   return;
	  }
	  else if(strcmp(m_ReceiveData,"NO CARRIER")==0)
	  {
        MessageBox("對方無響應,請檢查\n后重新連接!","消息",MB_ICONINFORMATION);
	    m_Dial.EnableWindow(true);
        open=true;
		m_ConnectOk=FALSE;
        m_Dial.SetWindowText("重新撥號");
		return;
	  }
	  else if(strcmp(m_ReceiveData,"ERROR")==0)         //ATZ指令不兼容
	  {
       m_SendData="AT&FE0\r";  
       m_comm.SetOutput(COleVariant(m_SendData));
       return;
	  }
	   UpdateData(FALSE);
       break;
   case 3:       //CTS線狀態發生變化
	   break;
   case 4:       //DSR線狀態發生變化
	   break;
   case 5:       //CD線狀態發生變化
	   break;
   case 6:       //Ring Indicator發生變化
	   break;
}	
}


void CModem_demoDlg::OnTimer(UINT nIDEvent) 
{
	// TODO: Add your message handler code here and/or call default
		switch(nIDEvent)
	{
	case 1:
		KillTimer(1);
		MessageBox("沒找到設備,請檢查調制解調器\n通訊電纜是否與COM2口連接或\n電源是否打開!","消息",MB_ICONINFORMATION);
		exit(0);
		break; 
	case 2:
		KillTimer(2);
		MessageBox("線路故障,請復位調制解調器電\n源并重新連接!","消息",MB_ICONINFORMATION);
        open=true;
        m_Dial.SetWindowText("重新撥號");
		m_Dial.EnableWindow(true);
	   	}
	CDialog::OnTimer(nIDEvent);
}

void CModem_demoDlg::OnOK() 
{
	// TODO: Add extra validation here
	int nAnswer;
	if(m_ConnectOk)
	{
	  nAnswer=MessageBox("設備處于連接狀態,確認\n要斷開嗎?","退出",MB_YESNO|MB_ICONQUESTION);
	  switch(nAnswer)
	  {
	  case IDYES:
      m_SendData="+++";                         //掛機 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  //m_hangup=TRUE;
	  Sleep(2000);
	  m_SendData="ATH0\r\n";                    //掛機 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  break;
	  case IDNO: return;break;
	   }
	 }
	if(m_comm.GetPortOpen())
	m_comm.SetPortOpen(false);
	CDialog::OnOK();
	OnClose();
}