updatedlg.cpp

本人写的用于自动升级的东东

// UpdateDlg.cpp : implementation file
//

#include "stdafx.h"
#include "Update.h"
#include "UpdateDlg.h"
#include <tlhelp32.h>

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

/////////////////////////////////////////////////////////////////////////////
// CUpdateDlg dialog

CUpdateDlg::CUpdateDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CUpdateDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CUpdateDlg)
	m_strStatus = _T("点击下一步查看可用的更新");
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
	char buf[MAX_PATH];
	::GetTempPath(sizeof(buf),buf);
	m_strTempDir=buf;
	m_dwHttpRequestFlags=HSR_DOWNLOAD | INTERNET_FLAG_EXISTING_CONNECT | INTERNET_FLAG_NO_AUTO_REDIRECT; 
	//获得路径
	::GetModuleFileName(NULL,buf,sizeof(buf));
	CString str=buf;
	int m=str.ReverseFind('\\');
	m_strAppPath=str.Left(m+1);
	str.Empty();
}

void CUpdateDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CUpdateDlg)
	DDX_Control(pDX, IDC_XIAZAI, m_TEXT7);
	DDX_Control(pDX, IDC_FILELEN, m_TEXT6);
	DDX_Control(pDX, IDC_TEXT5, m_TEXT5);
	DDX_Control(pDX, IDC_TEXT4, m_TEXT4);
	DDX_Control(pDX, IDC_TEXT2, m_Text2);
	DDX_Control(pDX, IDC_TEXT1, m_Text1);
	DDX_Control(pDX, IDOK, m_buOK);
	DDX_Control(pDX, IDC_LIST_PRODUCT, m_lbProduct);
	DDX_Control(pDX, IDC_PROGRESS1, m_prog);
	DDX_Text(pDX, IDC_STATIC_STATUS, m_strStatus);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CUpdateDlg, CDialog)
	//{{AFX_MSG_MAP(CUpdateDlg)
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CUpdateDlg message handlers

BOOL CUpdateDlg::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

	char buf[128];
	::GetPrivateProfileString("Update","Main","100",buf,sizeof(buf),m_strAppPath+"\\client.ini");
	m_strVersion=buf;
	m_strVersion.Insert(1,".");
	m_cis.SetOption(INTERNET_OPTION_CONNECT_TIMEOUT,5);
	m_pHttp=m_cis.GetHttpConnection(m_strServer,m_dwPort);
	m_lbProduct.AddString(m_strSoft+"  V"+m_strVersion);
	m_strVersion.Delete(1);
	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 CUpdateDlg::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 CUpdateDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CUpdateDlg::OnOK() 
{
	CString str;
	m_buOK.GetWindowText(str);
	if(str=="更新(&U)")
	{
		Update();
		return;
	}
	else if(str=="完成(&O)")
	{
		::WritePrivateProfileString("Update","Main",m_strNewVer,m_strAppPath+"client.ini");
		ShellExecute(NULL,TEXT("open"),TEXT(m_strAppPath+"烽火棋牌.exe"),NULL,NULL,SW_NORMAL);
		CDialog::OnOK();
		return;
	}
	m_strStatus="正在连接到服务器...";
	UpdateData(FALSE);
//	CHttpFile *pFile = m_pHttp->OpenRequest(CHttpConnection::HTTP_VERB_GET, 
//			m_strIniPath, NULL, 1, NULL, NULL, m_dwHttpRequestFlags); 
	if(!GetSourceTextFile("http://fhqp.52jd.cn/update/update.mp3",m_strTempDir+"\\update.ini"))
	{
		m_strStatus="连接服务器失败！";
		UpdateData(FALSE);
		//pFile->Close();
		return;
	}
	
	m_strStatus="读取版本信息...";
	UpdateData(FALSE);
//	if(pFile)
//	{
//		CStdioFile csf;
//		csf.Open(m_strTempDir+"\\update.ini",CFile::modeCreate|CFile::modeWrite|CFile::typeBinary);
//		char buf[2048];
//		int n;
//		while((n=pFile->Read(buf,2048))>0)
//			csf.Write(buf,n);
//		csf.Close();
//		pFile->Close();
//	}
	char buf[128];
	::GetPrivateProfileString(m_strSoft,"VERSION","1.0",buf,sizeof(buf),m_strTempDir+"\\update.ini");
	m_strNewVer=buf;
	if(atof(m_strVersion)==atof(buf))//现有版本大于
	{
		m_strStatus="您现在用的版本已是最新的！";
		UpdateData(FALSE);
		m_buOK.EnableWindow(FALSE);
		return;
	}
	CString TempStr;
	TempStr=buf;
	TempStr.Insert(1,".");
	m_strStatus="发现新的版本:";
	m_strStatus+=m_strSoft+" "+TempStr;
	UpdateData(FALSE);
	m_buOK.SetWindowText("更新(&U)");
}

BOOL CUpdateDlg::DestroyWindow() 
{
	m_pHttp->Close();
	m_cis.Close();	
	return CDialog::DestroyWindow();
}

void CUpdateDlg::Update()
{
	m_buOK.EnableWindow(false);
	BeginWaitCursor();
	DWORD id=FindAppProcessID();
	if(id!=-1)
	{
		if(AfxMessageBox(m_strSoft+"已在运行！\n请先关闭程序才能进行更新！\n如果选择确定将强行关闭程序！",MB_OKCANCEL)==IDOK)
		{
			HANDLE ProcessHandle=OpenProcess(PROCESS_ALL_ACCESS,FALSE,id);
			if(ProcessHandle)TerminateProcess(ProcessHandle,0);
		}
	}

	char buf[MAX_PATH];
	for(int i=0;;i++)
	{
		CString str;
		str.Format("FILE%d",i);
		::GetPrivateProfileString(m_strSoft,str,"",buf,sizeof(buf),m_strTempDir+"\\update.ini");

		if(strlen(buf)<1)break;//退出
		if(!UpdateFile(buf))
		{
			m_buOK.SetWindowText("完成(&O)");
			EndWaitCursor();
			return;
		}
	}
	m_lbProduct.DeleteString(0);
	m_strNewVer.Insert(1,".");
	m_lbProduct.AddString(m_strSoft+"  V"+m_strNewVer);
	m_strNewVer.Delete(1);
	m_buOK.SetWindowText("完成(&O)");
	m_strStatus="完成更新！";
	UpdateData(FALSE);
	::DeleteFile(m_strTempDir+"\\update.ini");
	m_Text1.ShowWindow(SW_HIDE);
	m_Text2.ShowWindow(SW_HIDE);
	m_TEXT4.ShowWindow(SW_HIDE);
	m_TEXT5.ShowWindow(SW_HIDE);
	m_TEXT6.ShowWindow(SW_HIDE);
	m_TEXT7.ShowWindow(SW_HIDE);	
	m_buOK.EnableWindow(true);
	EndWaitCursor();
}

DWORD CUpdateDlg::FindAppProcessID()
{
	HANDLE handle=::CreateToolhelp32Snapshot(TH32CS_SNAPALL,0);
	PROCESSENTRY32 Info;
	Info.dwSize = sizeof(PROCESSENTRY32);
	if(::Process32First(handle,&Info))
	{
		do{
			CString ss=Info.szExeFile;
			if(!ss.CompareNoCase(m_strSoft+".exe"))
			{
				::CloseHandle(handle);
				return Info.th32ProcessID;
			}
		}
		while(::Process32Next(handle,&Info));	
		::CloseHandle(handle);
	}
	return -1;
}

BOOL CUpdateDlg::UpdateFile(CString strFile)
{
	m_Text1.ShowWindow(SW_SHOWNORMAL);
	m_Text2.ShowWindow(SW_SHOWNORMAL);
	m_TEXT4.ShowWindow(SW_SHOWNORMAL);
	m_TEXT5.ShowWindow(SW_SHOWNORMAL);
	CInternetSession session;
	CHttpFile* pFile = NULL;
	try
	{
		// 试着连接到指定URL
		pFile = (CHttpFile*) session.OpenURL("http://fhqp.52jd.cn/"+strFile); 
	}
	catch (CInternetException* m_pException)
	{
		// 如果有错误的话，置文件为空
		pFile = NULL; 
		m_pException->Delete();
		return FALSE;
	}

	m_strStatus="正在下载文件："+strFile;
	UpdateData(FALSE);

	CString str;
	if(pFile)
	{
		pFile->QueryInfo(HTTP_QUERY_STATUS_CODE,str);
		if(str=="404")
		{
			m_strStatus=strFile+"不存在！";
			UpdateData(FALSE);
			pFile->Close();
			return FALSE;
		}
		
		pFile->QueryInfo(HTTP_QUERY_CONTENT_LENGTH,str);
		SetDlgItemText(IDC_FILELEN,str);
		DWORD dwLen=atol(str);
		int n=strFile.Find('/');
	//	str=m_strAppPath+strFile.Right(strFile.GetLength()-n-1);
		strFile=strFile.Right(strFile.GetLength()-n-1);
		int m=strFile.ReverseFind('/');
		if(m!=0)
		{
			CString Direct;
			Direct=strFile.Left(m);
			CreateDirectory(m_strAppPath+Direct,NULL);
			str=strFile.Left(m)+"\\"+strFile.Right(strFile.GetLength()-m-1);
		}
		str=m_strAppPath+strFile;
		CStdioFile csf;
		if(!csf.Open(str+".nic",CFile::modeCreate|CFile::modeWrite | CFile::typeBinary | CFile::shareDenyWrite))
		{//先为*.nic文件
			AfxMessageBox("写文件"+str+"错误！\n文件正在使用中，请先关闭程序！",MB_ICONSTOP);
			pFile->Close();
			return FALSE;
		}
		
		char buf[2048];
		DWORD dwRead=0;
		while((n=pFile->Read(buf,sizeof(buf)))>0)
		{
			dwRead+=n;
			SetDlgItemInt(IDC_XIAZAI,dwRead);
			m_prog.SetPos(100*dwRead/dwLen);
			MSG msg;
			for(int i=0;i<10;i++)
			{
				if(PeekMessage(&msg,NULL,0,0,PM_REMOVE))
				{
					TranslateMessage(&msg);
					DispatchMessage(&msg);
				}
			}
			csf.Write(buf,n);
		}
		pFile->Close();
	}

	if(::DeleteFile(str)){
		::rename(str+".nic",str);
		m_strStatus=strFile+"完成更新!";
		UpdateData(FALSE);
	}
	::rename(str+".nic",str);
//	m_Text1.ShowWindow(SW_HIDE);
//	m_Text2.ShowWindow(SW_HIDE);
	return TRUE;
}

//获取配置文件
BOOL CUpdateDlg::GetSourceTextFile(CString theUrl,CString Filename) 
{
 CInternetSession session;
 CInternetFile* file = NULL;
 try
 {
    // 试着连接到指定URL
    file = (CInternetFile*) session.OpenURL(theUrl); 
 }
 catch (CInternetException* m_pException)
 {
    // 如果有错误的话，置文件为空
    file = NULL; 
    m_pException->Delete();
    return FALSE;
 }

 // 用dataStore来保存读取的文件
 CStdioFile dataStore;

 if (file)
 {
    CString  somecode;							//也可采用LPTSTR类型，将不会删除文本中的\n回车符

	BOOL bIsOk = dataStore.Open(Filename,
		CFile::modeCreate 
		| CFile::modeWrite 
		| CFile::shareDenyWrite 
		| CFile::typeText);
	
	if (!bIsOk)
		return FALSE;
	
	// 读写文件，直到为空
	while (file->ReadString(somecode) != NULL) //如果采用LPTSTR类型，读取最大个数nMax置0，使它遇空字符时结束
	{
		dataStore.WriteString(somecode);
		dataStore.WriteString("\n");		   //如果somecode采用LPTSTR类型,可不用此句
	}
	
	file->Close();
	delete file;
 }
 else
 {
    dataStore.WriteString(_T("到指定服务器的连接建立失败..."));	
    return FALSE;
 }

 return TRUE;
}