一个php作的文本留言本的例子(四)

引用“星空浪子”php中文文档的例子: 聊天室,是 Web
站上打发无聊人士的秘密武器。同时,站长或其它人员也可以在这儿杀时间。甚至发生一段轰轰烈烈的网路恋情呢,就算没有,起码可以增加打字的速度。
聊天室,其实就是多人共同使用的 CGI
程式。程式将每个人输入的字串,依系统接收完成的时间整理过后,再送给各个使用者。而
Web 聊天室和 BBS 的聊天室不同的地方是 BBS
聊天室可以每收到一句话,就马上分送给每位在聊天室的网路使用者;Web 由于
CGI 程式不能像 BBS 的 telnet 一直连线,Web CGI
必须以最快的速度将资讯送出,然后结束连线。会形成这种情形,就是因为 Web
聊天室还是使用 HTTP 传输协定,在 HTTP 实作的版本,无论是 0.9、1.0 或是
1.1 版都不能长期占据网路连线的 Port。
为了解决资料无法马上传输的问题,及更新讯息的问题,Netscape 在 3.0
版浏览器之后使用了新的技术,而 Internet Explorer 也实作了这些 Netscape
研发出来的技术。Netscape 将它分成 Server Push 及 Client Pull
二种技术。Server Push 由 Web 伺服器将资料以多重 MIME
编码,送给使用者端,目前较少网站使用这种方式;而 Client Pull 则利用了
HTML 的 meta 标签,并利用
的属性,表示资料要重新载入,至于载入时间,则利用 content 属性来达成。
meta 标签通常都放在 head../head
的区段中,以便让浏览器可以仅早准备更新使用者端的网页。下面为 meta 和 PHP
合用的例子,设定为每十五秒重新载入一次。 meta content=15; url=? echo
$PHP_SELF; ? 如果不用 Server Push 或是 Client Pull
来做聊天室,是否有其它的方法,让 Web
的浏览器能聊天呢?答案是肯定的。可以使用 Java 或是 ActiveX (限 IE4、5)
来做甚至自行开发专属的 Browser Plug-in 程式 (如奇摩的聊天室),不过这就和
PHP 没有关系了,不是我们要的重点。
除此之外,由于定期更新所有网友的留言,为了怕写了一半因为 refresh
而被清掉尚未写好的字串,因此将聊天室以 frame
的页框技术来做是有必要的。下例就是聊天室的主程式。 html head
title聊天室/title /head frameset rows=*,40 border=1 frame src=list.php
name=list scrolling=auto frame src=post.php name=post scrolling=no
noframes body 本聊天室需使用页框,您的浏览器无法使用 /body /noframes
/frameset /html 程式中以 frame 带出二支 PHP
程式,建议将它们放在同一目录之中,例如
/chatroom,以便日后维护。另外,为了 list.php 及 post.php
可以使用相同的变数,下例将共通的变路路径放在 env.inc 中,可以将它放在
/chatroom 或是 Web 伺服器 (如 Apache) 的 PHP include 设定路径中。 ?php
// 档名: env.inc $tempdir=/tmp/; $chatfile=/tmp/abc; ?
聊天室的后端可以设计的很简单,单纯的使用档案来做,也可以弄个资料库,将聊天的内容丢入,若是真的很在意系统效率,或许可以考虑使用
UNIX 的行程通讯 IPC 了。
本节即将使用者留言的内容放入档案中,在这儿的例子大部份都使用 UNIX/Linux
的外部指令。若系统无该指令 (或称程式),请自行安装相关程式。
实际上将资料丢入档案中会比使用资料库还快,若还很在乎速度,可以在 UNIX
机器中装上 RAM Disk,再将档案的存取路径都设在该 RAM Disk
上,保证存取速度能满足严苛的要求。在有些以高速度搜寻引擎为号召的网站,甚至将整个资料库资料都放到
RAM Disk 中,马上让系统速度提高十倍百倍,而且 RAM
的价格和其它解决方案相比的话还算很便宜。若使用 Windows
NT,那就没办法了,看微软什么时候提供,或者用 Third Party 的产品了。
有些使用者可能对 UNIX 还不是很熟,在这儿先简介会用到的指令: touch:
建立新档案,或修改旧档的最后更新日期。 echo 加上二个大于符号:
将字串显示转向到指定的地方。 tail:
显示档案最后数行的资料,内定值为十行,可使用减号加数字,修改欲显示的行数。
下面为送出及处理留言字串的程式,程式用到 env.inc 的档案。 ?php // 档名:
post.php require(env.inc); if (($chatuser!=) and ($chattext!=)) {
$chatstr=font color=8080ff.date(h:i:s)./font-font
color=ff8080.$chatuser./font: .$chattext; $cmdstr=echo /.$chatstr./
.$chatfile; if (!file_exists($chatfile)) passthru(touch .$chatfile);
passthru($cmdstr); } ?html body bgcolor=ffffff leftmargin=0 topmargin=0
marginheight=0 marginwidth=0 form action=? echo $PHP_SELF; ?
method=post table border=0 width=100%tr td align=right匿称:/td tdinput
type=text name=chatuser size=8 value=? echo $chatuser; ?/td td
align=right发言:/td tdinput type=text name=chattext size=30
maxlength=500/td tddiv align=rightinput type=submit value=送出/td
/tr/table /form /body /html
程式先检查是否有输入字串,若无匿名及发言内容字串则显示发言的表单
(Form),若有资料则将字串及当时时间存入档案中 (利用 UNIX
的转向指令)。当然,为了防止错误,先检查是否有档案可存档,若没有则先
touch 该档,例中的档案就是 /tmp/abc。 html meta content=5; url=? echo
$PHP_SELF; ? meta content=text/html; charset=gb2312 body bgcolor=ffffff
leftmargin=0 topmargin=0 marginheight=0 marginwidth=0 ? // 档名:
list.php require(env.inc); if (!file_exists($chatfile)) { echo
尚未开张/body/html; exit; } $uniqfile=$tempdir.uniqid(rand());
$shellcmd=/usr/bin/tail -50 .$chatfile. .$uniqfile; passthru($shellcmd);
$chatfilearray=file($uniqfile); $j=count($chatfilearray); for ($i=1;
$i=$j; $i++) { echo $chatfilearray[$j-$i].br/n; } unlink($uniqfile); ?
/body /html 上面的程式就是使用 Client Pull
的技术,每五秒就重新更新一次。同样地,它也 require 共用的 env.inc
档,要改变其中的变数时,马上就可以让所有的程式用到,这对开发网站来说,是蛮重要的方法,可以将网页程式中都会出现的地方。例如
Copyright (C) 1996-2000
的字串,放在一个档案上,到了新的一年,只要改一个档,整个站都改了。 if
(!file_exists($chatfile)) { echo 尚未开张/body/html; exit; }
$uniqfile=$tempdir.uniqid(rand()); $shellcmd=/usr/bin/tail -50
.$chatfile. .$uniqfile; passthru($shellcmd);
程式先检查有没有使用者发送聊天内容的档案
/tmp/abc,若没有就显示尚未开张,等使用者送聊天内容。若已有聊天资料,就抓出最后五十笔,在在另外的档案中准备显示。
$chatfilearray=file($uniqfile); $j=count($chatfilearray); for ($i=1;
$i=$j; $i++) { echo $chatfilearray[$j-$i].br/n; } unlink($uniqfile);
将档案读入阵列变数 $chatfilearray
中,并以最后的资料最先显示的方式送给浏览器端,当然可以使用对阵列排序的方法,但确定一定时最后存入的资料在最后面,将它排序实在很浪费
CPU 时间,因此就从最后 echo 到最前面的资料。使用完成还要用 unlink()
指令,将临时档杀掉。

这一节我们将dele.php和sys.php放上来. ——— //dele.phphtml head
title删除留言/title style !– A:link {text-decoration: none ;
color:0000ff} A:visited {text-decoration: none; color:004080} A:active
{text-decoration: none} A:hover {text-decoration: underline;
color:ff0000} BODY {FONT-SIZE:10pt} TH {FONT-SIZE:10 pt} TD {FONT-SIZE:
10pt} — /style meta content=text/html; charset=gb2312 /head ?
require(sys.php); if ($Submit) { if ($password$managepwd) {$errorm=font
color=red密码错误/font.无权操作..;} else{ $content=file($guestfile);
$message=$content[$record-1]; $count=count($content); if
($dele==delreply) { $replylen=strlen(strstr($message,!–reply));
$long=strlen($message); $len=$long-$replylen;
$message=substr($message,0,$len); } else {$message=;} //writefile
$fp=fopen($guestfile,w); for ($i=0;$i$count;$i++) { if
($i==($record-1)){$content[$i]=$message;}
fputs($fp,$content[$i],strlen($content[$i])); }//end for
fclose($fp); echo meta content=1;url=guest.php; exit; } }// end ifSubmit
$content=file($guestfile); $message=$content[$record-1];
$found=ereg(!–reply,$message); ? body bgcolor=#FFFFFF
background=back.gif ? include(head.htm); ? table width=68% border=1
cellpadding=5 align=center cellspacing=0 bordercolor=#F2F2F2 form
action=dele.php method=post ? if ($errorm) { echo tr; echo td
height=27$errorm/td; echo /tr; } ? ? echo $message ? tr align=centertd
height=37 bgcolor=#f0f0f0? if ($found) { echo input type=radio
name=dele value=delall; echo 全部删除 ; echo input type=radio name=dele
value=delreply checked; echo 仅删除回复; } ? font
color=#000000管理密码/fontinput type=password name=password size=10
input type=hidden name=record value=? echo $record;? input type=submit
name=Submit value=我要删除了 /td /tr /form /table ? include(bottom.htm);
? /body /html —— //sys.php titlezihanonline/title?
$managepwd=’zihanonline’; $guestfile=guest.txt; function
check_strlen_long($txt) { $count=0; $arrtemp=$txt; $len=strlen($txt);
$txt=$txt.”; for ($i=0;$i$len;$i++) { if (ord($txt[$i])128) {
$count=$count+1;} if (ord($txt[$i])==10 or ord($txt[$i])==32)
{$count=0;} if ($count=70){ for ($j=$i;$j$len;$j++) {
$txt[$j+1]=$arrtemp[$j]; } $txt[$i]=n; $len=$len+1;
$txt[$len]=$arrtemp[$len-1]; $count=0; $arrtemp=$txt; }//end if
count } $txt=trim($txt); return $txt; }//end function function encode
($txt) { $txt=strip_tags($txt); $txt=htmlspecialchars($txt);
$message=StripSlashes($txt); return $message; } function ubb($txt) { } ?
body bgcolor=#FFFFFF background=back.gif ———- 注意sys.php中的
$managepwd=’zihanonline’
一栏中等号后的是留言本的管理密码号,此时是默认的zihanonline.您可以修改为自己的号码.
未完待续…

You can leave a response, or trackback from your own site.

Leave a Reply

网站地图xml地图