ideview.cpp

一个非常好的词法分析程序,加上语法的分析是一个难得一见的好实例

// IDEView.cpp : implementation of the CIDEView class
//

#include "stdafx.h"
#include "IDE.h"
#include "MainFrm.h"

#include "IDEDoc.h"
#include "IDEView.h"

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

/////////////////////////////////////////////////////////////////////////////
// CIDEView

IMPLEMENT_DYNCREATE(CIDEView, CEditView)

BEGIN_MESSAGE_MAP(CIDEView, CEditView)
	//{{AFX_MSG_MAP(CIDEView)
	ON_COMMAND(IDM_START, OnStart)
	ON_COMMAND(IDM_SET, OnSet)
	ON_CONTROL_REFLECT(EN_CHANGE, OnChange)
	ON_WM_PAINT()
	ON_WM_KEYDOWN()
	ON_WM_KEYUP()
	ON_WM_LBUTTONDOWN()
	ON_WM_LBUTTONUP()
	ON_WM_LBUTTONDBLCLK()
	ON_WM_MOUSEMOVE()
	ON_WM_RBUTTONUP()
	ON_COMMAND(IDM_SELALL, OnSelall)
	ON_WM_CAPTURECHANGED()
	ON_COMMAND(IDM_CLEAN, OnClean)
	ON_COMMAND(IDM_FONT, OnFont)
	//}}AFX_MSG_MAP
	// Standard printing commands
	ON_COMMAND(ID_FILE_PRINT, CEditView::OnFilePrint)
	ON_COMMAND(ID_FILE_PRINT_DIRECT, CEditView::OnFilePrint)
	ON_COMMAND(ID_FILE_PRINT_PREVIEW, CEditView::OnFilePrintPreview)
	ON_MESSAGE(MSG_PAINTLEFT,OnPaintLeft)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CIDEView construction/destruction

DWORD WINAPI CompileThread(LPVOID pParam)
{
	CIDEView *pView=(CIDEView*)pParam;

	pView->GetCompileResult();

	return 0;
}

CIDEView::CIDEView()
{
	// TODO: add construction code here
	m_pMainFrame=0;
	m_pwndStatusBar=0;
	m_strCompileProgName="PL.exe";

	m_nCurLn=0;
	m_nCurCol=0;
}

CIDEView::~CIDEView()
{
}

BOOL CIDEView::PreCreateWindow(CREATESTRUCT& cs)
{
	// TODO: Modify the Window class or styles here by modifying
	//  the CREATESTRUCT cs

	BOOL bPreCreated = CEditView::PreCreateWindow(cs);
	cs.style &= ~(ES_AUTOHSCROLL|WS_HSCROLL);	// Enable word-wrapping

	return bPreCreated;
}

/////////////////////////////////////////////////////////////////////////////
// CIDEView drawing

void CIDEView::OnDraw(CDC* pDC)
{
	CIDEDoc* pDoc = GetDocument();
	ASSERT_VALID(pDoc);
	// TODO: add draw code for native data here
}

/////////////////////////////////////////////////////////////////////////////
// CIDEView printing

BOOL CIDEView::OnPreparePrinting(CPrintInfo* pInfo)
{
	// default CEditView preparation
	return CEditView::OnPreparePrinting(pInfo);
}

void CIDEView::OnBeginPrinting(CDC* pDC, CPrintInfo* pInfo)
{
	// Default CEditView begin printing.
	CEditView::OnBeginPrinting(pDC, pInfo);
}

void CIDEView::OnEndPrinting(CDC* pDC, CPrintInfo* pInfo)
{
	// Default CEditView end printing
	CEditView::OnEndPrinting(pDC, pInfo);
}

/////////////////////////////////////////////////////////////////////////////
// CIDEView diagnostics

#ifdef _DEBUG
void CIDEView::AssertValid() const
{
	CEditView::AssertValid();
}

void CIDEView::Dump(CDumpContext& dc) const
{
	CEditView::Dump(dc);
}

CIDEDoc* CIDEView::GetDocument() // non-debug version is inline
{
	ASSERT(m_pDocument->IsKindOf(RUNTIME_CLASS(CIDEDoc)));
	return (CIDEDoc*)m_pDocument;
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CIDEView message handlers

void CIDEView::OnStart() 
{
	// TODO: Add your command handler code here
	DWORD dwThreadID;

	m_pMainFrame->ShowControlBar(m_pwndOutBar,1,0);
	::CreateThread(0,0,CompileThread,this,0,&dwThreadID);//创建进程
}

void CIDEView::GetCompileResult()
{
	SECURITY_ATTRIBUTES sa;
 	HANDLE hRead,hWrite;
	CString strFile;
	CString str;
	CString strOut;
	CIDEDoc *pDoc=GetDocument();

	strFile=pDoc->GetPathName();
	if(strFile=="")//该文件没有保存过
	{
		CFileDialog fileDlg(0,0,0,0,"PL/0源文件(*.pas)|*.pas|文本文件(*.txt)|*.txt|任何文件(*.*)|*.*|",this);
		
		if(fileDlg.DoModal()!=IDOK)
			return;
		
		strFile=fileDlg.GetPathName();
		if(strFile.Right(4)!=".pas")
			strFile+=".pas";
	}
	//下段这段代码在Debug版本下有错误，在Release版本下没问题,不知道为什么
	//--------------------------------------------
	pDoc->SetPathName(strFile,1);
	pDoc->SetModifiedFlag(0);
	pDoc->OnSaveDocument((LPSTR)(LPCSTR)strFile);//先保存该文件
	str=pDoc->GetTitle();
	pDoc->SetTitle(str);
	if(str.Right(1)=="*")
	{
		str=str.Left(str.GetLength()-1);
		pDoc->SetTitle(str);
	}
	UpdateWindow();
	//--------------------------------------------

	strFile=m_strCompileProgName+" "+(char)34+strFile+(char)34;
	m_pwndOutBar->SetFocus();

 	sa.nLength=sizeof(SECURITY_ATTRIBUTES);
 	sa.lpSecurityDescriptor=NULL;
 	sa.bInheritHandle=TRUE;
 	if(!CreatePipe(&hRead,&hWrite,&sa,0))//创建管道进行通信
 	{
 		MessageBox("分析器不存在，请重新输入其路径","错误",MB_ICONWARNING);
		OnSet();
 		return;
 	}
 
 	STARTUPINFO si;
 	PROCESS_INFORMATION pi;
 
 	si.cb=sizeof(STARTUPINFO);
 	GetStartupInfo(&si);
 	si.hStdError=hWrite;
 	si.hStdOutput=hWrite;
 	si.wShowWindow=SW_HIDE;
 	si.dwFlags=STARTF_USESHOWWINDOW | STARTF_USESTDHANDLES;
	//创建进程启动分析核心程序
 	if(!CreateProcess(NULL,(LPSTR)(LPCTSTR)strFile,NULL,NULL,TRUE,NULL,NULL,NULL,&si,&pi))
 	{
 		MessageBox("分析器不存在，请重新输入其路径","错误",MB_ICONWARNING);
		OnSet();
 		return;
 	}
 	CloseHandle(hWrite);
 	
 	char buffer[4096]={0};
 	DWORD bytesRead;
 
 	while(true)
 	{
 		if(!ReadFile(hRead,buffer,4095,&bytesRead,NULL))
 			break;
 		strOut+=buffer;
		m_pwndOutBar->SetColorRichEditText(strOut);
		m_pwndOutBar->GetRichEditCtrl()->PostMessage(WM_VSCROLL,SB_BOTTOM,0);
 		Sleep(500);
 	}

	//-----------读取分析结果并显示-----------
	CString strLeft,strRight;
	int nPos;

	str=m_pIDEDoc->GetPathName();
	nPos=str.ReverseFind('\\');
	strLeft=str.Left(nPos+1);
	strRight=str.Right(str.GetLength()-nPos-1);
	if(strRight.Right(4)==".pas")
		str=strLeft+strRight.Left(strRight.GetLength()-4)+"_LexAnanlysisResult.dat";
	else
		str=strLeft+strRight+"_LexAnanlysisResult.dat";

	if(GetFileAttributes(str)!=-1)
	{
		CFile file(str,CFile::modeRead);
		LEXPROPERTYVS lpvTemp;
		int nSize=sizeof(LEXPROPERTYVS)-sizeof(char*);
		int nCount=file.GetLength()/nSize;
		
		m_vectorSymbol.clear();
		for(int i=0;i<nCount;i++)
		{
			file.Read((char*)&lpvTemp,nSize);
			m_vectorSymbol.push_back(lpvTemp);
		}
	}

	DisplayCodeInfo();//显示分析结果
	//----------------------------------------
}

void CIDEView::OnInitialUpdate() 
{
	CEditView::OnInitialUpdate();
	
	// TODO: Add your specialized code here and/or call the base class
	m_pMainFrame=(CMainFrame*)::AfxGetApp()->m_pMainWnd;
	m_pwndOutBar=m_pMainFrame->GetOutBar();
	m_pwndWorkSpaceBar=m_pMainFrame->GetWorkSapceBar();
	m_pTreeCtrl=m_pwndWorkSpaceBar->GetTreeCtrl();
	m_pwndStatusBar=m_pMainFrame->GetStatusBar();
	m_pEdit=&GetEditCtrl();
	m_pIDEDoc=GetDocument();

	//-----------设置自动换行-----------
	m_pEdit->ShowScrollBar(SB_BOTH,1);
	AfxGetApp()->WriteProfileInt(_T("Editor Settings"),_T("Auto Return"),1);
	//----------------------------------

	//-----------设置字体-----------
	CFont *pFont=CFont::FromHandle((HFONT)::GetStockObject(SYSTEM_FIXED_FONT));
	m_pEdit->SetFont(pFont);
	//------------------------------

	//------------设置编辑框的左边界------------
	SIZE size;

	GetTextExtentPoint(GetDC()->GetSafeHdc(),"A",1,&size);
	m_LineHeight=size.cy;//得到行的高度
	m_pEdit->SetMargins(m_LineHeight+6,0);
	//------------------------------------------
	
	DisplayLnCol();//在状态栏上显示行列信息
}

void CIDEView::OnFont() 
{
	// TODO: Add your command handler code here
	CFontDialog fontDlg;
	LOGFONT lf;
	CFont font;
	
	if(fontDlg.DoModal()==IDOK)
	{
		fontDlg.GetCurrentFont(&lf);
		font.CreateFontIndirect(&lf);
		m_pEdit->SetFont(&font,1);
	}
}

void CIDEView::OnSet() 
{
	// TODO: Add your command handler code here
	if(m_SetDlg.DoModal()!=IDOK)
		return;

	m_strCompileProgName=m_SetDlg.GetCompileProgName();
}