来源: zerodj 发布
正文:
自己写一个函数来支持CGI运行...
思路:
当WEB SERVER的请求是一个执行文件,
那么就执行这个文件(利用进程),可是如果要传入数据给CGI该如何办,那么CGI运行后的结果,在自己的程序中该如何得到呀?
那么就可以是管道,来达到数据的共享!
WEB页提交的数据在自己的程序中是可以得到的(SOCKET来得到)!就把数据传入给管道!
CGI程序需要的数据就从管道中去读!
当CGI程序运行结束后,就将结果输出给管道,自己的程序去读管道中的内容!
然后用SOCKET将结果发送给IE/NS就可以了!
下面只是一个函数,
cgiFileName:要执行的CGI程序名称
pPostValue:WEB页提交的值(POST方法提交的)
pPipeValue:环境变量的值(GET方法提交的值是放在环境变量QUERY_STRING中的)
isStdRead:CGI程序是否需要从管道中读取值
注意:POST方法提交的值,在环境变量中有一个变量CONTENT_LENGTH是记录POST提交值的长度!
每个环境变量是用''\0''字符来隔开的!(QUERY_STRING=name=66&password=77\0CONTENT_LENGTH=0\0\0)
当环境变量结尾应使用\0\0来结束!
千万不用API:SetEnvironmentVariable()来设置环境变量,一但将POST的值写入管道传给CGI程序,那用这个API函数设置的环境变量会丢失.
AnsiString CgiScriptRun(AnsiString cgiFileName,AnsiString pPostValue,char *pPipeValue,bool isStdRead){
HANDLE hProcess,hWrite,hRead, //进程句柄,管道写句柄,管道读句柄
SECURITY_ATTRIBUTES sa, //安全性结构
STARTUPINFO mysi, //子进程窗口属性结构
PROCESS_INFORMATION mypi, //子进程信息
bool bTest, //API是否调用成功
//填充安全性结构使句柄被继承
sa.nLength=sizeof(SECURITY_ATTRIBUTES),
sa.lpSecurityDescriptor=NULL,
sa.bInheritHandle=true,
bTest=CreatePipe(&hRead,&hWrite,&sa,0), //创建管道
if(!bTest){
return "",
}
//填充进程启动信息
memset(&mysi,0,sizeof(STARTUPINFO)),
mysi.cb=sizeof(STARTUPINFO),
mysi.dwFlags=STARTF_USESTDHANDLES,
if(!isStdRead)
//如果CGI(或PHP程序)不要从PIPE中取值(用了GET方法),则使用标准输入
mysi.hStdInput=GetStdHandle(STD_INPUT_HANDLE),
else
//则使用从管道中读
mysi.hStdInput=hRead,
mysi.hStdOutput=hWrite,//CGI程序运行结束后,会将结果送给标准输出(屏幕),在这里告诉CGI让它把
//结果送出个建立的管道中
mysi.hStdError=hWrite, //CGI程序出错,将出错信息改从管道中输出,(也就是向管道中写进信息)
//创建子进程
bTest=CreateProcess(NULL,
cgiFileName.c_str(),NULL,
NULL,true,//true为让这个进程继承上面设置的一些输入输出信息
DETACHED_PROCESS,
(LPVOID)pPipeValue,NULL,&mysi,&mypi),
//(LPVOID)pPipeValue ---传的环境变量
if(bTest)hProcess=mypi.hProcess,
else return"",
if(isStdRead){
if(bTest){
CloseHandle(mypi.hThread),
DWORD dwWritten,
bool bReturn,
char *g=pPostValue.c_str(),
//将提交的值写进管道
bReturn=WriteFile(hWrite,g,strlen(g),&dwWritten,NULL),
if(!bReturn)return "",
}
if(!bTest)return "",
//等待CGI程序执行完毕
WaitForSingleObject(hProcess,WAIT_ABANDONED),
}
//一定要关闭管道的读句柄
CloseHandle(hWrite),
char readBuf[100],
DWORD bytesRead=0,
AnsiString cgiout="",
//上面的CGI程序执行完毕后已经将结果写进管道了,现在只要读出来就可以了!
while(ReadFile(hRead,readBuf,100,&bytesRead,NULL)){
readBuf[bytesRead]=''\0'',
cgiout=cgiout+AnsiString(readBuf),
}
CloseHandle(hRead),
CloseHandle(hProcess),
//返回执行结果用SOCKET发送个用户!
return cgiout,
}
CGI程序是从标准输入中读数据,输出给标准输出!
这里用了管道,在自己的程序中,建立PIPE,让CGI改从PIPE中读数据或从PIPE中输出运行结果!
如果你的CGI程序中使用了文件操作!
如:打开文件,将文内容输出!
注意这里的文件路径请使用绝对路径,如果要用相对路径的话,它的参考路径为你这个应用程序所在路径,而不是CGI的路径
zerodj@163.com
标题: 在linux上使用BIND建立DNS服务器 [删除]
作者: Thomas Nooning 分类: linux 关键字: dns
正文:
作者: Thomas Nooning, TechRepublic
日期: 2001年09月19日
尽管Linux在桌面计算的世界中还没有取得引人注目的进展,但作为网络服务器它已经小有名气了。由于其出色的可靠性,我们可以放心地在Linux上运行当今Internet时代所必需的各种重要服务程序。由此,Linux最普遍的一些用途包括用作邮件服务器、Web服务器以及DNS服务器。
下面我们将研究怎样在Red Hat Linux上使用BIND建立一个DNS服务器。BIND(Berkeley Internet Name Domain)是一个在UNIX/Linux系统上实现的域名解析服务软件包。我们将学习在Linux上建立和运行一个DNS服务器所需的安装、初始配置以及系统设置等步骤。
下载、安装、配置<a href=http://www.linuxbyte.net/showsoftd.php?ID=224 class=red target=_blank>BIND</a>
下载和安装<a href=http://www.linuxbyte.net/showsoftd.php?ID=224 class=red target=_blank>BIND</a>
你可以在www.isc.org/products/BIND/下载BIND的源码包。最新的版本是9.1.3(写这篇文章时),同时还可以下载支持信息和FAQ。
在本文中我们用Red Hat作为示例,所以你也许希望使用BIND的RPM版本,可以通过搜索www.rpmfind.net找到它,因为使用RPM形式的发行包是安装BIND最