实现安全绿色的网络空间课堂的数据结构及C++Builder核心代码

本博文主要提供实现安全绿色的网络空间课堂的数据结构及C++Builder核心代码,全文分为三个部分:

 程序下载网址:网盘下载

 

链接:https://pan.baidu.com/s/1blzPOVRUrCbKIeu8XOaSVg
提取码:r80x

 

 

第一部分:用5种状态进行控制,实现脚本解析的C++Builder代码

5种状态进行控制,实现脚本解析的C++Builder代码,在Win10+Embarcadero RAD Studio 10.3下调试通过,基于IdHTTPServer中间件的“普鲁托安全Web应用服务程序”Pluto.exe运行正常稳定。目前,最新稳定版本为V1.9.9.2版,也是文章投稿时的版本。

 

函数声明:AnsiString videoPlay(AnsiString sFileName,AnsiString sID);

 

//const int BUFF 2048;//1024

//AnsiString sRetVideo;

AnsiString sFileContent=sTsimpleVideo;//Memo2->Lines->Text;// "";

/*定义变量:标题,作者,视频文件名称*/

String sSpaceName="";

String sTitle="";

String sAuthor="";

String sFile="";

String sFooter="";

FILE *licFile = fopen(sFileName.c_str(),"r");

if (licFile == NULL)

{

printf("OPEN失败\n");

}

else

{

char sLine[FILEBUFF];//[1024];

AnsiString stLine;

memset(sLine, 0, FILEBUFF);//1024);

int istatus=0;// 状态:0初始态,1逐行态,2数组态开始,3数组态结束,4代码态sCode,5结束态

//一行行读

while ((fgets(sLine, FILEBUFF, licFile))!= NULL && istatus<5)

{

stLine=sLine;

//RichEdit1->Lines->Add(stLine);

//剔除行后注释

int iPos =stLine.Pos("//");// str.find(target); //int iLen =stLine.Length();

   // RichEdit1->Lines->Add(iPos);

if(iPos==1)

continue;//break;  //跳过注释行,继续读取下一行

else if(iPos>1)

stLine=stLine.SubString(1,iPos-1);

//else

 

 

// RichEdit1->Lines->Add(istatus);

//sFileContent+=sLine;

//RichEdit1->Lines->Add(stLine);

if(stLine.Pos("<%")>0)

{

istatus=1;//开始

continue;

}

//stLine=StringReplace(sCode,"\n","",TReplaceFlags()<

switch(istatus)

{

case 0:

break;

case 1:

//逐行开始

if(stLine.Pos("sSpaceName=")>0)

{

sSpaceName=StringReplace(stLine,"sSpaceName=","",TReplaceFlags()<

}

else if(stLine.Pos("sTitle=")>0)

{

sTitle=StringReplace(stLine,"sTitle=","",TReplaceFlags()<

}

else if(stLine.Pos("sAuthor=")>0)

{

sAuthor=StringReplace(stLine,"sAuthor=","",TReplaceFlags()<

}

else if(stLine.Pos("sFile=")>0)

{

sFile=StringReplace(stLine,"sFile=","",TReplaceFlags()<

}

else if(stLine.Pos("[]=")>0)

{

istatus=2;

}

else if(stLine.Pos("sFooter=")>0)

{

istatus=4;

}

break;

case 2:    //数组态开始

if(stLine.Pos("[]end")>0)

{

istatus=3; //数组结束 //sFile=StringReplace(stLine,"sFile=","",TReplaceFlags()<Lines->Add(sFile);

}

else

{

AnsiString sTempID;

if(stLine.Pos(":")>1)

{

sTempID=stLine.SubString(1,stLine.Pos(":")-1);

if(sFooter.Pos(" target= _blank>" + sTempID + " ")<1)

sFooter+="" + sTempID + "  ";

 

if(sTempID==sID)

{

//RichEdit1->Lines->Add(sID);

stLine=stLine.SubString(stLine.Pos(":")+1,stLine.Length()-stLine.Pos(":"));

// RichEdit1->Lines->Add(stLine);

if(stLine.Pos("sSpaceName=")>0)

{   sSpaceName=StringReplace(stLine,"sSpaceName=","",TReplaceFlags()<

//sFileContent=StringReplace(sFileContent,"<%=sSpaceName%>",sSpaceName,TReplaceFlags()<

//RichEdit1->Lines->Add(sSpaceName);

}

else if(stLine.Pos("sTitle=")>0)

{

sTitle=StringReplace(stLine,"sTitle=","",TReplaceFlags()<

//sFileContent=StringReplace(sFileContent,"<%=sTitle%>",sTitle,TReplaceFlags()<

// RichEdit1->Lines->Add(sTitle);

}

else if(stLine.Pos("sAuthor=")>0)

{

sAuthor=StringReplace(stLine,"sAuthor=","",TReplaceFlags()<

//sFileContent=StringReplace(sFileContent,"<%=sAuthor%>",sAuthor,TReplaceFlags()<

//RichEdit1->Lines->Add(sAuthor);

}

else if(stLine.Pos("sFile=")>0)

{   sFile=StringReplace(stLine,"sFile=","",TReplaceFlags()<

 

}

}

}

}

break;

case 3://数组结束

if(stLine.Pos("sFooter=")>0)

istatus=4; //代码态开始

break;

case 4://代码态

if(stLine.Pos("%>")>0)

{

istatus=5; //结束态

//RichEdit1->Lines->Add(sFooter);

//sFileContent=StringReplace(sFileContent,"<%=sFooter%>",sFooter,TReplaceFlags()<

}

else

{

sFooter+=stLine;

}

break;

case 5:    //结束态

;

break;

 

}

}

fclose(licFile);

sFileContent=StringReplace(sFileContent,"<%=sSpaceName%>",sSpaceName,TReplaceFlags()<

sFileContent=StringReplace(sFileContent,"<%=sTitle%>",sTitle,TReplaceFlags()<

sFileContent=StringReplace(sFileContent,"<%=sAuthor%>",sAuthor,TReplaceFlags()<

sFileContent=StringReplace(sFileContent,"<%=sFile%>",sFile,TReplaceFlags()<

sFileContent=StringReplace(sFileContent,"<%=sFooter%>",sFooter,TReplaceFlags()<

}

return sFileContent;

 

//作者:一策书(湘岳阳万江波)

 

 

第二部分:以yanzhou.vsp脚本文件为例,讲解《2016——2019xx市数学中考试卷压轴题解析》的视频集制作的示例代码

 示例代码文件为yanzhou.vsp,示例内容如下:

 

//定义变量:标题,作者,视频文件名称*
//String sSpaceName="";
//String sTitle="";
//String sAuthor="";
//String sFile="";
<%
sSpaceName=2016——2019岳阳市数学中考试卷压轴题解析
sAuthor=张大庆
sTitle=岳阳市数学中考试卷2016年第08题
sFile=yazhou/16-08.mp4

 

[]=;//数组开始,标题,作者,文件路径
16-08:sTitle=岳阳市数学中考试卷2016年第08题
16-08:sFile=yazhou/16-08.mp4

 

16-16:sTitle=岳阳市数学中考试卷2016年第16题
16-16:sFile=yazhou/16-16.mp4

 

16-23:sTitle=岳阳市数学中考试卷2016年第23题
16-23:sFile=yazhou/16-23.mp4

 

16-24:sTitle=岳阳市数学中考试卷2016年第24题
16-24:sFile=yazhou/16-24.mp4

 

17-08:sTitle=岳阳市数学中考试卷2017年第08题
17-08:sFile=yazhou/17-08.mp4

 

17-16:sTitle=岳阳市数学中考试卷2017年第16题
17-16:sFile=yazhou/17-16.mp4

 

17-23:sTitle=岳阳市数学中考试卷2017年第23题
17-23:sFile=yazhou/17-23.mp4

 

17-24:sTitle=岳阳市数学中考试卷2017年第24题
17-24:sFile=yazhou/17-24.mp4

 

18-08:sTitle=岳阳市数学中考试卷2018年第08题
18-08:sFile=yazhou/18-08.mp4

 

18-16:sTitle=岳阳市数学中考试卷2018年第16题
18-16:sFile=yazhou/18-16.mp4

 

18-23:sTitle=岳阳市数学中考试卷2018年第23题
18-23:sFile=yazhou/18-23.mp4

 

18-24:sTitle=岳阳市数学中考试卷2018年第24题
18-24:sFile=yazhou/18-24.mp4

 

19-08:sTitle=岳阳市数学中考试卷2019年第08题
19-08:sFile=yazhou/19-08.mp4

 

19-16:sTitle=岳阳市数学中考试卷2019年第16题
19-16:sFile=yazhou/19-16.mp4

 

19-23:sTitle=岳阳市数学中考试卷2019年第23题
19-23:sFile=yazhou/19-23.mp4

 

19-24:sTitle=岳阳市数学中考试卷2019年第24题
19-24:sFile=yazhou/19-24.mp4
[]end;//数组结束

 

sFooter=



%>

//作者:一策书(湘岳阳万江波)

 

第三部分:判断文件名设置不同的ContentType的类型值,解决了.js,.zip等文件的问题。

 

AnsiString TfrmHttpServer::GetContentType(AnsiString strReq)
{
AnsiString strctype;
if(strReq.Pos(".mp4")>0) //文件类型
{
strctype = "video/mpeg4";
}
else if(strReq.Pos(".mp3")>0) //文件类型,
{
strctype = "audio/mp3";
}
else if(strReq.Pos(".jpg")>0) //文件类型,
{
strctype = "image/jpeg";
}
else if(strReq.Pos(".png")>0) //文件类型,
{
strctype = "application/x-png";
}
else if(strReq.Pos(".css")>0) //文件类型,
{
strctype = "text/css";
}
else if(strReq.Pos(".js")>0) //文件类型,
{
strctype = "application/x-javascript";
}
//else if(strReq.Pos(".mp4")>0) //文件类型
//{
// strctype = "video/mpeg4";
//}
else if(strReq.Pos(".ico")>0) //文件类型
{
strctype = "image/x-icon";
}
else if(strReq.Pos(".html")>0|strReq.Pos(".htm")>0|strReq.Pos(".vsp")>0) //文件类型
{
strctype ="text/html";
}
else
{
strctype ="application/octet-stream";//.*( 二进制流,不知道下载文件类型)
}
return strctype;

//参考文献:response的contentType 几种类型 https://blog.csdn.net/qq_37651267/article/details/91380351
}

作者:一策书(湘岳阳万江波)

 

你可能感兴趣的:(实现安全绿色的网络空间课堂的数据结构及C++Builder核心代码)