資源簡(jiǎn)介
編程演示三種存儲(chǔ)管理方式的地址換算過(guò)程，分別為分頁(yè)方式的地址換算，分段方式的地址換算，段頁(yè)式的地址換算。程序主要有三個(gè)功能，分別是分頁(yè)方式的地址換算，分段方式的地址換算，段頁(yè)式的地址換算。Switch函數(shù)包含3個(gè)case語(yǔ)句，分別用page，Segment，SegPagt完成分頁(yè)方式的地址換算，分段方式的地址換算，段頁(yè)式的地址換算。
代碼片段和文件信息
#include?
#include?“pl0.h“
#include?“string.h“
#define?stacksize?500
/*主函數(shù)*/
int?main（）
{
bool?nxtlev[symnum];
printf（“\t**********?10級(jí)軟件工程4班???********\n“）;
printf（“\t**********?姓名：?陳泳鑫??????********\n“）;
printf（“\t**********?學(xué)號(hào)：3110006379??********\n“）;
printf（“?輸入pl/0文件名：“）;
scanf（“%s“fname）; //輸入文件名
fin=fopen（fname“r“）;
if?（fin）
{
printf（“Listobject?code??（Y/N）“）; //是否輸出虛擬機(jī)代碼
scanf（“%s“fname）;
listswitch=（fname[0]==‘y‘||fname[0]==‘Y‘）;
printf（“List?symbol?table??（Y/N）“）; //是否輸出名字表
scanf（“%s“fname）;
tableswitch=（fname[0]==‘y‘||fname[0]==‘Y‘）;
fa1=fopen（“fa1.tmp““w“）;
fprintf（fa1“Input?pl/0?file?“）;
fprintf（fa1“%s\n“fname）;
init（）; //初始化
err=0;
cc=cx=ll=0;
ch=‘?‘;
if（-1!=getsym（））
{
fa=fopen（“fa.tmp““w“）;
fas=fopen（“fas.tmp““w“）;
addset（nxtlevdeclbegsysstatbegsyssymnum）;
nxtlev[period]=true;
if（-1==block（00nxtlev）） //調(diào)用編譯程序
{
fclose（fa）;
fclose（fa1）;
fclose（fas）;
fclose（fin）;
printf（“\n“）;
return?0;
}
fclose（fa）;
fclose（fa1）;
fclose（fas）;
if（sym!=period）
{
error（9）;
}
if（err==0）
{
fa2=fopen（“fa2.tmp““w“）;
interpret（）; //調(diào)用解釋執(zhí)行程序
fclose（fa2）;
}
else
{
printf（“Errors?in?pl/0?program“）;
}
}
fclose（fin）;
}
else
{
printf（“Can‘t?open?file!?\n“）;
}
printf（“\n“）;
scanf（“%s“fname）;
return?0;
}
/*
//初始化
*/
void?init（）
{
int?i;
/*設(shè)置單字符符號(hào)*/
for?（i=0;i<=255;i++）
{
ssym[i]=nul;
}
ssym[‘+‘]=plus;
ssym[‘-‘]=minus;
ssym[‘*‘]=times;
ssym[‘/‘]=slash;
ssym[‘（‘]=lparen;
ssym[‘）‘]=rparen;
ssym[‘=‘]=eql;
ssym[‘‘]=comma;
ssym[‘.‘]=period;
//ssym[‘#‘]=neq;
ssym[‘;‘]=semicolon;
/*設(shè)置保留名字，按照字母順序，便于折半查找*/
strcpy（&（word[0][0]）“begin“）;
strcpy（&（word[1][0]）“call“）;
strcpy（&（word[2][0]）“const“）;
strcpy（&（word[3][0]）“do“）;
strcpy（&（word[4][0]）“downto“）;
strcpy（&（word[5][0]）“else“）;
strcpy（&（word[6][0]）“end“）;
strcpy（&（word[7][0]）“for“）;
strcpy（&（word[8][0]）“if“）;
strcpy（&（word[9][0]）“odd“）;
strcpy（&（word[10][0]）“procedure“）;
strcpy（&（word[11][0]）“read“）;
strcpy（&（word[12][0]）“repeat“）;
strcpy（&（word[13][0]）“return“）;
strcpy（&（word[14][0]）“then“）;
strcpy（&（word[15][0]）“to“）;
strcpy（&（word[16][0]）“until“）;
strcpy（&（word[17][0]）“var“）;
strcpy（&（word[18][0]）“while“）;
strcpy（&（word[19][0]）“write“）;
/*設(shè)置保留字符號(hào)*/
wsym[0]=beginsym;
wsym[1]=callsym;
wsym[2]=constsym;
wsym[3]=dosym;
wsym[4]=downtosym;
wsym[5]=elsesym;
wsym[6]=endsym;
wsym[7]=forsym;
wsym[8]=ifsym;
wsym[9]=oddsym;
wsym[10]=procsym;
wsym[11]=readsym;
wsym[12]=repeatsym;
wsym[13]=returnsym;
wsym[14]=thensym;
wsym[15]=tosym;
wsym[16]=untilsym;
wsym[17]=varsym;
wsym[18]=whilesym;
wsym[19]=writesym;
/*設(shè)置指令名稱*/
strcpy（&（mnemonic[lit][0]）“l(fā)it“）;
strcpy（&（mnemonic[opr][0]）“opr“）;
strcpy（&（mnemonic[lod][0]）“l(fā)od“）; ?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2013-12-17?12:59??陳泳鑫?310006379?編譯原理\
?????目錄???????????0??2013-11-27?16:05??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\
?????目錄???????????0??2013-01-14?23:59??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\
?????目錄???????????0??2013-01-14?23:59??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\Debug\
?????文件???????64451??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\Debug\main.obj
?????文件???????33792??2013-01-03?20:54??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\Debug\vc60.idb
?????文件???????53248??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\Debug\vc60.pdb
?????文件??????213044??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\Debug\編譯原理.exe
?????文件??????210776??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\Debug\編譯原理.ilk
?????文件??????223872??2013-01-03?19:51??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\Debug\編譯原理.pch
?????文件??????517120??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\Debug\編譯原理.pdb
?????文件??????????98??2013-01-03?20:33??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\else.txt
?????文件?????????332??2013-01-03?20:54??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\fa.tmp
?????文件?????????161??2013-01-03?20:54??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\fa1.tmp
?????文件???????????7??2013-01-03?20:54??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\fa2.tmp
?????文件??????????44??2013-01-03?20:54??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\fas.tmp
?????文件???????36995??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\main.cpp
?????文件????????4536??2013-01-03?19:51??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\pl0.h
?????文件??????????84??2013-01-03?20:32??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\uneq.txt
?????文件????????4243??2013-01-03?19:49??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\編譯原理.dsp
?????文件?????????524??2013-01-03?19:49??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\編譯原理.dsw
?????文件???????41984??2013-01-03?21:18??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\編譯原理.ncb
?????文件????????1269??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\編譯原理實(shí)驗(yàn)?源代碼，運(yùn)行文件\編譯原理.plg
?????文件??????668524??2013-01-03?23:26??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告\陳泳鑫?310006379?編譯原理實(shí)驗(yàn)報(bào)告.doc
?????目錄???????????0??2013-12-17?12:59??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理課程設(shè)計(jì)報(bào)告\
?????目錄???????????0??2013-01-14?23:59??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理課程設(shè)計(jì)報(bào)告\編譯原理課程設(shè)計(jì)?源代碼，運(yùn)行文件\
?????目錄???????????0??2013-01-14?23:59??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理課程設(shè)計(jì)報(bào)告\編譯原理課程設(shè)計(jì)?源代碼，運(yùn)行文件\Debug\
?????文件???????64451??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理課程設(shè)計(jì)報(bào)告\編譯原理課程設(shè)計(jì)?源代碼，運(yùn)行文件\Debug\main.obj
?????文件???????33792??2013-01-03?20:54??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理課程設(shè)計(jì)報(bào)告\編譯原理課程設(shè)計(jì)?源代碼，運(yùn)行文件\Debug\vc60.idb
?????文件???????53248??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理課程設(shè)計(jì)報(bào)告\編譯原理課程設(shè)計(jì)?源代碼，運(yùn)行文件\Debug\vc60.pdb
?????文件??????213044??2013-01-03?20:35??陳泳鑫?310006379?編譯原理\陳泳鑫?310006379?編譯原理課程設(shè)計(jì)報(bào)告\編譯原理課程設(shè)計(jì)?源代碼，運(yùn)行文件\Debug\編譯原理.exe
............此處省略18個(gè)文件信息
評(píng)論
共有 條評(píng)論
川公網(wǎng)安備 51152502000135號(hào)