发信人: love1974()
整理人: wenbobo(2002-12-27 15:54:18), 站内信件
|
RED HAT LINUX6下编译通过(CGIC1.06版本)
#include <cgic.c>
void cgi_out(char *error,char *msg);
int cgiMain()
{
FILE *st;
int i=0;
char *sub_string_pointer;
char buf[10000],result[10000];
int ext_choose,k;
char *ext[]={"com","net","org"};
char search[100],domain[50];
k=0;
ext_choose=0;
cgiFormStringNoNewlines("domain",domain,45);
cgiFormSelectSingle("ext",ext,3,&ext_choose,0);
if((domain==" "))
{
cgi_out("Please Select Domain or Ext Name!\r\n","");
return 0;
}
sprintf(search,"whois %s.%[email protected]" ,domain,ext[ext_choose]
);
st=popen(search,"r");
while(!feof(st))
{
if(i>=10000)
{
cgi_out("缓冲区错误!","");
pclose(st);
return 1;
}
buf[i++]= fgetc(st);
}
sub_string_pointer=strstr(buf,"policy.");
if(sub_string_pointer==NULL)
{
cgi_out("<CENTER>
您选择的域名在域名数据库中没有找到,您可以注册此域名>
</CENTER>\r\n","");
}
else
{
strcpy(result,sub_string_pointer+7);
cgi_out("",result);
}
pclose(st);
}
void cgi_out(char *error,char *msg)
{
cgiHeaderContentType("text/html");
fprintf(cgiOut,"<HTML><HEAD>\n\r");
fprintf(cgiOut,"<TITLE>Search Domain Result</TITLE>
<meta http-equiv=\"Content-Type\"
content=\"text/html; charset=gb2312\">
</HEAD>\n\r");
fprintf(cgiOut,"<body bgcolor=#FFFFF background=/gif/back_3.jpg>\n\r
");
fprintf(cgiOut,"<CENTER><FONT color=blue size=5>域名查询结果<
/FONT>
</CENTER><BR>\r\n");
if(error!="")
fprintf(cgiOut,error);
else
{
fprintf(cgiOut,"<pre>");
fprintf(cgiOut,msg);
fprintf(cgiOut,"\r\n</pre>\r\n");
}
fprintf(cgiOut,"<FORM>
<CENTER><INPUT onclick=history.back()
type=button value=\"返回\"></CENTER>
</FORM>");
fprintf(cgiOut,"\n</BODY></HTML>");
}
--
太太平平，不是我活着的目标；不温不火，不是我的性格。是云就该下雨，是火就该发光。
那罐星砂送給你
╭╯ ╰╮╭╯╰╮ 願你心想事成
║▃▃▃║║☆★║ 這罐海水留給我
║███║║☆★║ 裝滿我的思念
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.104.36.228]
|
|