编译原理last集c语言,编译原理实验之语法分析(算符优先分析算法(C语言))

#include

#include

#include

#include

#include

#include

#include

#include

#include

#include

#include

#include

#pragma comment(linker, "/STACK:102400000,102400000")

typedef long long LL;

const int inf=0x3f3f3f3f;

const double pi= acos(-1.0);

const double esp=1e-6;

using namespace std;

const int Maxn=110;

const int maxn=20;

char str[maxn][Maxn];//输入文法

char st[maxn];//输入串

char stac[maxn];//模拟栈的数组

char nstr[maxn][maxn];//储存转化文法

char mstr[maxn][maxn];

char fin[maxn];//存储终结符

char firstvt[maxn][maxn],lastvt[maxn][maxn];

char cmp[maxn][maxn];//存储表中的比较符

int firstflag[maxn],lastflag[maxn];//非终结符的firstvt,lastvt是否求出

int fcnt[maxn],lcnt[maxn];//非终结符firsvt和lastvt的个数

int is_fin(char c) { //判断终结符

for(int i=0; fin[i]!='\0'; i++) {

if(fin[i]==c)

return 1;

}

return 0;

}

int site(char c) { //求在表中的下标

for(int i=0; fin[i]!='\0'; i++) {

if(fin[i]==c)

return i;

}

}

void get_firstvt(char s,int t) { //求s非终结符的firstvt值

int i,j,ii,jj,tt;

for(i=0; i

if(str[i][0]==s)

break;

}

if(!firstflag[i]) {

int k=fcnt[i];

for(j=0; str[i][j]!='\0'; j++) {

if(j==2||str[i][j]=='|') {

if(is_fin(str[i][j+1])) {

firstvt[i][k++]=str[i][j+1];

} else {

if(is_fin(str[i][j+2])) {

firstvt[i][k++]=str[i][j+2];

}

if(str[i][j+1]!=s) {

get_firstvt(str[i][j+1],t);

for(ii=0; ii

if(str[ii][0]==str[i][j+1])

break;

}

for(jj=0; jj

for(tt=0; tt

if(firstvt[i][tt]==firstvt[ii][jj])

break;

}

if(tt==k) {

firstvt[i][k++]=firstvt[ii][jj];

}

}

}

}

}

}

firstvt[i][k]='\0';

fcnt[i]=k;

firstflag[i]=1;

}

}

void output_firstvt(int T) { //输出firstvt集

for(int i=0; i

get_firstvt(str[i][0],T);

}

for(int i=0; i

printf("Firstvt[%c]:",str[i][0]);

for(int j=0; j

printf("%c ",firstvt[i][j]);

}

puts("");

}

}

void get_lastvt(char s,int t) { //求s非终结符的lastvt值

int i,j,ii,jj,tt;

for(i=0; i

if(str[i][0]==s)

break;

}

if(!lastflag[i]) {

int k=lcnt[i];

for(j=0; str[i][j]!='\0'; j++) {

if(str[i][j+1]=='|'||str[i][j+1]=='\0') {

if(is_fin(str[i][j])) {

lastvt[i][k++]=str[i][j];

} else {

if(is_fin(str[i][j-1])) {

lastvt[i][k++]=str[i][j-1];

}

if(str[i][j]!=s) {

get_lastvt(str[i][j],t);

for(ii=0; ii

if(str[ii][0]==str[i][j])

break;

}

for(jj=0; jj

for(tt=0; tt

if(lastvt[i][tt]==lastvt[ii][jj])

break;

}

if(tt==k) {

lastvt[i][k++]=lastvt[ii][jj];

}

}

}

}

}

}

lastvt[i][k]='\0';

lcnt[i]=k;

lastflag[i]=1;

}

}

void output_lastvt(int T) { //输出lastvt集

for(int i=0; i

get_lastvt(str[i][0],T);

}

for(int i=0; i

printf("Lastvt[%c]:",str[i][0]);

for(int j=0; j

printf("%c ",lastvt[i][j]);

}

puts("");

}

}

void get_table(int T,int cnt) { //得到表

int x=0,y=0;

int i,j,ii,jj;

for(i=0; i

for(j=0; str[i][j]!='\0'; j++) {

if(str[i][j]!='|')

nstr[x][y++]=str[i][j];

else if(str[i][j]=='|') {

nstr[x][y]='\0';

x++;

y=0;

nstr[x][y++]=str[i][0];

nstr[x][y++]='-';

nstr[x][y++]='>';

}

}

nstr[x][y]='\0';

x++;

y=0;

}

//对于S1->#S#;

char a='#';

cmp[site(a)][site(a)]='=';

for(i=0; i

cmp[site(a)][site(firstvt[0][i])]='

}

for(i=0; i

cmp[site(lastvt[0][i])][site(a)]='>';

}

//对于初始的文法

for(i=0; i

for(j=3; nstr[i][j+1]!='\0'; j++) {

if(is_fin(nstr[i][j])&&is_fin(nstr[i][j+1]))

cmp[site(nstr[i][j])][site(nstr[i][j+1])]='=';

if(is_fin(nstr[i][j])&&!is_fin(nstr[i][j+1])&&is_fin(nstr[i][j+2])&&nstr[i][j+2]!='\0')

cmp[site(nstr[i][j])][site(nstr[i][j+2])]='=';

if(!is_fin(nstr[i][j])&&is_fin(nstr[i][j+1])) { //对于非终结符在终结符之前

for(ii=0; ii

if(str[ii][0]==nstr[i][j])

break;

}

for(jj=0; jj

cmp[site(lastvt[ii][jj])][site(nstr[i][j+1])]='>';

}

if(is_fin(nstr[i][j])&&!is_fin(nstr[i][j+1])) { //对于终结符在非终结符之前

for(ii=0; ii

if(str[ii][0]==nstr[i][j+1])

break;

}

for(jj=0; jj

cmp[site(nstr[i][j])][site(firstvt[ii][jj])]='

}

}

}

for(i=0; fin[i]!='\0'; i++)

printf("\t%c",fin[i]);

puts("");

for(i=0; i

printf("%c\t",fin[i]);

for(j=0; j

if(cmp[i][j]!=0)

printf("%c\t",cmp[i][j]);

else

printf(" \t");

}

puts("");

}

}

void output(int i,int j,char *str) {

printf("\t");

for(int ii=i; ii<=j; ii++)

printf("%c",str[ii]);

}

int isDX(char c)

{

if(c>='A'&&c<='Z')

return 1;

return 0;

}

void exchange()

{

int ecnt=0;

for(int i=0;i<10;i++){

int mcnt=0;

for(int j=3;nstr[i][j]!='\0';j++){

if(isDX(nstr[i][j])&&strlen(nstr[i])!=4)

mstr[ecnt][mcnt++]='N';

else if(!isDX(nstr[i][j]))

mstr[ecnt][mcnt++]=nstr[i][j];

else{

break;

}

}

mstr[ecnt][mcnt]='\0';

if(strlen(mstr[ecnt])!=0)

ecnt++;

}

}

int get_process(char *st)//

{

exchange();

int len=strlen(st);

int t=0;//栈内元素的个数

int i=0,j;

int bz=1;

stac[0]='#';

while(st[i]!='\0'){

if(is_fin(stac[t])) j=t;

else j=t-1;

int a=site(stac[j]);

int b=site(st[i]);

if(cmp[a][b]=='

printf("\t%d",bz++);

output(0,t,stac);

printf("\t%c",cmp[a][b]);

printf("\t%c",st[i]);

output(i+1,len-1,st);

printf("\t移进");

puts("");

t++;

stac[t]=st[i];

i++;

}

else if(cmp[a][b]=='>'){

printf("\t%d",bz++);

output(0,t,stac);

printf("\t%c",cmp[a][b]);

printf("\t%c",st[i]);

output(i+1,len-1,st);

printf("\t归约");

puts("");

int ii,jj,kk;

int flag=0;

for(ii=t;ii>=0;ii--){

for(jj=0;jj

int lee=strlen(mstr[jj]);

int kkn=0;

for(kk=lee-1;kk>=0;kk--){

if(stac[ii]==mstr[jj][kk]){

ii--;

kkn++;

}

else

break;

}

if(strlen(mstr[jj])==kkn){

t=ii+1;

stac[t++]='N';

stac[t]='\0';

t--;

flag=1;

break;

}

else{

ii=ii+kkn;

}

}

if(!flag){

printf("\t错误");

return 0;

}

else{

if(t==1&&st[i]=='#'){

printf("\t%d",bz++);

output(0,t,stac);

printf("\t=");

printf("\t%c",st[i]);

output(i+1,len,st);

printf("\t接受");

return 1;

}

break;

}

}

}

}

}

int main() {

int T;

int cnt=0;//终结符的个数

memset(firstflag,0,sizeof(firstflag));

memset(lastflag,0,sizeof(lastflag));

memset(cmp,0,sizeof(cmp));

scanf("%d",&T);

for(int i=0; i

scanf("%s",str[i]);

fcnt[i]=lcnt[i]=0;

}

for(int i=0; i

for(int j=0; str[i][j]!='\0'; j++) {

if((str[i][j]'Z')&&(str[i][j]!='-'&&str[i][j]!='>')&&str[i][j]!='|')

fin[cnt++]=str[i][j];

}

}

fin[cnt++]='#';

fin[cnt]='\0';

printf("输出文法的Firstvt集和Lastvt集\n");

output_firstvt(T);

output_lastvt(T);

printf("输出算符优先关系表\n");

get_table(T,cnt);

printf("请输入输入串\n");

scanf("%s",st);

printf("输出输入串的分析过程\n");

printf("PS:分析过程每一列从左到右依次是：步骤 栈 有限关系 当前符号 剩余输入串 移进或规约\n\n");

get_process(st);

return 0;

}

/* 2 T->T,S|S S->a|@|(T) (a,a)# 3 B->BoT|T T->TaF|F F->nF|(B)|t|f ntofat# */