动网论坛,站长建站首选,国内使用量最多的论坛软件 动网论坛官方技术讨论区 站长工具 申请属于您自己的免费论坛
首页 | 新闻资讯 | 网站运营 | 网络编程 | 数据库 | 服务器 | 网页设计 | 图像媒体 | 网络应用 | 搜索优化 | 资源下载 | 动网主机 | DVBOX
    本站内  互联网 ASP论坛  ASP.Net论坛  PHP论坛
  
   Cgi/Perl → 阅读文章

 server push具体实现

作者来源: 
阅读 数 643 人次 , 2006-3-29 4:03:00 


一、作业系统:
目前 server push还不能在win9x上实现,至少是我自己还没有在win9x作为主机上实现过这一功能。经笔者试验成功的作业系统有:winnt4.0,unix,linux,freebsd,以linux支持最好。因为我使用的linux都是最新的版本,可以方便地编译最新的功能模块。当然还有其它的作业系统也能很好地支持 server push功能,但笔者限于条件没有测试过。
二、www服务器:
其实目前除了iis和apache这两个www服务器,你没有更好的选择,值得庆辛的是它们都能很好地支持 server push,当然你应该选择它们的最新版。别的那些小孩子过家家那样的www服务器就不用试了。在这里笔者极力推荐在linux上安装apache,以便能自由编译功能模块,这样可以充分使用server push、fastcgi、e-cgi、hph等新的扩展功能。
三、脚本支持:
虽然 server push可以用更多的脚本程序来编写,但笔者强烈推荐用perl或c语言来写cgi脚本,因为perl已经是cgi脚本程序事实上的标准。而且在perl5中已经可以直接调用c子程序而不需要任何声明。不管你用什么语言来写cgi脚本,解释器中应该有cgi.pm模块,笔者试用的版本是 5.004,这一模块的更新版大家可以从网上下载,找不到?用搜索引擎输入cgi.pm就行了,要多少个都有。
好了,有了上面的工具,下面我们就来写一个 server push程序来说明它的实现过程:
#!/usr/bin/perl
use cgi qw/:push -nph/;
$| = 1;
print multipart_init(-boundary=>'--boundary');
while (1) {
print multipart_start(-type=>'text/plain'),
"the current time is ",scalar(localtime),"n",
multipart_end;
sleep 1;
}
use cgi qw/:push -nph/;这一行告诉cgi解释程序,调用支持server push的功能模块(cgi.pm),在这个模块中预先定义了三个涵数:multipart_init()、multipart_start()和multipart_end,只要在程序中有use cgi qw/:push -nph/声明。就可以直接使用这三个涵数。
multipart_init()涵数的作用是声明了一个文档类型,就象普通的cgi程序中的“content-type: text/html”声明,告诉服务器下面传送的是html文档,而multipart_init()这一涵数声明的文件类型却是实现server push最根本的方法类型:content-type: multipart/x-mixed-replace; boundary='--boundary'如果你对http的mime类型有详细的了解,你就知道multipart类型是一种复合类型,它的子类型是mixed,子类型的x参数大家可以参看详细的mime类型说明,这里最关键的是replace方法,它不停地用新接收的数据更新旧的数据。这,就是server push最大的技术内涵。boundary只是一个边界值,告诉浏览器从这儿开始,使用server push方法了。其实你完全可以这样理解,只要在脚本程序中声明了multipart/x-mixed-replace; boundary='--boundary'这样一个文档类型,服务器就和客户机建立了一个特别的连结。服务器就不断地把客户机请求的数据源源不断地推向了客户机。而传统的client pull方法是:1、client和server建立连结。2、client发送请求。3、server响应请求。4、server断开连结以响应下一请求。通过这两种方法的比较大家可以看出server push优点主要在于服务器和客户机之间这种不间断的连结方式。使得它不需要采用client pull的<meta http-equiv=refresh content="n">这种方法来刷新页面,不仅更新速度快,而且不会产生闪动效果。
可以看到,如果你不用multipart_init(),直接在脚本程序中用这样的语句也可以达到同样的目的:
print "content-type: multipart/x-mixed-replace;boundary='boundary'nn"
这样做的好处是当系统不能支持multipart_init()涵数时,就可以直接这样声明.
multipart_start()这个涵数是为服务器指定了传送一个确定的文档,如果不用这个涵数,根据脚本程序的内容服务器可以直接把指定数据传送给客户机,当然客户机不能识别这种类型的文档可以忽略而不会产生错误。但如果你指明了具体的文档类型,如例程中的text/plain(纯文本类型),客户机就不要再对文档加以分析从而提高了处理速度。否则客户机只知道传送过来的是multipart(复合型)而要重新对其分析。
至于multipart_end涵数不需作详细说明,只是说明了一个push过程的结束。

为了使大家能更好地理解这三个涵数详细的技术内容,我把这三个涵数的实现过程解析给大家:
sub multipart_init {
my($self,@p) = self_or_default(@_);
my($boundary,@other) = $self->rearrange([boundary],@p);
$boundary = $boundary || '------- =_aaaaaaaaaa0';
$self->{'separator'} = "n--$boundaryn";
$type = server_push($boundary);
return $self->header(
-nph => 1,
-type => $type,
(map { split "=", $_, 2 } @other),
) . $self->multipart_end;
}

sub multipart_start {
my($self,@p) = self_or_default(@_);
my($type,@other) = $self->rearrange([type],@p);
$type = $type || 'text/html';
return $self->header(
-type => $type,
(map { split "=", $_, 2 } @other),
);
}

sub multipart_end {
my($self,@p) = self_or_default(@_);
return $self->{'separator'};
}

 
 收藏本文  打印本文  论坛讨论  关闭窗口
· 上一篇:用shell写守护进程
· 下一篇:Perl CGI 程式写作常问问题集(六)
· When perl is not quite fast enough
· CGI教程(12)ErrorDocument 指令
· 利用Perl开发Internet/Intranet应用之二(2)
· 在CGI中实现session的想法和实现
· CGI 安全问题


关于本站 | 联系我们 | 业务合作 | 客户案例 | 诚聘英才 | 广告合作 | 收藏本站
海口动网先锋网络科技有限公司版权所有
Copyright © 2000 - 2006 Cndw.Com
中华人民共和国电信与信息服务业务经营许可证编号 琼 ICP 020077