111 |
$self->{'writeBuffer'}=''; |
$self->{'writeBuffer'}=''; |
112 |
$self->{'readBuffer'}=''; |
$self->{'readBuffer'}=''; |
113 |
|
|
114 |
|
$self->{'bytesWritten'}=0; |
115 |
|
|
116 |
push(@Connections,$self); |
push(@Connections,$self); |
117 |
|
|
118 |
&::syslog('debug',"New %s for %s",ref($self),$socket->{'connection'}->{'remoteIP'}); |
&::syslog('debug',"New %s for %s",ref($self),$socket->{'connection'}->{'remoteIP'}); |
226 |
if(defined($bytesWritten) && $bytesWritten>0) |
if(defined($bytesWritten) && $bytesWritten>0) |
227 |
{ |
{ |
228 |
$::Statistics->{'total_outbound_bytes'}+=$bytesWritten; |
$::Statistics->{'total_outbound_bytes'}+=$bytesWritten; |
229 |
|
$self->{'bytesWritten'}+=$bytesWritten; |
230 |
$self->{'writeBuffer'}=substr($self->{'writeBuffer'},$bytesWritten); |
$self->{'writeBuffer'}=substr($self->{'writeBuffer'},$bytesWritten); |
231 |
if(length($self->{'writeBuffer'})==0) |
if(length($self->{'writeBuffer'})==0) |
232 |
{ |
{ |