// SndDlg.cpp : implementation file
//

#include "stdafx.h"
#include <windowsx.h>
#include "Snd.h"
#include "TapiLine.h"
#include "mmsystem.h"
#include "SndDlg.h"

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

/////////////////////////////////////////////////////////////////////////////
// CSndDlg dialog

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

void CSndDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CSndDlg)
	DDX_Text(pDX, IDC_EDIT_FILENAME, m_csFileName);
	DDV_MaxChars(pDX, m_csFileName, 254);
	DDX_Text(pDX, IDC_EDIT_PHONE, m_csNo);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CSndDlg, CDialog)
	//{{AFX_MSG_MAP(CSndDlg)
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BUTTON_CONNECT, OnButton)
	ON_BN_CLICKED(IDC_BUTTON_PLAY, OnButtonPlay)
	ON_BN_CLICKED(IDC_BUTTON_DISCONNECT, OnButtonDisconnect)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CSndDlg message handlers

BOOL CSndDlg::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
	
	// TODO: Add extra initialization here
	
	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 CSndDlg::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 CSndDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CSndDlg::OnButton() 
{
int nLong;

	UpdateData(true);
	m_TapiLine.Create(m_hWnd);
	nLong = m_TapiLine.DialCall(m_csNo.GetBuffer(0));
	if ( nLong < 0 ) return;
}
void CSndDlg::OnButtonPlay() 
{
   UpdateData(true);	
   if(!(hmmio = mmioOpen(m_csFileName.GetBuffer(0), NULL, MMIO_READ | MMIO_ALLOCBUF)))
   {
     AfxMessageBox("Unable To open Wave File");
	 return;
   }
   mmckinfoParent.fccType = mmioFOURCC('W', 'A', 'V', 'E');
   if (mmioDescend(hmmio, &mmckinfoParent, NULL, MMIO_FINDRIFF))
   {
      AfxMessageBox("Unable To Intionlize MCI device");
      mmioClose(hmmio, 0);
      return;
   }

   mmckinfoSubchunk.ckid = mmioFOURCC('f', 'm', 't', ' ');
   if (mmioDescend(hmmio, &mmckinfoSubchunk, &mmckinfoParent,
      MMIO_FINDCHUNK))
   {
      AfxMessageBox("Unable To Intionlize MCI device");
      mmioClose(hmmio, 0);
      return;
   }
   dwFmtSize = mmckinfoSubchunk.cksize;
   hFormat = LocalAlloc(LMEM_MOVEABLE, LOWORD(dwFmtSize));
   if (!hFormat)
   {
      AfxMessageBox("Unable To Intionlize MCI device");
      mmioClose(hmmio, 0);
      return;
   }
   pFormat = (WAVEFORMATEX *) LocalLock(hFormat);
   if (!pFormat)
   {
      AfxMessageBox("Unable To Intionlize MCI device");
	  LocalFree( hFormat );
      mmioClose(hmmio, 0);
      return;
   }
   if (mmioRead(hmmio, (HPSTR) pFormat, dwFmtSize) != (LONG) dwFmtSize)
   {
	  AfxMessageBox("Unable To Intionlize MCI device");
	  LocalUnlock( hFormat );
	  LocalFree( hFormat );
      mmioClose(hmmio, 0);
      return ;
   }
   if (pFormat->wFormatTag != WAVE_FORMAT_PCM)
   {
	  AfxMessageBox("Unable To Intionlize MCI device");
	  LocalUnlock( hFormat );
	  LocalFree( hFormat );
      mmioClose(hmmio, 0);
      return ;
   }
   if (waveOutOpen(&hWaveOut, WAVE_MAPPER, pFormat, 0, 0L,
               WAVE_FORMAT_QUERY))
   {
  	  AfxMessageBox("Unable To Intionlize MCI device");
	  LocalUnlock( hFormat );
	  LocalFree( hFormat );
      mmioClose(hmmio, 0);
      return ;
   }

   mmioAscend(hmmio, &mmckinfoSubchunk, 0);
   mmckinfoSubchunk.ckid = mmioFOURCC('d', 'a', 't', 'a');
   if (mmioDescend(hmmio, &mmckinfoSubchunk, &mmckinfoParent,
      MMIO_FINDCHUNK))
   {
   	  AfxMessageBox("Unable To Intionlize MCI device");
	  LocalUnlock( hFormat );
	  LocalFree( hFormat );
      mmioClose(hmmio, 0);
      return ;
  }
   dwDataSize = mmckinfoSubchunk.cksize;
   if (dwDataSize == 0L)
   {
  	  AfxMessageBox("Unable To Intionlize MCI device");
	  LocalUnlock( hFormat );
	  LocalFree( hFormat );
      mmioClose(hmmio, 0);
      return ;
   }
   MMRESULT mmRet = waveOutOpen(&hWaveOut, WAVE_MAPPER,pFormat, (UINT)m_hWnd, 0L, CALLBACK_WINDOW);
   if ( mmRet != MMSYSERR_NOERROR) 
   {
  	  AfxMessageBox("Unable To Intionlize MCI device");
	  LocalUnlock( hFormat );
	  LocalFree( hFormat );
      mmioClose(hmmio, 0);
      return ;
   }
   wBlockSize = pFormat->nBlockAlign;
   LocalUnlock( hFormat );
   LocalFree( hFormat );
   lpData = (char*)GlobalAllocPtr(GMEM_MOVEABLE | GMEM_SHARE, dwDataSize );
   if (!lpData)
   {
      AfxMessageBox("Unable To Intionlize MCI device");
	  mmioClose(hmmio, 0);
      return ;
   }
   if(mmioRead(hmmio, lpData, dwDataSize) != (LONG) dwDataSize)
   {
      AfxMessageBox("Unable To Intionlize MCI device");
	  GlobalFreePtr( lpData );
      mmioClose(hmmio, 0);
      return ;
   }

   mmioClose(hmmio, 0);
   lpWaveHdr = (LPWAVEHDR)GlobalAllocPtr(GMEM_MOVEABLE | GMEM_SHARE,
                  (DWORD) sizeof(WAVEHDR));
   if (!lpWaveHdr)
   {
      GlobalFreePtr( lpData );
      AfxMessageBox("Unable To Intionlize MCI device");
      return ;
   }

   lpWaveHdr->lpData = lpData;
   lpWaveHdr->dwBufferLength = dwDataSize;
   lpWaveHdr->dwFlags = 0L;
   lpWaveHdr->dwLoops = 0L;
   if(waveOutPrepareHeader(hWaveOut, lpWaveHdr, sizeof(WAVEHDR)))
   {
      AfxMessageBox("Unable To Intionlize MCI device");
      return ;
   }
   dwResult = waveOutWrite(hWaveOut, lpWaveHdr, sizeof(WAVEHDR));
   if (dwResult != 0)
   {
      waveOutUnprepareHeader( hWaveOut, lpWaveHdr, sizeof(WAVEHDR));
      AfxMessageBox("Unable To Play wave");
      return ;
   }
}


LRESULT CSndDlg::WindowProc(UINT message, WPARAM wParam, LPARAM lParam) 
{
	if ( message == MM_WOM_DONE)
	{
		waveOutUnprepareHeader( (HWAVEOUT) wParam,
			(LPWAVEHDR) lParam, sizeof(WAVEHDR) );

		GlobalFreePtr( lpWaveHdr );
		GlobalFreePtr( lpData );
		waveOutClose( (HWAVEOUT) wParam );
		hWaveOut = NULL;
	}
	return CDialog::WindowProc(message, wParam, lParam);
}

void CSndDlg::OnButtonDisconnect() 
{
	m_TapiLine.HangupCall();
}