閲覧者表示２

var xmlhttp;
var count = 0;

function check()
{
    var o = document.getElementById( "disp" );
    if( xmlhttp.readyState == 4 && xmlhttp.status == 200 )
    {
        c = parseInt( xmlhttp.responseText );
        if( count == c )
        {
            o.style.color = o.parentElement.style.color;
        }
        else
        {
            o.innerHTML = c;
            if( c < count )
            {
                o.style.color = 'blue';
            }
            else
            {
                o.style.color = 'red';
            }
            count = c;
        }
    }
}
function getVisitor()
{
    setTimeout( "getVisitor()", 30*1000 );
    
    if( count == 0 )
    {
        count = parseInt( document.getElementById( "disp" ).innerText );
    }
    /*@cc_on
    @if( @_jscript_version >= 5 )
        try
        {
            xmlhttp = new ActiveXObject( "Msxml2.XMLHTTP" );
        }
        catch( e )
        {
            try
            {
                xmlhttp = new ActiveXObject( "Microsoft.XMLHTTP" );
            }
            catch( E )
            {
                xmlhttp = false;
            }
        }
    @else
        xmlhttp = false;
    @end @*/
    if( !xmlhttp )
    {
        xmlhttp = new XMLHttpRequest();
    }
    
    if( xmlhttp )
    {
        xmlhttp.onreadystatechange = check;
        xmlhttp.open( 'GET', './visitor.cgi?reflesh=1', true );
        xmlhttp.send( null );
    }
}

#!/usr/bin/ruby -Ke

require 'cgi'
require 'htmltemplate'

def visitor( remote_addr )
    count = 0
    File.open( "visitor.txt", "r+" ) do |file|
        file.flock( File::LOCK_EX )
        now = Time.now.to_i
        exist = false
        str = ""
        file.each do |line|
            ip, time = line.chomp.split( /\t/ )
            if ip == remote_addr
                time = now
                exist = true
            end

            if time.to_i < now - 40
            else
                count += 1
                str += [ ip, time, "\n" ].join( "\t" )
            end
        end
        if !exist
         count += 1
         str += [ remote_addr, now, "\n" ].join( "\t" )
        end
        file.rewind
        file.truncate( 0 )
        file.write str
    end
    count
end

cgi = CGI.new()
if cgi["reflesh"].first
    print "Content-Type: text/plain\n"
    print "Pragma: no-cache\n"
    print "Cache-Control: no-cache\n"
    print "Expires: Thu, 01 Dec 1994 16:00:00 GMT\n\n"
    print visitor( cgi.remote_addr ).to_s
else
    html = HTMLTemplate.open( "visitor.html" )
    html.gsub!( "(\tinit\t)", visitor( cgi.remote_addr ) )
    cgi.out do
        html.to_s
    end
end