ASP4::Mock::Connection - Mimic the Apache2::Connection object

ASP4 documentation Contained in the ASP4 distribution.

Index

Code Index:

NAME

Top

ASP4::Mock::Connection - Mimic the Apache2::Connection object

SYNOPSIS

Top

  my $connection = $r->connection;

  if( $connection->aborted ) {
    # The connection has been closed:
  }

  my $socket = $connection->client_socket;

DESCRIPTION

Top

Minimal mimic of the Apache2::Connection object.

PUBLIC PROPERTIES

Top

aborted( )

Returns true or false, if the current connection has been aborted or not - respectively.

client_socket( )

Returns an instance of ASP4::Mock::ClientSocket.

BUGS

Top

It's possible that some bugs have found their way into this release.

Use RT http://rt.cpan.org/NoAuth/Bugs.html?Dist=ASP4 to submit bug reports.

HOMEPAGE

Top

Please visit the ASP4 homepage at http://0x31337.org/code/ to see examples of ASP4 in action.

ASP4 documentation Contained in the ASP4 distribution. 
package ASP4::Mock::Connection;

use strict;
use warnings 'all';
use ASP4::Mock::ClientSocket;

sub new {
  my $s = bless {
    aborted => 0,
    client_socket  => ASP4::Mock::ClientSocket->new()
  }, shift;
  $s->{client_socket}->on_close(sub {
    $s->{aborted} = 0;
  });
  
  return $s;
}

sub aborted { shift->{aborted} }
sub client_socket { shift->{client_socket} }
sub remote_addr { }

1;# return true: