开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 多国语言处理 > 词法分析 > 查看源码
byDlg.cpp
资源名称：非常经典的词法分析器.rar　[点击查看]
上传用户：qdzhkyjx
上传日期：2013-04-04
资源大小：43k
文件大小：10k
源码类别：

词法分析

开发平台：

Visual C++

byDlg.cpp：源码内容
  1. // byDlg.cpp : implementation file
  2. //
  4. #include "stdafx.h"
  5. #include "by.h"
  6. #include "byDlg.h"
  8. #ifdef _DEBUG
  9. #define new DEBUG_NEW
  10. #undef THIS_FILE
  11. static char THIS_FILE[] = __FILE__;
  12. #endif
  14. /////////////////////////////////////////////////////////////////////////////
  15. // CAboutDlg dialog used for App About
  17. char  ch =' '; // 存放读入当前的输入字符
  18. int lineno;
  20. struct reserve  //关键字
  21. {
  22. char lexptr[MAXBUF];
  23. int token;
  24. };
  26. struct reserve symtable[MAX];
  27. char * str[]={"program","input","output","begin","end","var","integer","real","for","to","if","then","else","do","while","write","array","proceure" };
  31. class CAboutDlg : public CDialog
  32. {
  33. public:
  34. CAboutDlg();
  36. // Dialog Data
  37. //{{AFX_DATA(CAboutDlg)
  38. enum { IDD = IDD_ABOUTBOX };
  39. //}}AFX_DATA
  41. // ClassWizard generated virtual function overrides
  42. //{{AFX_VIRTUAL(CAboutDlg)
  43. protected:
  44. virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
  45. //}}AFX_VIRTUAL
  47. // Implementation
  48. protected:
  49. //{{AFX_MSG(CAboutDlg)
  50. //}}AFX_MSG
  51. DECLARE_MESSAGE_MAP()
  52. };
  54. CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
  55. {
  56. //{{AFX_DATA_INIT(CAboutDlg)
  57. //}}AFX_DATA_INIT
  58. }
  60. void CAboutDlg::DoDataExchange(CDataExchange* pDX)
  61. {
  62. CDialog::DoDataExchange(pDX);
  63. //{{AFX_DATA_MAP(CAboutDlg)
  64. //}}AFX_DATA_MAP
  65. }
  67. BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
  68. //{{AFX_MSG_MAP(CAboutDlg)
  69. // No message handlers
  70. //}}AFX_MSG_MAP
  71. END_MESSAGE_MAP()
  73. /////////////////////////////////////////////////////////////////////////////
  74. // CByDlg dialog
  76. CByDlg::CByDlg(CWnd* pParent /*=NULL*/)
  77. : CDialog(CByDlg::IDD, pParent)
  78. {
  79. //{{AFX_DATA_INIT(CByDlg)
  80. // NOTE: the ClassWizard will add member initialization here
  81. //}}AFX_DATA_INIT
  82. // Note that LoadIcon does not require a subsequent DestroyIcon in Win32
  83. m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
  84. }
  86. void CByDlg::DoDataExchange(CDataExchange* pDX)
  87. {
  88. CDialog::DoDataExchange(pDX);
  89. //{{AFX_DATA_MAP(CByDlg)
  90. DDX_Control(pDX, IDC_STATIC1, m_me);
  91. //}}AFX_DATA_MAP
  92. }
  94. BEGIN_MESSAGE_MAP(CByDlg, CDialog)
  95. //{{AFX_MSG_MAP(CByDlg)
  96. ON_WM_SYSCOMMAND()
  97. ON_WM_PAINT()
  98. ON_WM_QUERYDRAGICON()
  99. ON_BN_CLICKED(IDC_OPEN, OnOpen)
  100. ON_BN_CLICKED(IDC_FENXI, OnFenxi)
  101. ON_BN_CLICKED(IDC_STATIC1, OnStatic1)
  102. ON_BN_CLICKED(IDC_SAVE, OnSave)
  103. //}}AFX_MSG_MAP
  104. END_MESSAGE_MAP()
  106. /////////////////////////////////////////////////////////////////////////////
  107. // CByDlg message handlers
  109. BOOL CByDlg::OnInitDialog()
  110. {
  111. CDialog::OnInitDialog();
  113. // Add "About..." menu item to system menu.
  115. // IDM_ABOUTBOX must be in the system command range.
  116. ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
  117. ASSERT(IDM_ABOUTBOX < 0xF000);
  119. CMenu* pSysMenu = GetSystemMenu(FALSE);
  120. if (pSysMenu != NULL)
  121. {
  122. CString strAboutMenu;
  123. strAboutMenu.LoadString(IDS_ABOUTBOX);
  124. if (!strAboutMenu.IsEmpty())
  125. {
  126. pSysMenu->AppendMenu(MF_SEPARATOR);
  127. pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
  128. }
  129. }
  131. // Set the icon for this dialog.  The framework does this automatically
  132. //  when the application's main window is not a dialog
  133. SetIcon(m_hIcon, TRUE); // Set big icon
  134. SetIcon(m_hIcon, FALSE); // Set small icon
  136. m_font.CreateFont(12, 0,0,0,FW_NORMAL, 0,0,0,
  137. DEFAULT_CHARSET, OUT_CHARACTER_PRECIS, CLIP_CHARACTER_PRECIS,
  138. DEFAULT_QUALITY, DEFAULT_PITCH | FF_DONTCARE, "Fixedsys");
  139. GetDlgItem(IDC_EDIT1)->SetFont(&m_font);
  140. GetDlgItem(IDC_EDIT2)->SetFont(&m_font);
  142. m_me.SetToolTipText("访问我的网站: http://www.59hao.com/chx");
  146. return TRUE;  // return TRUE  unless you set the focus to a control
  147. }
  149. void CByDlg::OnSysCommand(UINT nID, LPARAM lParam)
  150. {
  151. if ((nID & 0xFFF0) == IDM_ABOUTBOX)
  152. {
  153. CAboutDlg dlgAbout;
  154. dlgAbout.DoModal();
  155. }
  156. else
  157. {
  158. CDialog::OnSysCommand(nID, lParam);
  159. }
  160. }
  162. // If you add a minimize button to your dialog, you will need the code below
  163. //  to draw the icon.  For MFC applications using the document/view model,
  164. //  this is automatically done for you by the framework.
  166. void CByDlg::OnPaint() 
  167. {
  168. if (IsIconic())
  169. {
  170. CPaintDC dc(this); // device context for painting
  172. SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);
  174. // Center icon in client rectangle
  175. int cxIcon = GetSystemMetrics(SM_CXICON);
  176. int cyIcon = GetSystemMetrics(SM_CYICON);
  177. CRect rect;
  178. GetClientRect(&rect);
  179. int x = (rect.Width() - cxIcon + 1) / 2;
  180. int y = (rect.Height() - cyIcon + 1) / 2;
  182. // Draw the icon
  183. dc.DrawIcon(x, y, m_hIcon);
  184. }
  185. else
  186. {
  187. CDialog::OnPaint();
  188. }
  189. }
  191. // The system calls this to obtain the cursor to display while the user drags
  192. //  the minimized window.
  193. HCURSOR CByDlg::OnQueryDragIcon()
  194. {
  195. return (HCURSOR) m_hIcon;
  196. }
  198. void CByDlg::init()
  199. {
  200. for( int j=0; j<18; j++)
  201. { 
  202. strcpy(symtable[j].lexptr,str[j]);
  203. symtable[j].token=j+3;
  204. }
  206. }
  208. int CByDlg::search(char *temp)
  209. {
  211. for(int i=0; i<sizeof(symtable)/sizeof(symtable[0]); i++)
  212. {
  213. if(!strcmp(symtable[i].lexptr ,temp))
  214. {
  215. return  symtable[i].token;
  216. }
  217. }
  218. return 0;
  219. }
  221. void CByDlg::analyse(FILE *fpin, FILE *fpout)
  222. {
  223. char arr[MAXBUF];
  224. int i=0;
  225. int j=0;
  227. while((ch=fgetc(fpin))!=EOF)   //读入字符判断，空格、字母、数字、界符
  228. {
  229. if(ch==' '||ch=='t')
  230. {
  232. }
  233. else if(ch=='n') //如果是换行符，则行号加1
  234. {  
  235. lineno++;
  236. }
  237. else if(isdigit(ch)) //如果是数字
  238. { 
  239. while(isdigit(ch)) //判断和读取数字
  240. { 
  241. arr[j]=ch;
  242. j++;
  243. ch=fgetc(fpin);
  244. } 
  245. arr[j]='';
  246. j=0;
  247. fseek(fpin,-1L,SEEK_CUR);
  248. fprintf(fpout,"%st%dn",arr,2) ;
  249. }
  250. else if (isalpha(ch)) //如果是字母
  251. {
  252. while(isalpha(ch)||isdigit(ch))
  253. {
  254. arr[j]=ch;
  255. j++;
  256. ch=fgetc(fpin);
  257. }
  258. fseek(fpin,-1L,SEEK_CUR);
  259. arr[j]='';
  260. j=0;
  261. if (search(arr)) //如果是关键字
  262. {
  263. fprintf(fpout,"%st%dn",arr,search(arr));
  264. }
  265. else  
  266. fprintf(fpout,"%st%dn",arr,1); //普通标志符
  267. }
  268. else if(ch==':')  
  269. {
  270. ch=fgetc(fpin);
  271. if(ch=='=') 
  272. {
  273. fprintf(fpout,"%st%dn",":=",29);    //如果是 :=
  274. }
  275. else
  276. {
  277. fprintf(fpout,"%st%dn",":",30);   //如果是 :
  278. fseek(fpin,-1L,SEEK_CUR);
  279. }
  280. }
  281. else if (ch=='>')
  282. {
  283. ch=fgetc(fpin);
  284. if(ch=='=')    //如果是 >=
  285. {
  286. fprintf(fpout,"%st%dn",">=",32);
  287. }
  288. else
  289. {
  290. fprintf(fpout,"%st%dn",">",31);  //如果是 >
  291. fseek(fpin,-1L,SEEK_CUR);
  292. }
  293. }
  294. else if(ch=='<')
  295. { 
  296. ch=fgetc(fpin);
  297. if(ch=='>')
  298. {
  299. fprintf(fpout,"%st%dn","<>",35);  // 如果是 <>
  300. }
  301. else if(ch=='=')
  302. {
  303. fprintf(fpout,"%st%dn","<=",34);   //如果是 <=
  304. }
  305. else 
  306. {
  307. fprintf(fpout,"%st%dn","<",33);   //如果是 <
  308. fseek(fpin,-1L,SEEK_CUR);
  309. }
  310. }
  311. else if(ch=='/')
  312. { 
  313. ch=fgetc(fpin);
  314. if(ch=='*')
  315. {
  316. ch=fgetc(fpin);
  317. s:
  318. while(ch!='*')
  319. {
  320. ch=fgetc(fpin);
  321. }
  322. while(ch=='*')
  323. {
  324. ch=fgetc(fpin);
  325. while(ch!='/')
  326. {
  327. goto s; //如果是注释 /*  */
  328. }
  329. }
  330. }
  331. else if(ch=='/')
  332. {
  333. ch=fgetc(fpin);
  334. while(ch!='n')
  335. {
  336. ch=fgetc(fpin);   //如果是注释 //
  337. }
  338. }
  339. else 
  340. {  
  341. fprintf(fpout,"%st%dn","/",24);
  342. fseek(fpin,-1L,SEEK_CUR);
  343. }
  344. }
  345. else if(ch=='+')
  346. {
  347. fprintf(fpout,"%st%dn","+",21);
  348. }
  349. else if(ch=='-')
  350. {
  351. fprintf(fpout,"%st%dn","-",22);
  352. }
  353. else if(ch=='*')
  354. {
  355. fprintf(fpout,"%st%dn","*",23);
  356. }
  357. else if(ch=='(')
  358. {
  359. fprintf(fpout,"%st%dn","(",25);
  360. }
  361. else if(ch==')')
  362. {
  363. fprintf(fpout,"%st%dn",")",26);
  364. }
  365. else if(ch=='[')
  366. {
  367. fprintf(fpout,"%st%dn","[",27);
  368. }
  369. else if(ch==']')
  370. {
  371. fprintf(fpout,"%st%dn","]",28);
  372. }
  373. else if(ch=='.')
  374. {
  375. fprintf(fpout,"%st%dn",".",39);
  376. }
  377. else if(ch==';')
  378. {
  379. fprintf(fpout,"%st%dn",";",36);
  380. }
  381. else if(ch=='=')
  382. {
  383. fprintf(fpout,"%st%dn","=",38);
  384. }
  385. else if(ch==',')
  386. {
  387. fprintf(fpout,"%st%dn",",",40);
  388. }
  389. else fprintf(fpout,"无法识别的字符 %cn",ch)  ;
  390.    }
  391. }
  393. void CByDlg::OnOpen() 
  394. {
  395. CFileDialog fd(true);
  396. fd.m_ofn.lpstrTitle="请选择你要打开的文件";  //标题
  397. fd.m_ofn.lpstrInitialDir="d:\";            //初始目录
  398. if(fd.DoModal())
  399. {
  400. m_strFileName=fd.GetPathName();
  402. CStdioFile sf;
  403. CString str;
  404. if(sf.Open(m_strFileName.GetBuffer(0),CFile::modeRead))
  405. {
  406. CString  strTemp;
  407. while(sf.ReadString(strTemp))
  408. {
  409. str+=strTemp;
  410. str+="rn";
  411. }
  412. SetDlgItemText(IDC_EDIT1,str);
  414. sf.Close();
  415. }
  416. }
  417. }
  419. void CByDlg::OnFenxi() 
  420. {
  421. if(this->m_strFileName.IsEmpty())
  422. {
  423. MessageBox("请先选择一个源文件或者保存你编辑的代码后再进行词法分析","词法分析器",MB_ICONEXCLAMATION);
  424. return;
  425. }
  426. FILE* fpin=fopen(m_strFileName.GetBuffer(0),"r");
  427. FILE* fpout=fopen("output.txt","w");
  428. init();
  429. analyse(fpin,fpout);
  430. fclose(fpin);
  431. fclose(fpout);
  433. CStdioFile sf;
  434. CString str;
  435. if(sf.Open("output.txt",CFile::modeRead))
  436. {
  437. CString  strTemp;
  438. while(sf.ReadString(strTemp))
  439. {
  440. str+=strTemp;
  441. str+="rn";
  442. }
  443. SetDlgItemText(IDC_EDIT2,str);
  445. sf.Close();
  446. }
  448. }
  450. void CByDlg::OnStatic1() 
  451. {
  452. ::ShellExecute(NULL,"open","http://www.59hao.com/chx",NULL,NULL,SW_SHOWNORMAL);
  453. }
  455. BOOL CByDlg::PreTranslateMessage(MSG* pMsg) 
  456. {
  457.     if(pMsg -> message == WM_KEYDOWN)
  458. {
  459.         if(pMsg -> wParam == VK_ESCAPE)
  460. return TRUE;
  462. }return CDialog::PreTranslateMessage(pMsg);
  464. }
  466. void CByDlg::OnSave() 
  467. {
  468. if(this->m_strFileName.IsEmpty())
  469. {
  470. CFileDialog fd(false);
  471. fd.m_ofn.lpstrTitle="请选择你要打开的文件";  //标题
  472. fd.m_ofn.lpstrInitialDir="d:\";            //初始目录
  473. if(fd.DoModal())
  474. {
  475. m_strFileName=fd.GetPathName();
  476. }
  478. }
  480. CFile sf;
  481. if(sf.Open(this->m_strFileName,CFile::modeWrite|CFile::modeCreate))
  482. {
  483. UpdateData();
  484. char buf[200]={0};
  485. GetDlgItem(IDC_EDIT1)->GetWindowText(buf,200);
  486. sf.Write(buf,strlen(buf));
  487. sf.Close();
  488. MessageBox("保存成功","词法分析器",MB_ICONINFORMATION);
  489. }
  490. }