// K_BBS.cpp : implementation file
//

#include "stdafx.h"
#include "smsmanager.h"
#include "K_BBSU.h"

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

/////////////////////////////////////////////////////////////////////////////
// CK_BBSU dialog
#include "MainFrm.h"
#include "ProcessSocket.h"
#include "DLG_BBS_See.h"
#include "DLG_BBS_Send.h"
#include "DLG_Msg_See.h"
#include "DLG_YJ.h"

CK_BBSU::CK_BBSU(CWnd* pParent /*=NULL*/)
	: CDialog(CK_BBSU::IDD, pParent)
{
	//{{AFX_DATA_INIT(CK_BBSU)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT
	m_bInit = false;
	m_bRefresh = false;
}


void CK_BBSU::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CK_BBSU)
	DDX_Control(pDX, IDC_BBSU_LIST, m_wndList);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CK_BBSU, CDialog)
	//{{AFX_MSG_MAP(CK_BBSU)
	ON_WM_SIZE()
	ON_NOTIFY(NM_DBLCLK, IDC_BBSU_LIST, OnDblclkBbsList)
	ON_NOTIFY(NM_RCLICK, IDC_BBSU_LIST, OnRclickBbsList)
	ON_NOTIFY(LVN_KEYDOWN, IDC_BBSU_LIST, OnKeydownBbsList)
	//}}AFX_MSG_MAP
	ON_COMMAND( MENU_BBS_SEE   , On_BBS_See )
	ON_COMMAND( MENU_BBS_REMSG , On_BBS_ReMsg )
	ON_COMMAND( MENU_BBS_REFRESH , On_BBS_Refresh )
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CK_BBSU message handlers

BOOL CK_BBSU::RefreshInfo()
{
	REQ_Msg_See * pSee = new REQ_Msg_See;
	pSee->lCorpID = -400;
	pSee->lUserID = m_pMainFrame->m_lUserID;
	m_pMainFrame->SendFrame( SMSFUNC_MSG_SEE , (BYTE*)pSee , sizeof( REQ_Msg_See ) );  //发送取资料的请求

	return true;
}

void CK_BBSU::Close()
{
	//清除队列中的内容
	while (!m_BBS.IsEmpty())
	{
		ANS_Msg_SeeData * pData = m_BBS.GetHead();
		m_BBS.RemoveHead();
		delete pData;
	}
}

BOOL CK_BBSU::ReHide()
{
	ShowWindow( SW_HIDE );
	return true;
}

BOOL CK_BBSU::ReShow(BOOL bRefresh)
{
	ShowWindow( SW_SHOW );
	if ( bRefresh || !m_bRefresh )
	{
		RefreshInfo();
	}
	return true;
}

BOOL CK_BBSU::ProcessSocket(Socket_Head *pHead)
{
	//取过滤信息
	if (pHead->lFuncType == SMSFUNC_MSG_SEE)
	{
		m_bRefresh = true;  //已经刷新过
		ANS_Msg_See     * pSee = (ANS_Msg_See *)pHead->pFrame;
		ANS_Msg_SeeData * pData = (ANS_Msg_SeeData *)(pHead->pFrame+sizeof(ANS_Msg_See));
		m_wndList.ShowWindow( SW_HIDE );
		m_wndList.DeleteAllItems(); //删除原有的内容
		this->Close();              //关闭原队列
		TCHAR Buf[128];
		BOOL bTip = false;
		BOOL bTipTest = false;
		for ( int i=0;i<pSee->lCount;i++ )
		{
			//m_wndList.SetHeadings(_T("序号,50;    发送人,180;   接收人,120;发送时间,90; 类型,90;     内容,180"));

			ANS_Msg_SeeData * pNewData = new ANS_Msg_SeeData;
			*pNewData = *pData;
			POSITION pos = m_BBS.AddTail(pNewData);

			
			_stprintf(Buf , _T("%d") , pSee->lCount-i );
			m_wndList.InsertItem( i , Buf ,0 );
			m_wndList.SetItemData( i , (DWORD)pos );    //存Pos

			if ( pData->lSCorpID != 0 )
			{
				COleDateTime t(pData->tExpTime);
				if ( t.GetStatus()==COleDateTime::valid )
				{
					if ( COleDateTime(pData->tExpTime) - COleDateTime(pData->tSendTime) > BBS_PROCESS_TIMEOUT )
					{
						m_wndList.SetItemText(i,1,_T("已处理(过期)"));
					}
					else
					{
						m_wndList.SetItemText(i,1,_T("已处理"));
					}
				}
				else
				{
					if ( COleDateTime::GetCurrentTime() - COleDateTime(pData->tSendTime) > BBS_PROCESS_TIMEOUT )
					{
						m_wndList.SetItemText(i,1,_T("未处理(过期)"));
					}
					else
					{
						m_wndList.SetItemText(i,1,_T("未处理"));
					}
				}
			}
			else
			{
				m_wndList.SetItemText(i,1,_T("--"));
			}

			if ( pData->lSCorpID == 0 )
				_tcscpy(Buf, _T("管理员"));
			else
				if ( pData->lSCorpID == -1 )
					_stprintf(Buf, _T("所有"));
				else
					_stprintf(Buf, _T("%d->%d(%s->%s)") ,pData->lSCorpID,pData->lSUserID,pData->szSCorpName,pData->szSLoginName);

			m_wndList.SetItemText(i,2,Buf);

			if ( pData->lRCorpID == 0 )
				_tcscpy(Buf, _T("管理员"));
			else
				if ( pData->lRCorpID == -1 )
					_stprintf(Buf, _T("所有"));
				else
					_stprintf(Buf, _T("%d->%d") , pData->lRCorpID,pData->lRUserID);

			m_wndList.SetItemText(i,3,Buf);

			_stprintf(Buf, _T("%04d.%02d.%02d") , pData->tSendTime.wYear,pData->tSendTime.wMonth,pData->tSendTime.wDay);
			m_wndList.SetItemText(i,4,Buf);

			m_wndList.SetItemText(i,5,pData->szType);
			m_wndList.SetItemText(i,6,pData->szBZ);

			if ( !bTip && !bTipTest && (pData->lSUserID != m_pMainFrame->m_lUserID) )  //不是我发出的，判断时间
			{
				bTipTest = true;
				COleDateTimeSpan tAdd(3,0,0,0); //3天
				COleDateTime tSend(pData->tSendTime);
				if (pData->lBBSID!=m_pMainFrame->m_Setup.lLastBBSID && 
					tSend.GetStatus()==COleDateTime::valid && 
					COleDateTime::GetCurrentTime() < tSend+tAdd )
				{
					m_pMainFrame->m_Setup.lLastBBSID = pData->lBBSID;  //保存最后一次的ID
					m_pMainFrame->SaveSetup();
					bTip = true;
				}
			}
			pData ++;
		}
		m_wndList.ShowWindow( SW_SHOW );
		if ( bTip )
		{
			MessageBox( _T("你有新的消息，请在左边功能选择\"用户消息\"或\"管理员消息\"查看！") ,_T("提示"),MB_ICONINFORMATION);
		}
		return true;
	}
	if (pHead->lFuncType == SMSFUNC_BBS_SEND)
	{
		if ( !m_bRefresh )  //尚未刷新，不用显示
			return true;

		ANS_BBS_Send * pAdd = (ANS_BBS_Send *)pHead->pFrame;
		ANS_BBS_SeeData * pData = (ANS_BBS_SeeData *)(pHead->pFrame+sizeof(ANS_BBS_Send));

		if ( pAdd->lCount == 1 )  //等于1时表示修改成功
		{
			long lCount = m_wndList.GetItemCount();
			//设置新的数据
			TCHAR Buf[32];
			_stprintf( Buf, _T("%d") , lCount +1 );
			m_wndList.InsertItem( 0 , Buf , pData->lStatus );


			if ( pData->lSCorpID != 0 )
			{
				COleDateTime t(pData->tExpTime);
				if ( t.GetStatus()==COleDateTime::valid )
				{
					if ( COleDateTime(pData->tExpTime) - COleDateTime(pData->tSendTime) > BBS_PROCESS_TIMEOUT )
					{
						m_wndList.SetItemText(0,1,_T("已处理(过期)"));
					}
					else
					{
						m_wndList.SetItemText(0,1,_T("已处理"));
					}
				}
				else
				{
					if ( COleDateTime::GetCurrentTime() - COleDateTime(pData->tSendTime) > BBS_PROCESS_TIMEOUT )
					{
						m_wndList.SetItemText(0,1,_T("未处理(过期)"));
					}
					else
					{
						m_wndList.SetItemText(0,1,_T("未处理"));
					}
				}
			}
			else
			{
				m_wndList.SetItemText(0,1,_T("--"));
			}

			if ( pData->lSCorpID == 0 )
				_tcscpy(Buf, _T("管理员"));
			else
				if ( pData->lSCorpID == -1 )
					_stprintf(Buf, _T("所有"));
				else
					_stprintf(Buf, _T("%s->%s") , pData->szSCorpName,pData->szSLoginName);
			m_wndList.SetItemText(0,2,Buf);

			if ( pData->lRCorpID == 0 )
				_tcscpy(Buf, _T("管理员"));
			else
				if ( pData->lRCorpID == -1 )
					_stprintf(Buf, _T("所有"));
				else
					_stprintf(Buf, _T("%d->%d") , pData->lRCorpID,pData->lRUserID);

			m_wndList.SetItemText(0,3,Buf);


			_stprintf(Buf, _T("%04d.%02d.%02d") , pData->tSendTime.wYear,pData->tSendTime.wMonth,pData->tSendTime.wDay);
			m_wndList.SetItemText(0,4,Buf);

			m_wndList.SetItemText(0,5,pData->szType);
			m_wndList.SetItemText(0,6,pData->szBZ);


			ANS_Msg_SeeData * pData2 = new ANS_Msg_SeeData;
			pData2->lBBSID = pData->lBBSID;
			pData2->lStatus = pData->lStatus;
			pData2->tSendTime = pData->tSendTime;
			pData2->tExpTime = pData->tExpTime;
			pData2->lSCorpID = pData->lSCorpID;
			pData2->lSUserID = pData->lSUserID;
			_tcscpy(pData2->szSCorpName , pData->szSCorpName );
			_tcscpy(pData2->szSLoginName , pData->szSLoginName );
			pData2->lRCorpID = pData->lRCorpID;
			pData2->lRUserID = pData->lRUserID;
			_tcscpy(pData2->szType , pData->szType );
			_tcscpy(pData2->szName , pData->szName );
			_tcscpy(pData2->szTel , pData->szTel );
			_tcscpy(pData2->szEmail , pData->szEmail );
			_tcscpy(pData2->szBZ , pData->szBZ );

			POSITION pos = m_BBS.AddTail( pData2 );
			m_wndList.SetItemData(0, (DWORD)pos );
		}
		return true;
	}
	return true;
}

long CK_BBSU::GetCurrentSelected()
{
	POSITION pos = m_wndList.GetFirstSelectedItemPosition();
	if ( pos )
	{
		return m_wndList.GetNextSelectedItem(pos);
	}
	return -1;
}

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

	//取得共用参数
	//CMainFrame * pFrame = static_cast <CMainFrame *>((CMainFrame *)AfxGetMainWnd());
	this->GetParent()->GetParentFrame();
	m_pMainFrame = (CMainFrame *)this->GetParent()->GetParentFrame();
	m_pSocket    = &m_pMainFrame->m_Socket;

	//初始化List
	m_Image.Create(16,16,ILC_COLOR16|ILC_MASK,5,5);
	m_Image.Add(AfxGetApp()->LoadIcon(IDI_L_BBS) );
	m_Image.Add(AfxGetApp()->LoadIcon(IDI_L_LOCK) );
	m_wndList.SubClassWindow2();
	m_wndList.SetHeadings(_T("序号,50; 状态,100;    发送人,250;   接收人,250;发送时间,90; 类型,90;     内容,800"));
	m_wndList.SetGridLines(true);
	m_wndList.SetImageList(&m_Image,LVSIL_SMALL);

	m_bInit = true;	
	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CK_BBSU::OnSize(UINT nType, int cx, int cy) 
{
	CDialog::OnSize(nType, cx, cy);
	
	if ( m_bInit )
	{
		m_wndList.MoveWindow( 0 , 0 , cx,cy);
	}
	
}

void CK_BBSU::OnDblclkBbsList(NMHDR* pNMHDR, LRESULT* pResult) 
{
	*pResult = 0;

	On_BBS_See();
}

void CK_BBSU::OnRclickBbsList(NMHDR* pNMHDR, LRESULT* pResult) 
{
	*pResult = 0;

	ShowRMenu();
}

void CK_BBSU::OnKeydownBbsList(NMHDR* pNMHDR, LRESULT* pResult) 
{
	LV_KEYDOWN* pLVKeyDow = (LV_KEYDOWN*)pNMHDR;
	// TODO: Add your control notification handler code here
	
	*pResult = 0;
}

void CK_BBSU::SetLockItem(long lItem, BOOL bLock)
{
	if ( bLock )
		m_wndList.SetIconIndex( lItem , 1 );
	else
		m_wndList.SetIconIndex( lItem , 0 );
}

BOOL CK_BBSU::isLockItem(long lItem, BOOL bShowWarning)
{
	BOOL b = (m_wndList.GetIconIndex(lItem) == 1);
	if ( b && bShowWarning )
	{
		MessageBox( _T("正录被锁定，请等待服务器返回后再操作!") , _T("锁定中") , MB_ICONINFORMATION );
	}
	return b;
}

void CK_BBSU::ShowRMenu()
{
	if (!m_pMainFrame->GetUserPurview(PURVIEW_FILT,false))  //没有查看权限
		return ;

	CMenu menu;
	menu.CreatePopupMenu();
	BOOL bLock = false;
	long lItem = this->GetCurrentSelected();
	if ( lItem >= 0 )
		bLock = isLockItem( lItem , false );   //取得是否正在锁定

	if ( lItem >=0 && !bLock)
	{
		menu.AppendMenu(MF_STRING     , MENU_BBS_SEE, _T(" 查 看 ") );
		menu.AppendMenu(MF_STRING     , MENU_BBS_REMSG, _T(" 回复消息 ") );
	}
	else
	{
		menu.AppendMenu(MF_STRING|MF_DISABLED|MF_GRAYED     , MENU_BBS_SEE, _T(" 查 看 ") );
		menu.AppendMenu(MF_STRING|MF_DISABLED|MF_GRAYED     , MENU_BBS_REMSG, _T(" 回复消息 ") );
	}

	menu.AppendMenu(MF_SEPARATOR );
	menu.AppendMenu(MF_STRING     , MENU_BBS_REFRESH, _T(" 刷 新 ") );
	//显示菜单
	POINT pt ;
	::GetCursorPos( &pt );
	//this->ClientToScreen( &pt);
	menu.TrackPopupMenu(TPM_LEFTBUTTON | TPM_RIGHTBUTTON,pt.x,pt.y, this, NULL);
	menu.DestroyMenu();
}

void CK_BBSU::On_BBS_ReMsg()
{
	long lItem = GetCurrentSelected();
	if ( lItem < 0 )
		return ;

	POSITION pos = (POSITION)m_wndList.GetItemData(lItem);
	POSITION pos2 = pos;
	ANS_Msg_SeeData * pData = m_BBS.GetNext( pos );
	if (pData)
	{
		ANS_BBS_SeeData See={0};
		See.lBBSID   = pData->lBBSID;
		See.lSCorpID = 0;  //管理员发的
		See.lSUserID = m_pMainFrame->m_lUserID;  //管理员ID
		_tcscpy(See.szSCorpName,_T("管理员"));
		_tcscpy(See.szSLoginName , m_pMainFrame->m_Setup.szUser );
		See.lRCorpID = pData->lSCorpID;
		See.lRUserID = pData->lSUserID;
		DLG_BBS_Send dlg(this);
		dlg.SetParam( See);
		if ( dlg.DoModal() == IDOK )
		{
			long lSize = sizeof(REQ_BBS_Send)+sizeof(ANS_BBS_SeeData);
			BYTE * pModifyData = new BYTE[lSize];memset(pModifyData,0,lSize);
			REQ_BBS_Send * pModify = (REQ_BBS_Send *)pModifyData;   //头
			ANS_BBS_SeeData * pSPData = (ANS_BBS_SeeData *)(pModifyData+sizeof(REQ_BBS_Send));
			*pSPData = dlg.GetParam();
			pModify->lItem  = lItem;
			pModify->lCount = 1;
			m_pMainFrame->SendFrame( SMSFUNC_BBS_SEND , pModifyData , lSize );
		}
	}
}
void CK_BBSU::On_BBS_See()
{
	long lItem = GetCurrentSelected();
	if ( lItem <0 )
		return ;

	DLG_Msg_See dlg(this);
	dlg.SetParam(true);

	dlg.m_strSender= m_wndList.GetItemText(lItem,2);
	dlg.m_strRecver= m_wndList.GetItemText(lItem,3);
	dlg.m_strSendTime  = m_wndList.GetItemText(lItem,4);
	dlg.m_strType  = m_wndList.GetItemText(lItem,5);
	dlg.m_strMsg   = m_wndList.GetItemText(lItem,6);

	dlg.DoModal();
}

void CK_BBSU::On_BBS_Refresh()
{
	this->RefreshInfo();
}