所有的源码:https://github.com/yanguojun123/Compile
先上代码:
(其余后面完善)
#pragma once
#include<iostream>
#include<string>
#include <fstream>
#include <sstream>
#include<Windows.h>
#include "tree.h"
#include<stack>
bool success = 1;
using namespace std;
char ch;//字符变量,存放最新读进的源程序字符
char strToken[100];//字符数组,存放构成单词符号的字符串
int len = 0;//记录字符串的长度
string klabel[29] = { "+","-","*","/","=","#","<","<=",">",">=",",",";",":=","(",")",".","const","var","procedure","begin","end","odd","if","then","call"
,"while","do","read","write" };
string slabel[100] = {};
string clabel[100] = {};
string result[1000] = {};//保存所有单词的结果数组
int procedureId = 0;//记录当前的过程层数
int tableId = 0;//当前名字表的下标
int dx = 3;//当前层数的偏移地址
int ip = 0;//全局符号表的指针
int slen = 0;//标识符表的下标
int clen = 0;//常量表的下标
//判断是否为数字
const char *input;
int index = 0;
int codeId = 0;//代码的下标
bool isDigit()
{
if (ch < 58 && ch >= 48)
return true;
else
return false;
}
//判断是否为小写字母
bool issLetter()
{
if (ch <= 122 && ch >= 97)
return true;
else
return false;
}
bool isDigit(char ch1)
{
if (ch1 < 58 && ch1 >= 48)
return true;
else
return false;
}
//把字符串转化为数字
int strToint(string str)
{
int len = str.length();
int count = 0;
for (int i = 0; i < len; i++)
{
if (str.at(i) <= 57 && str.at(i) >= 48)
count = count + (str.at(i) - 48)*pow(10, len - i - 1);
else
return -1;
}
return count;
}
//把数字转化为字符串
//string intTostr(int num)
//{
//}
//判断是否为小写字母
bool issLetter(char ch1)
{
if (ch1 <= 122 && ch1 >= 97)
return true;
else
return false;
}
//判断是否为大写字母
bool islLetter()
{
if (ch <= 90 && ch >= 65)
return true;
else
return false;
}
//将下一输入字符读到ch中
void GetChar()
{
ch = input[index];
index++;
}
//判断ch中是否是空白,若是,则调用GetChar直至读入下一个非空白的字符
void GetBC()
{
while (ch == 32)
GetChar();
}
//将ch中的字符连接到strToken之后
void concat()
{
strToken[len] = ch;
len++;
}
//对strToken中的字符串查找保留字表,若他是一个保留字则返回则返回他的编码,否则返回0值
int Reserve()
{
for (int i = 0; i < 29; i++)
{
/*const char *p = klabel[i].data();
if (strcmp(p,strToken)==0)
{
return i;
}*/
if (klabel[i] == strToken)
return i;
}
return -1;
}
//将搜索指示器回调一个字符位置
void Retract()
{
index--;
ch = 32;
}
//将strToken中的标识符插入到符号表
int insertId()
{
slabel[slen] = strToken;
slen++;
return slen - 1;
}
//将strToken中的常数插入到常数表
int insertConst()
{
clabel[clen] = strToken;
clen++;
return clen - 1;
}
string readFileIntoString(char * filename)
{
ifstream ifile(filename);
//将文件读入到ostringstream对象buf中
ostringstream buf;
char ch;
while (buf&&ifile.get(ch))
buf.put(ch);
//返回与流对象buf关联的字符串
return buf.str();
}
//检测是否已经存在此标识符
int isexists(string str)
{
for (int i = 0; i < slen; i++)
if (str == slabel[i])
return 1;
return 0;
}
//检测是否已经存在此常量
int isexistc(string con)
{
for (int i = 0; i < clen; i++)
if (con == clabel[i])
return 1;
return -1;
}
int isexists()
{
for (int i = 0; i < slen; i++)
if (strToken == slabel[i])
return i;
return -1;
}
//检测是否已经存在此常量
int isexistc()
{
for (int i = 0; i < clen; i++)
if (strToken == clabel[i])
return i;
return -1;
}
//名字表的结构体
struct symble
{
string name;
string kind;
int addr;
int attribute;//val/value
}symlabel;
//判断是否退出
symble table[20];
//在符号表里查找某个标识符
int findSymble(string str)
{
for (int i = 0; i < tableId; i++)
{
if (table[i].name == str)
return i;
}
return -1;
}
//在符号表里根据地址查找变量的名字
string findSymble(int addr1)
{
for (int i = 0; i < tableId; i++)
{
if (table[i].addr == addr1)
return table[i].name;
}
return "";
}
//目标指令的结构体:
struct tarInstruc
{
string funcCode=" ";
int levelDiff = 0;
int displacement = 0;
string content = " ";
};
tarInstruc code[200];
//从关键字表查找关键字的下标
int findKlabel(string str)
{
for (int i = 0; i < 29; i++)
{
if (str == klabel[i])
return i+1;
}
return -1;
}
//添加code,运算类型
void codeAdd(string str,int lev,int place,string con)
{
code[codeId].funcCode = str;
code[codeId].levelDiff = lev;
code[codeId].displacement = place;
code[codeId].content = con;
codeId++;
}
//添加code,非运算
void codeAdd(string str, int lev, int place)
{
code[codeId].funcCode = str;
code[codeId].levelDiff = lev;
code[codeId].displacement = place;
codeId++;
}
//主程序
void lex(string file1)
{
int code, value, num = 0;
/*cout << "请输入单词长度"<<endl;
cin >> num;
cout << "请输入单词:"<<endl;
cin >> input;*/
//char filename[] = "test.txt";
//const char *file = readFileIntoString(filename).data();
std::ifstream in(file1);
std::ostringstream tmp;
tmp << in.rdbuf();
std::string str = tmp.str();
cout << str << endl;
for (int i = 0; i < str.length(); i++)//如果输入中有大写字母,则转换为小写字母
if (str.at(i) <= 90 && str.at(i) >= 65)
str.at(i) = str.at(i) + 32;
const char *file = str.data();
input = file;
while (input[index] != 0)
{
len = 0;
//strcpy(strToken,"");
memset(strToken, 0, sizeof(strToken));
//cout << strToken << endl;
//Sleep(1000);
GetChar();
GetBC();
if (issLetter())//判断是否是字母
{
while (issLetter() || isDigit())
{
concat();
GetChar();
}
Retract();
result[ip] = strToken;
ip++;
code = Reserve();
if (code == -1)//不在关键字表里,即为标识符
{
int index1 = isexists();//检测此标识符是否存在
if (index1 != -1)
cout << "(" << strToken << ",id," << index1 << ")" << endl;
else
{
value = insertId();
cout << "(" << strToken << ",id," << value << ")" << endl;//输出标识符的三元组
}//cout << strToken<<endl;
}
else
{
cout << "(" << klabel[code] << "," << klabel[code] << ",-)" << endl;//输出关键字的二元组
}
}
else if (isDigit())//如果是数字,即为常量
{
while (isDigit())
{
concat();
GetChar();
}
Retract();
result[ip] = strToken;
ip++;
int index2 = isexistc();
if (index2 != -1)
cout << "(" << strToken << ",int," << index2 << ")" << endl;
else
{