/[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 64 by andrew.betts, Mon Jan 19 11:19:41 2009 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->{'socketFN'},
206                            $self->{'name'},
207                          $subscriber->{'ip'},                          $subscriber->{'ip'},
208                          $subscriber->{'subscriberID'},                          $subscriber->{'subscriberID'},
                         $self->{'name'},  
209                          $timeConnected,                          $timeConnected,
210                          $subscriber->{'MessageCount'},                          $subscriber->{'messageCount'},
211                          $subscriber->{'bytesWritten'},                          $subscriber->{'bytesWritten'},
212                          $reason                          $reason
213                  );                  );
Legend:
Removed from v.58  
changed lines
  Added in v.64
  ViewVC Help
Powered by ViewVC 1.1.26