模拟MSN源码

模拟msn源代码-（与sb服务器通信，聊天session)- -                               

 

// MsnUser.cpp : implementation file
//

#include "stdafx.h"
#include "SimMsnMessenger.h"
#include "MsnUser.h"
#include "MsnLoginClient.h"

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

CMsnUser::CMsnUser()
{
  m_iSendXh=0;
  m_iFree=1;
  m_iCountMsg=0;
}

CMsnUser::~CMsnUser()
{
}

// Do not edit the following lines, which are needed by ClassWizard.
#if 0
BEGIN_MESSAGE_MAP(CMsnUser, CAsyncSocket)
 //{{AFX_MSG_MAP(CMsnUser)
 //}}AFX_MSG_MAP
END_MESSAGE_MAP()
#endif // 0

/////////////////////////////////////////////////////////////////////////////
// CMsnUser member functions

int CMsnUser::SBInit(char *aInServer, char *aInCKI)
{
  if( m_iFree == 0 )
  {
   FileLog( "SBInit  m_iFree=[%d], return -1", m_iFree);
   return -1;
  }
  
  m_iFree=0;

  unsigned int ilLen=strlen(aInServer);
  unsigned int i;
  for( i=2; i < ilLen ; i++ )
  {
   if( aInServer[i]== ':' ) break;
  }
  aInServer[i]=0x00;
  m_strCKI.Format("%s",aInCKI);
  m_Server.Format("%s",aInServer);
  m_iPort = atoi( aInServer+i+1 );
  FileLog( "[UserNo: %d] SBInit Connect(%s:%d) m_iFree=[%d]...",m_iUserNo ,(LPCTSTR)m_Server,m_iPort,m_iFree);
 
  Create(0,SOCK_STREAM,FD_CONNECT);
  Connect((LPCTSTR)m_Server,m_iPort);
  return 0;
}

void CMsnUser::OnConnect(int nErrorCode)
{
 // TODO: Add your specialized code here and/or call the base class
 FileLog("SB: [UserNo: %d] OnConnect(%d)",m_iUserNo , nErrorCode);
 AsyncSelect( FD_READ|FD_CLOSE ); //提请一个“读”的网络事件，准备接收
 char buf[1000];
 memset(buf,0x00,1000);
 m_iSendXh++;
 if( !m_strSessionID.CompareNoCase("XFR")  )
 {
  //主动请求
  //USR 1  tcpip_2005@126.com 17151585.1116982922.3576
  sprintf( buf,"USR %d %s %s/r/n",
   m_iSendXh,(LPCTSTR)m_pLoginClient->m_strMyNickName,
   (LPCTSTR)m_strCKI);

 }
 else
 {
  //被动接受请求
  //ANS 1 tcpip_2005@126.com 989495494.750408580 11742066
  //上面的命令包含了我们的登陆名，我们接收到的CKI杂列和session号.
  sprintf( buf,"ANS %d %s %s %s/r/n",
   m_iSendXh,(LPCTSTR)m_pLoginClient->m_strMyNickName,
   (LPCTSTR)m_strCKI,(LPCTSTR)m_strSessionID);
 }
 int iTem = strlen(buf);
 buf[iTem] = 0x00;
    iTem = Send( (void*)buf, strlen(buf));
 FileLog("Send ret =[%d]", iTem );
 CAsyncSocket::OnConnect(nErrorCode);
}

 
void CMsnUser::OnReceive(int nErrorCode)
{
 // TODO: Add your specialized code here and/or call the base class
 char bufRecv[2048];
 int  iTem;
 int  iLen;
 int  iStart, iEnd;
 char  cTem;
 CString strTem1,strTem2;
 int  i;

 
  iLen = this->Receive( bufRecv, 2047 );

  if( iLen <=0 )
  {
   FileLog("<-Reveive %04d bytes:<span style=/"background-color: #0000FF/">[ERROR!!]</span>",  iLen);
  
   return;
  }

   if (iLen >= 2047 ) iLen = 2047;
  bufRecv[iLen] = 0x00;
  if( iLen < 80 ) FileLog("<-SB : [UserNo: %d] Reveive %04d bytes::<span style=/"background-color: #669999/">[%s]</span>", m_iUserNo , iLen , bufRecv);
  else FileLog("<-SB : [UserNo: %d] Reveive %04d bytes::<span style=/"background-color: #669999/">[<br>%s]</span>", m_iUserNo , iLen , bufRecv);
 
  if(m_pLoginClient != NULL)
  {
   //process the recved Message:
   iStart = iEnd = 0;
   cTem = bufRecv[0];
   strTem1 = CString(bufRecv);
  
   i = 0;
   iTem = strTem1.GetLength();
   for(;iEnd < iTem;)
   {
    iEnd   = strTem1.Find(_T("/r/n"));  //?? CR LF?
    if(iEnd == -1)
    {
     FileLog("Not Find CR LF !  Error!");
     iEnd = strTem1.GetLength();
    }

    strTem2 = strTem1.Mid(0,iEnd);

    m_iBytesForCmd=0;
    DoRecvedStr(strTem2);

    if( m_iBytesForCmd > 0 )
    {
    
     strTem2 = strTem1.Mid(iEnd+2,iEnd+2+m_iBytesForCmd);
     DoMSG(strTem2, m_iBytesForCmd);
     iEnd=iEnd+m_iBytesForCmd;
    }

     iTem = strTem1.GetLength();
    if(iEnd+2 >= iTem)  break;
    strTem1 = strTem1.Mid(iEnd+2,iTem);
    i++;
   }
  
  }
 

 CAsyncSocket::OnReceive(nErrorCode);
}

int CMsnUser::Send(const void* lpBuf, int nBufLen, int nFlags)
{
 // TODO: Add your specialized code here and/or call the base class
    FileLog("->SB : [UserNo: %d] Send %04d bytes::<span style=/"background-color: #CC6600/">[%s]</span>", m_iUserNo , nBufLen , lpBuf);
 
 return CAsyncSocket::Send(lpBuf, nBufLen, nFlags);
}

int CMsnUser::DoRecvedStr(CString strMsg)
{
 FileLog("[UserNo: %d] DoRecvedStr(%s)", m_iUserNo , (LPCTSTR) strMsg);
 CString strCommand;

 char buf[500];
 int  iTem;
 char alTmp0[1000],alTmp1[100],alTmp2[100],alTmp3[100],alTmp4[1000];
 unsigned int i=0;
 
   
 //MSN Messenger命令使用纯ASCII码。对非ASCII码字符使用URL编码。
 //命令的语法是
 //XXX[<SP>TrID<SP>PARAM1<SP>PARAM2…]<CRLF>
 //其中，<SP>是空白字符，<CRLF>是回车换行，
 //XXX是一个3字符的命令串，TrID是一个流水号，PARAMx是参数，
 //[ ]内是可选项。最简单的命令没有流水号和参数。
 //为了方便起见，下面讨论时用" "代表<SP>，"/r/n"代表<CRLF>，
 //"/x??"代表一个值为0x??字节。
 //USR 18 TWN I tcpip_2005@126.com/r/n

 strCommand = strMsg.Mid(0,3);
 if(strCommand == CString("IRO"))
 {
  FileLog("[UserNo: %d] IRO 通话Session已经建立", m_iUserNo);
 
  }
 else if(strCommand == CString("ANS"))
 {
   FileLog("[UserNo: %d] ANS 确认通话Session已经建立!", m_iUserNo);
   WriteMsgFile( "Talk session init OK!", 99 );
  }
 else if(strCommand == CString("USR"))
 {
  //USR 1 OK tcpip_2005@126.com
 
  FileLog("[UserNo: %d] USR 确认通话Session已经建立!", m_iUserNo);
  WriteMsgFile( "Talk session init OK!", 99 );
  memset(alTmp0,0x00,sizeof(alTmp0));
  memset(alTmp1,0x00,sizeof(alTmp1));
  memset(alTmp2,0x00,sizeof(alTmp2));
  memset(alTmp3,0x00,sizeof(alTmp3));
  memset(alTmp4,0x00,sizeof(alTmp4));
  
  sprintf(alTmp0,"%s",(LPCTSTR)strMsg);
  sscanf(alTmp0,"%s %s %s %s",alTmp1,alTmp2,alTmp3,alTmp4);
  FileLog("XFR: %s %s %s %s",alTmp1,alTmp2,alTmp3,alTmp4);
  // CAL 2 tcpip_2005@126.com 
  memset(buf,0x00,sizeof(buf));
  m_iSendXh++;
  sprintf(buf,"CAL %d %s/r/n",m_iSendXh,(LPCTSTR)m_strEmail);
  iTem = strlen(buf);
  buf[iTem] = 0x00;
     Send( (void*)buf, strlen(buf));
  }
 else if(strCommand == CString("BYE"))
 {
   FileLog("[UserNo: %d] BYE SB断开通话Session!", m_iUserNo);
   Close();
   m_hSocket = INVALID_SOCKET;
   m_iFree = 1 ;
   WriteMsgFile( "Bye , Talk session was closed!", 99 );
  }
 else if(strCommand == CString("XFR"))
 {
  //XFR 3 NS 207.46.107.104:1863 0 207.46.104.20:1863%0d%0a
  
  memset(alTmp0,0x00,sizeof(alTmp0));
  memset(alTmp1,0x00,sizeof(alTmp1));
  memset(alTmp2,0x00,sizeof(alTmp2));
  memset(alTmp3,0x00,sizeof(alTmp3));
  memset(alTmp4,0x00,sizeof(alTmp4));
  
  sprintf(alTmp0,"%s",(LPCTSTR)strMsg);
  sscanf(alTmp0,"%s %s %s %s",alTmp1,alTmp2,alTmp3,alTmp4);
  FileLog("XFR: %s %s %s %s",alTmp1,alTmp2,alTmp3,alTmp4);
  
  memset(buf,0x00,sizeof(buf));
  m_iSendXh++;
  iTem = strlen(buf);
  buf[iTem] = 0x0d; buf[iTem+1] = 0x0a; buf[iTem+2] = 0x00;
     Send( (void*)buf, strlen(buf));
 }
 else if(strCommand == CString("MSG"))
 {
  //MSG Hotmail Hotmail 499
 
 
  memset(alTmp0,0x00,sizeof(alTmp0));
  memset(alTmp1,0x00,sizeof(alTmp1));
  memset(alTmp2,0x00,sizeof(alTmp2));
  memset(alTmp3,0x00,sizeof(alTmp3));
  memset(alTmp4,0x00,sizeof(alTmp4));
 
  sprintf(alTmp0,"%s",(LPCTSTR)strMsg);
  int iLen;
  sscanf(alTmp0,"%s %s %s %s",alTmp1,alTmp2,alTmp3 ,alTmp4);
  iLen = atoi( alTmp4 );
  FileLog("MSG : %s %s %s ,Len=%d",alTmp1,alTmp2,alTmp3 ,iLen);
  m_iBytesForCmd = iLen;
   
 }
 else if(strCommand == CString("JOI"))
 {
  //[CAL 2 RINGING 17151585%0d%0a]
  //[JOI tcpip_2005@126.com %e5%b0%8fI%e6%82%a0%e6%82%a0%0d%0a]
 
   FileLog("[UserNo: %d] 通话Session OK!", m_iUserNo);
    WriteMsgFile( "CAL OK!", 99 );
   if( m_strWaitSend.GetLength() > 0 )
   {
    UserInputMsg( (LPCTSTR)m_strWaitSend );
   }
  }
  
 
 
 return 0;
}

int CMsnUser::DoMSG(CString strMsg, int iInMsgLen)
{
 
 FileLog("[UserNo: %d] DoMSG [%d]", m_iUserNo ,iInMsgLen);
 
 WriteMsgFile( (LPCTSTR)strMsg , 0 );
 /*************
  memset(buf,0x00,sizeof(buf));
  m_iSendXh++;
  sprintf(buf,"MSG %d A %d/r/n",m_iSendXh,iInMsgLen);
  iTem = strlen(buf);
  buf[iTem] = 0x00;
     Send( (void*)buf, strlen(buf));

  Send( (LPCTSTR)strMsg,iInMsgLen);
  ***************/
 return 0;
}

void CMsnUser::OnClose(int nErrorCode)
{
 // TODO: Add your specialized code here and/or call the base class
 FileLog("[UserNo: %d] OnClose(%d ) SB断开通话Sessio!", m_iUserNo,nErrorCode);
 m_iFree = 1;
 Close();
 m_hSocket = INVALID_SOCKET;
 WriteMsgFile( "Talk session was closed! Can't send message!", 99 );
 CAsyncSocket::OnClose(nErrorCode);
}

int CMsnUser::WriteMsgFile(const  char *aInMsg, int iIO)
{
 
 char alTmp1[2048];
 int ilBytes=strlen(aInMsg);
 FILE     *fp;
    char    fname1[300];
 int ilIO=iIO;
    memset(alTmp1,0x00,sizeof(alTmp1));
 if( iIO == 0)
 {
  if( strstr(aInMsg,"Typing") != NULL )
  {
    memcpy( alTmp1,"Typing...", 9);
    ilIO=99;
  }
  else
  {
   for( int i=0;i<ilBytes; i ++ )
   {
    if( strncmp(aInMsg+i , "/r/n/r/n",4 ) == 0 )
    memcpy( alTmp1,aInMsg+i +4, ilBytes-i-4);
   }
  }

 }
 else memcpy( alTmp1,aInMsg , ilBytes );

 sprintf(fname1,"%s//html//%d_user_left.htm",agCurDir,m_iUserNo);
    FileLog("[UserNo: %d] %d %s", m_iUserNo,ilIO, fname1);

 if (( fp = fopen(fname1,"a+")) == NULL)  return(-1);

 if( ilIO == 1)  fprintf( fp,"%s say:<br>/n",(LPCTSTR)m_pLoginClient->m_strNick);
 else if( ilIO == 0)  fprintf( fp,"%s say:<br>/n",(LPCTSTR)m_strNickName);
    else fprintf( fp,"Info :  ");
   
 fprintf( fp,"&nbsp;&nbsp;%s<br>/n",alTmp1);
    fclose( fp );

 m_iCountMsg++;

 FileLog("PostMessage(WPARAM, LPARAM lParam DispMainPage)");
 LPARAM lpTmp= m_iUserNo+100;
 AfxGetApp()->m_pMainWnd->PostMessage( WM_MY_MESSAGE, 1, (LPARAM)lpTmp );

 return 0;
}

int CMsnUser::UserInputMsg(const char *aInMsg)
{
 int iInMsgLen=strlen(aInMsg);

 FileLog("[UserNo: %d] UserInputMsg Len=[%d]", m_iUserNo ,iInMsgLen);
 char buf[500],buf1[1000];
 int  iTem,ilLen;

 if( m_iFree == 1 )
 {
  FileLog("[UserNo: %d] session was closed!", m_iUserNo );
  memset(buf1,0x00,sizeof(buf1));
  sprintf(buf1,"Talk session was closed! Can't send message!");
  WriteMsgFile( buf1, 99 );
  m_strWaitSend+=aInMsg;
  
  m_pLoginClient->DoUserXfrSB(m_iUserNo);
  return -1;
 }
 memset(buf1,0x00,sizeof(buf1));
 //sprintf(buf1,"MIME-Version: 1.0/r/nContent-Type: text/plain; charset=UTF-8/r/nX-MMS-IM-Format: FN=%%E5%%AE%%8B%%E4%%BD%%93; EF=; CO=0; CS=86; PF=0/r/n/r/n");
 sprintf(buf1,"MIME-Version: 1.0/r/nContent-Type: text/plain; charset=UTF-8/r/nUser-Agent: Gaim/1.0.3/r/nX-MMS-IM-Format: FN=MS%%2520Sans%%2520Serif; EF=; CO=0; PF=0/r/n/r/n");
 
 
 WriteMsgFile( aInMsg , 1 );
 memset(buf,0x00,sizeof(buf));
 m_iSendXh++;
 sprintf(buf,"MSG %d A %d/r/n",m_iSendXh,iInMsgLen+strlen(buf1));
 iTem = strlen(buf);
 buf[iTem] = 0x00;
 ilLen = Send( (void*)buf, strlen(buf));
 FileLog("[UserNo: %d] Send [%d] ret  [%d]", m_iUserNo ,strlen(buf),ilLen);
 ilLen = Send( (void*)buf1, strlen(buf1));
 FileLog("[UserNo: %d] Send [%d] ret  [%d]", m_iUserNo ,strlen(buf1),ilLen);
 
 ilLen = Send( aInMsg,iInMsgLen);
 FileLog("[UserNo: %d] Send [%d] ret  [%d]", m_iUserNo ,iInMsgLen,ilLen);
 
 return 0;
}