[code]

HANDLE CGSM_AONDlg::CreateComPort(char *comPortName)
{
    DCB dcb;
    HANDLE hCom = CreateFile(comPortName, GENERIC_READ | GENERIC_WRITE,  0 , NULL, OPEN_EXISTING,  0 , NULL); 
    if (hCom == INVALID_HANDLE_VALUE)
	{
	    Logger("Error CreateFile\n" , m_logDir);
		return  0 ;
	}
    if (!GetCommState(hCom, &dcb)) 
	{
	    Logger("Error GetCommState\n" , m_logDir);
		return  0 ;
	}
    dcb.BaudRate = CBR_19200; 
    dcb.fBinary = TRUE;      
    dcb.ByteSize =  8 ; 
	dcb.Parity = NOPARITY; 
	dcb.StopBits = ONESTOPBIT; 
    if( !SetCommState(hCom, &dcb)) 
	{
	    Logger("Error GetCommState\n" , m_logDir);
		return  0 ;
	}
    COMMTIMEOUTS TOut;
    DWORD TimeOut= 500 ;
    TOut.ReadIntervalTimeout =  100 ; 
    TOut.ReadTotalTimeoutMultiplier =  10 ; 
    TOut.ReadTotalTimeoutConstant = TimeOut; 
    TOut.WriteTotalTimeoutMultiplier =  10 ; 
    TOut.WriteTotalTimeoutConstant = TimeOut; 
    SetCommTimeouts(hCom,&TOut); 
    if (!SetupComm(hCom,  1200 ,  1200 ))
	{
	    Logger("Error GetCommState\n" , m_logDir);
		return  0 ;
	}
    return hCom;
 
 
}
 
void CGSM_AONDlg::OnOpenCom() 
{
 
	m_logDir = "c:\\";
	DWORD readed;
	DWORD write;
             char statusClip[]="AT+CLIP?\r";
	char setClip[]="AT+CLIP=1\r";
	char hangup[]="ATH\r";
 
	HANDLE hCom =  0 ;
 
             time_t  start, timeStatus;
	
             while( 1 )
	{
		time( & start );
		time( & timeStatus );
 
		if(hCom ==  0 )
	                 hCom=CreateComPort("COM1");
		if(hCom !=  0 )
		{
		    Logger("COM opened\n" , m_logDir);
			WriteFile(hCom,setClip,strlen(setClip),&write,NULL);
			Sleep( 50 );
			while( 1 )
			{
                                                   char buf[] = "";
				
				time_t timeCur;
				time( &timeCur );
 
                                                   if( difftime(start,timeCur) >  300  )
				{
					CloseHandle(hCom);	
					hCom =  0 ;
					break;
				}
 
				
				ReadFile(hCom,buf, 1024 ,&readed, NULL);
                
 
				CString strBuf = buf;
                
				if(strBuf.Find("RING") != - 1  )
				{
			                 WriteFile(hCom,hangup,strlen(hangup),&write,NULL);		 
				}
			   
             			if(strBuf.Find("AT+CLIP?") != - 1  )
				{
				    if(strBuf.Find("+CLIP: 1,1") != - 1 )
					{
					    Logger("CLIP OK\n" , m_logDir);
					}
 
					if(strBuf.Find("+CLIP: 0,1") != - 1 )
					{
					    Logger("NO CLIP : +CLIP: 0,1\n" , m_logDir);
				  	    WriteFile(hCom,statusClip,strlen(statusClip),&write,NULL);
					}
				}
	            			
				if( difftime(timeStatus,timeCur) >  15  )
				{
					time( &timeStatus );		
					WriteFile(hCom,statusClip,strlen(statusClip),&write,NULL);
				}
 
			}
		}
		else
			Sleep( 5000 );
	
	}