backupdlg.cpp

1采用了tcp通信。 2实现自由选择主辅库。 backup:数据库监视备份软件(backup.exe,backup.ini,backup.log,sendclient.log)

// backupDlg.cpp : implementation file
//

#include "stdafx.h"
#include "backup.h"
#include "backupDlg.h"
#include "sendsock.h"
#include "choosemain.h"
#include "listensock.h"

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

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

class CAboutDlg : public CDialog
{
public:
	CAboutDlg();
	
	// Dialog Data
	//{{AFX_DATA(CAboutDlg)
	enum { IDD = IDD_ABOUTBOX };
	//}}AFX_DATA
	
	// ClassWizard generated virtual function overrides
	//{{AFX_VIRTUAL(CAboutDlg)
protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
	//}}AFX_VIRTUAL
	
	// Implementation
protected:
	//{{AFX_MSG(CAboutDlg)
	//}}AFX_MSG
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
	//{{AFX_DATA_INIT(CAboutDlg)
	//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CAboutDlg)
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
//{{AFX_MSG_MAP(CAboutDlg)
// No message handlers
//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CBackupDlg dialog

CBackupDlg::CBackupDlg(CWnd* pParent /*=NULL*/)
: CDialog(CBackupDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CBackupDlg)
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDI_STOP);
	m_status = 0;
	m_laststatus = 0;
	m_sendindex = 0;
}
CBackupDlg::~CBackupDlg()
{
	delete m_ListenSock;
	m_ListenSock = NULL;
	delete m_MainBase;
	m_MainBase =NULL;
	delete m_BackupBase;
	m_BackupBase = NULL;
    
	CSendSock * tempsock;
	POSITION pt = m_sendsock.GetStartPosition ();
	int index;
	while(pt)
	{
		m_sendsock.GetNextAssoc(pt,index,tempsock);
		tempsock ->Close ();
		delete tempsock;
	}
	m_sendsock.RemoveAll ();
}
void CBackupDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CBackupDlg)
	DDX_Control(pDX, IDC_DIRECTION, m_direction);
	DDX_Control(pDX, IDC_MAINSERVER, m_main);
	DDX_Control(pDX, IDC_BACKUPSERVER, m_backup);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CBackupDlg, CDialog)
//{{AFX_MSG_MAP(CBackupDlg)
ON_WM_SYSCOMMAND()
ON_WM_PAINT()
ON_WM_QUERYDRAGICON()
ON_BN_CLICKED(IDC_DO, OnDo)
ON_WM_TIMER()
ON_BN_CLICKED(IDC_CLEAR, OnClear)
ON_BN_CLICKED(IDC_CHOOSE, OnChoose)
ON_BN_CLICKED(IDC_CONNECT, OnConnect)
ON_BN_CLICKED(IDC_DOCHANGE, OnDochange)
//}}AFX_MSG_MAP
ON_MESSAGE(WM_SOCKET_MESSAGE, OnSocketMessae)

END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CBackupDlg message handlers

BOOL CBackupDlg::OnInitDialog()
{
	CDialog::OnInitDialog();
	
	// Add "About..." menu item to system menu.
	
	// IDM_ABOUTBOX must be in the system command range.
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);
	
	CMenu* pSysMenu = GetSystemMenu(FALSE);
	if (pSysMenu != NULL)
	{
		CString strAboutMenu;
		strAboutMenu.LoadString(IDS_ABOUTBOX);
		if (!strAboutMenu.IsEmpty())
		{
			pSysMenu->AppendMenu(MF_SEPARATOR);
			pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
		}
	}
	
	// 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
	
	GetDlgItem(IDCANCEL)->SetFocus();
	if (!AfxSocketInit())
	{
		//	AfxMessageBox(IDP_SOCKETS_INIT_FAILED);
		return FALSE;
	}
	
	// TODO: Add extra initialization here
    //1.得到系统的路径
	char filename[80];
	GetModuleFileName(NULL,filename,80);
	m_curpath = CString(filename);
	m_curpath.FreeExtra();
	int pos;
	pos = m_curpath.ReverseFind ('\\');
	pos = m_curpath.Delete(pos + 1,m_curpath.GetLength () - pos - 1);
	m_log = m_curpath + "backup.log";
	m_ini = m_curpath + "backup.ini";
	m_sendlog = m_curpath +"sendclient.log";
    m_datapath = m_curpath;
    //2.得到配置文件的所有内容
	m_MainBase = new DATABASE;
	m_BackupBase = new DATABASE;
    initconfig();
    //3.启动侦听sock
	m_ListenSock = new CListenSock(this);
	if(!m_ListenSock->InitListen (m_port))
	{
		AfxMessageBox("can not listen");
		delete m_ListenSock;
		m_ListenSock = NULL;
	}
    //4.状态4变量的初始化
	m_CurMain = 0; //初始化
    m_CurChoose  = 0;
	m_status = 0;
	m_check = 0;
	return TRUE;  // return TRUE  unless you set the focus to a control
}

void CBackupDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
	{
		CAboutDlg dlgAbout;
		dlgAbout.DoModal();
	}
	else
	{
		CDialog::OnSysCommand(nID, lParam);
	}
}

// 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 CBackupDlg::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 CBackupDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}
//
//开始备份与监视服务 
//
void CBackupDlg::OnDo() 
{
	// TODO: Add your control notification handler code here
	//启动备份线性
	KillTimer(10);
    if (m_status == 2)
	{
        m_status = 7;
		SendStatus(m_CurMain,m_status);
        ShowThestatus(m_CurMain,m_CurChoose,m_status,m_check);
		if(dumploaddatabase())
		{
			m_status = 4;
            SendStatus(m_CurMain,m_status);
			SetTimer(1,m_interval,NULL);   
		}
	}
	else
	{
		m_status = 3;
		SendStatus(m_CurMain,m_status);
	}
	
	SetTimer(10,m_checkinterval,NULL); 
    ShowThestatus(m_CurMain,m_CurChoose,m_status,m_check);
	
}
void CBackupDlg::initconfig()
{
	CFile logfile;
	TRY
	{
		logfile.Remove (m_log);
	}
	CATCH( CFileException, e )
	{
		
	}
	END_CATCH
		TRY
	{
        logfile.Remove (m_sendlog);
	}
	CATCH( CFileException, e )
	{
		
	}
	END_CATCH
		
	char tempstring[1024];
	GetPrivateProfileString("Adatabase","DSN","NULL",tempstring,1024,m_ini);
    m_MainBase->m_DSN = CString(tempstring) ;
    m_MainBase->m_DSN.FreeExtra ();
	
	GetPrivateProfileString("Adatabase","database","NULL",tempstring,1024,m_ini);
    CString basename = CString(tempstring) ;
    basename.FreeExtra ();
	int index = basename.Find (";");
	while (index!= -1)
	{   
		CString onebase;
        onebase = basename.Left (index);
        basename.Delete (0,index +1 );
		m_database.AddTail(onebase);
		index = basename.Find (";");
	}
 //  m_database.AddTail (basename);
	
	GetPrivateProfileString("Adatabase","user","NULL",tempstring,1024,m_ini);
    m_MainBase->m_user = CString(tempstring) ;
    m_MainBase->m_user.FreeExtra ();
	
	GetPrivateProfileString("Adatabase","password","NULL",tempstring,1024,m_ini);
    m_MainBase->m_password = CString(tempstring) ;
	m_MainBase->m_password.FreeExtra ();
	
	GetPrivateProfileString("Adatabase","BackupServer","NULL",tempstring,1024,m_ini);
    m_MainBase->m_backupserver = CString(tempstring) ;
	m_MainBase->m_backupserver.FreeExtra ();
	m_BackupBase->m_backupserver = m_MainBase->m_backupserver;
	
	GetPrivateProfileString("Bdatabase","DSN","NULL",tempstring,1024,m_ini);
    m_BackupBase->m_DSN = CString(tempstring) ;
    m_BackupBase->m_DSN.FreeExtra ();
	
	
	GetPrivateProfileString("Bdatabase","user","NULL",tempstring,1024,m_ini);
    m_BackupBase->m_user = CString(tempstring) ;
    m_BackupBase->m_user.FreeExtra ();
	
	GetPrivateProfileString("Bdatabase","password","NULL",tempstring,1024,m_ini);
    m_BackupBase->m_password = CString(tempstring) ;
    m_BackupBase->m_password.FreeExtra ();
	
	
	GetPrivateProfileString("config","Interval","NULL",tempstring,1024,m_ini);
    m_interval = atol(CString(tempstring)) ;
	
	GetPrivateProfileString("config","checkinerval","NULL",tempstring,1024,m_ini);
    m_checkinterval = atol(CString(tempstring)) ;
	
	GetPrivateProfileString("config","teststring","NULL",tempstring,1024,m_ini);
    m_teststring = CString(tempstring) ;
	m_teststring.FreeExtra ();
	
	GetPrivateProfileString("config","tcp_port","NULL",tempstring,1024,m_ini);
    m_port = atol(CString(tempstring)) ;
	
	
}
//
//连接主辅数据库并汇报连接情况.并可能自动转换主辅库
//返回 m_status,0,1,2
void CBackupDlg::connect()
{
	BOOL ret ,ret1;
	ret= ret1 = true;
    CString  pconnect;
	if (!m_MainBase->m_Cdatabase->IsOpen ())
	{
		pconnect ="ODBC;UID=user;PWD=password";
		pconnect.Replace ("user",m_MainBase->m_user);
		pconnect.Replace ("password",m_MainBase->m_password);
		TRY
		{
			ret =m_MainBase->m_Cdatabase->Open(m_MainBase->m_DSN,false,false,pconnect);
		}
		CATCH(CDBException,e)
		{
			ret = false;
		}
		END_CATCH
	}
	if(!m_BackupBase->m_Cdatabase->IsOpen ())
	{
		pconnect = "ODBC;UID=user;PWD=password";
		pconnect.Replace ("user",m_BackupBase->m_user);
		pconnect.Replace ("password",m_BackupBase->m_password);
		TRY
		{
			ret1 = m_BackupBase->m_Cdatabase->Open(m_BackupBase->m_DSN,false,false,pconnect);
		}
		CATCH(CDBException,e)
		{
			ret1 = false;
		}
		END_CATCH
	}
    m_MainBase->m_Cdatabase->SetQueryTimeout(120);
    m_BackupBase->m_Cdatabase->SetQueryTimeout(120);
	//恢复数据库
	POSITION pt;
	CString basename;
	pt= m_database.GetHeadPosition ();
	CTime nowtime = CTime::GetCurrentTime ();
	while(pt)
	{
		m_sqlstring = "online database  " + m_database.GetNext (pt);
		TRY
		{
			m_BackupBase->m_Cdatabase->ExecuteSQL (m_sqlstring);
		}
		CATCH(CDBException,e)
		{
			WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S恢复辅数据库工作"),"失败",m_log);
			return ;
		}
		END_CATCH
	}
	WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S恢复辅数据库工作"),"成功",m_log);


	if((ret)&&(ret1))//主库正常,辅库正常但未开始备份工作
		m_status = 2;
	if((!ret)&&(ret1))//主库断开,辅库工作;
	{
		m_status = 1; 
		ChangeServer();
	}
	if((!ret)&&(!ret1))//0 主库断开,辅库断开;
		m_status = 0;
	if((ret)&&(!ret1))//1 主库正常,辅库断开;
		m_status = 1; 
	
	 nowtime =CTime::GetCurrentTime ();
	
	
	if (!ret)
	{   
        WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S连接主服务器"),"失败",m_log);
	}
	if (!ret1)
	{
        WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S连接辅服务器"),"失败",m_log);
	}
}
//
//主库导出到文件并导入数据到辅库(第一次备份).
//
BOOL CBackupDlg::dumploaddatabase()
{
	CTime nowtime =CTime::GetCurrentTime ();
	POSITION pt;
	CString basename;
	pt= m_database.GetHeadPosition ();
	while(pt)
	{
		m_sqlstring = "dump database ";
		basename = m_database.GetNext(pt);
       	m_sqlstring += basename;
		m_sqlstring += " to \"";
		m_sqlstring += m_datapath;
        m_sqlstring += basename;
		m_sqlstring += ".bak\"";
		m_sqlstring +=" at ";
		m_sqlstring += m_MainBase->m_backupserver;
		TRY
		{
			m_MainBase->m_Cdatabase->ExecuteSQL (m_sqlstring);
		}
		CATCH(CDBException,e)
		{   
			WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S导出数据库"),"失败",m_log);
			return false;
		}
		END_CATCH
			
			m_sqlstring = "load database ";
		m_sqlstring += basename;
		m_sqlstring += " from \"";
		m_sqlstring += m_datapath;
		m_sqlstring += basename;
		m_sqlstring += ".bak\"";
		m_sqlstring +=" at ";
		m_sqlstring += m_BackupBase->m_backupserver;
		
		TRY
		{
			m_BackupBase->m_Cdatabase->ExecuteSQL (m_sqlstring);
		}
		
		CATCH(CDBException,e)
		{
			WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S导入数据库"),"失败",m_log);
			return false;
		}
		END_CATCH
			
	}
	WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S导出-导入数据库"),"成功",m_log);
	return true;
}
//
//导出并导入事务(定时)
//
BOOL CBackupDlg::dumploadtransaction()
{
	POSITION pt;
    CString basename;
	pt= m_database.GetHeadPosition ();
	CTime nowtime = CTime::GetCurrentTime ();
	while(pt)
	{
		m_sqlstring = "dump transaction ";
		basename =m_database.GetNext(pt);
		m_sqlstring += basename ;
		m_sqlstring += " to \"";
		m_sqlstring += m_datapath;
		m_transfile =  basename + nowtime.Format ("%m-%d-%H-%M-%S.tra\"") ;
		m_sqlstring += m_transfile;
		m_sqlstring +=" at ";
		m_sqlstring += m_MainBase->m_backupserver;
		
		TRY
		{
			m_MainBase->m_Cdatabase->ExecuteSQL (m_sqlstring);
		}
		CATCH(CDBException,e)
		{
			WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S导出事务"),"失败",m_log);
			return false;
		}
		END_CATCH
			
			m_sqlstring = "load transaction ";
		m_sqlstring += basename;
		m_sqlstring += " from \"";
		m_sqlstring += m_datapath;
		m_sqlstring += m_transfile;
		m_sqlstring +=" at ";
		m_sqlstring += m_BackupBase->m_backupserver;
		
		TRY
		{
			m_BackupBase->m_Cdatabase->ExecuteSQL (m_sqlstring);
		}
		CATCH(CDBException,e)
		{
			
			WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S导入事务"),m_sqlstring,m_log);
			return false;
		}
		END_CATCH
			
	}
	WritePrivateProfileString("result",nowtime.Format ("%Y年%m月%d日%H:%M:%S导出--导入事务"),"成功",m_log);
	return true;
}
//
//定时备份,监视
//
void CBackupDlg::OnTimer(UINT nIDEvent) 
{
	// TODO: Add your message handler code here and/or call default
	if(nIDEvent == 1)//定时备份
	{
		KillTimer(1);
		if(dumploadtransaction())//导出并导入事务
			SetTimer(1,m_interval,NULL);
		else
		{	
			m_status = 3;
            SendStatus(m_CurMain,m_status);
            ShowThestatus(m_CurMain,m_CurChoose,m_status,m_check);
		}
	}
	else if(nIDEvent == 10)//定时检查主/辅数据库.
	{   //得到数据库状态
		GetDataBaseStatus(m_status);