/[meteor]/googlecode.com/svn/trunk/Meteor/Channel.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /googlecode.com/svn/trunk/Meteor/Channel.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 58 by andrew.betts, Thu Mar 6 08:29:39 2008 UTC revision 62 by andrew.betts, Thu Nov 27 00:33:21 2008 UTC
# Line 4  Line 4 
4  #   An HTTP server for the 2.0 web  #   An HTTP server for the 2.0 web
5  #   Copyright (c) 2006 contributing authors  #   Copyright (c) 2006 contributing authors
6  #  #
7  #   Subscriber.pm  #   Channel.pm
8  #  #
9  #       Description:  #       Description:
10  #       A Meteor Channel  #       A Meteor Channel
# Line 163  sub addSubscriber { Line 163  sub addSubscriber {
163                    
164          &::syslog('info','',          &::syslog('info','',
165                  'joinchannel',                  'joinchannel',
166                  $subscriber->{'ip'},                  $subscriber->{'socketFN'},
                 $subscriber->{'subscriberID'},  
167                  $self->{'name'},                  $self->{'name'},
168                  $mode,                  $logStartIndex
                 $logStartIndex,  
                 $userAgent  
169          );          );
170                    
171          return unless(defined($startIndex));          return unless(defined($startIndex));
# Line 202  sub removeSubscriber { Line 199  sub removeSubscriber {
199          {          {
200                  splice(@{$self->{'subscribers'}},$idx,1);                  splice(@{$self->{'subscribers'}},$idx,1);
201                                    
202                  my $timeConnected = time - $subscriber->{'ConnectionStart'};                  my $timeConnected = time - $subscriber->{'connectionStart'};
203                  &::syslog('info','',                  &::syslog('info','',
204                          'leavechannel',                          'leavechannel',
205                          $subscriber->{'ip'},                          $subscriber->{'ip'},
206                          $subscriber->{'subscriberID'},                          $subscriber->{'subscriberID'},
207                          $self->{'name'},                          $self->{'name'},
208                          $timeConnected,                          $timeConnected,
209                          $subscriber->{'MessageCount'},                          $subscriber->{'messageCount'},
210                          $subscriber->{'bytesWritten'},                          $subscriber->{'bytesWritten'},
211                          $reason                          $reason
212                  );                  );

Legend:
Removed from v.58  
changed lines
  Added in v.62

  ViewVC Help
Powered by ViewVC 1.1.26