package DXProt;
+@ISA = qw(DXChannel);
+
use DXUtil;
use DXChannel;
use DXUser;
# this is how a pc connection starts (for an incoming connection)
# issue a PC38 followed by a PC18, then wait for a PC20 (remembering
# all the crap that comes between).
-sub pc_start
+sub start
{
my $self = shift;
- $self->{normal} = \&pc_normal;
- $self->{finish} = \&pc_finish;
}
#
# This is the normal pcxx despatcher
#
-sub pc_normal
+sub normal
{
}
# This is called from inside the main cluster processing loop and is used
# for despatching commands that are doing some long processing job
#
-sub pc_process
+sub process
{
}
#
# finish up a pc context
#
-sub pc_clean
+sub finish
{
}