HH::Unispool::Config::File::Token::Numbered::Device::7 - device type C<7> device I<D> token


HH-Unispool-Config documentation Contained in the HH-Unispool-Config distribution.

Index


Code Index:

NAME

Top

HH::Unispool::Config::File::Token::Numbered::Device::7 - device type 7 device D token

SYNOPSIS

Top

Application programmers don't need to use this class and API programmers read code.

ABSTRACT

Top

device type 7 device D token

DESCRIPTION

Top

HH::Unispool::Config::File::Token::Numbered::Device::7 contans device type 7 device D token information.

CONSTRUCTOR

Top

new(OPT_HASH_REF)

Creates a new HH::Unispool::Config::File::Token::Numbered::Device::7 object. OPT_HASH_REF is a hash reference used to pass initialization options. OPT_HASH_REF is mandatory. On error an exception Error::Simple is thrown.

Options for OPT_HASH_REF inherited through package HH::Unispool::Config::File::Token may include:

input_line_number

Passed to set_input_line_number().

Options for OPT_HASH_REF inherited through package HH::Unispool::Config::File::Token::Numbered may include:

number

Passed to set_number().

Options for OPT_HASH_REF inherited through package HH::Unispool::Config::File::Token::Numbered::Device may include:

block_delay

Passed to set_block_delay().

buffer_size

Passed to set_buffer_size().

connect_retry

Passed to set_connect_retry().

device_name

Passed to set_device_name(). Mandatory option.

device_password

Passed to set_device_password().

execution_priority

Passed to set_execution_priority().

initially_spooled

Passed to set_initially_spooled().

networkwide

Passed to set_networkwide().

page_length

Passed to set_page_length().

page_width

Passed to set_page_width().

remote_device_name

Passed to set_remote_device_name().

remote_system_name

Passed to set_remote_system_name().

save_printfile

Passed to set_save_printfile().

unispool_control

Passed to set_unispool_control().

unispool_header

Passed to set_unispool_header().

new_from_string(LINE)

Creates a new object from the specified Unispool config file line string.

METHODS

Top

get_block_delay()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the time in seconds UNISPOOL should pause between sending two blocks.

get_buffer_size()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the number of bytes sent to the printer in one write operation.

get_connect_retry()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the number of seconds UNISPOOL should wait if the connection can not be established immediately.

get_device_name()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the unique name for the device.

get_device_password()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the password required to access the device.

get_execution_priority()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the execution priority of the driver process on MPE hosts.

get_input_line_number()

This method is inherited from package HH::Unispool::Config::File::Token. Returns the line number from from which the token is read.

get_number()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered. Returns the number of the entry.

get_page_length()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the page length (lines) for determining the size of UNISPOOL banners.

get_page_width()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the page width (bytes) for determining the size of UNISPOOL banners.

get_remote_device_name()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the device on the remote system that will receive the output.

get_remote_system_name()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns the name of the system to which the output for this device must be routed.

is_initially_spooled()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns whether an automatic STARTSPOOL must be performed when UNISPOOL is started or not.

is_networkwide()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns whether the device must be made available from each node in the configuration cluster or not.

is_save_printfile()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns whether printfiles printed on this device should be saved or not.

is_unispool_control()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns whether the UNISPOOL control is on (is not available on development system used) or not.

is_unispool_header()

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Returns whether standard UNISPOOL banners pages are printed initially or not.

read_string(LINE)

This method is overloaded from package HH::Unispool::Config::File::Token::Numbered::Device. Reads the Unispool config file token from a line string. LINE is a plain line string. On error an exception Error::Simple is thrown.

set_block_delay(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the time in seconds UNISPOOL should pause between sending two blocks. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^\d*$

set_buffer_size(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the number of bytes sent to the printer in one write operation. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^\d*$

set_connect_retry(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the number of seconds UNISPOOL should wait if the connection can not be established immediately. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^\d*$

set_device_name(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the unique name for the device. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^.+$

set_device_password(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the password required to access the device. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^.*$

set_execution_priority(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the execution priority of the driver process on MPE hosts. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must be a (sub)class of:

HH::Unispool::Config::ExecPri

set_initially_spooled(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. State that an automatic STARTSPOOL must be performed when UNISPOOL is started. VALUE is the value. On error an exception Error::Simple is thrown.

set_input_line_number(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token. Set the line number from from which the token is read. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^\d*$

set_networkwide(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. State that the device must be made available from each node in the configuration cluster. VALUE is the value. On error an exception Error::Simple is thrown.

set_number(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered. Set the number of the entry. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^\d*$

set_page_length(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the page length (lines) for determining the size of UNISPOOL banners. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^\d*$

set_page_width(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the page width (bytes) for determining the size of UNISPOOL banners. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^\d*$

set_remote_device_name(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the device on the remote system that will receive the output. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^.*$

set_remote_system_name(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. Set the name of the system to which the output for this device must be routed. VALUE is the value. On error an exception Error::Simple is thrown.

VALUE must match regular expression:

^.*$

set_save_printfile(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. State that printfiles printed on this device should be saved. VALUE is the value. On error an exception Error::Simple is thrown.

set_unispool_control(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. State that the UNISPOOL control is on (is not available on development system used). VALUE is the value. On error an exception Error::Simple is thrown.

set_unispool_header(VALUE)

This method is inherited from package HH::Unispool::Config::File::Token::Numbered::Device. State that standard UNISPOOL banners pages are printed initially. VALUE is the value. On error an exception Error::Simple is thrown.

write_string()

This method is overloaded from package HH::Unispool::Config::File::Token::Numbered::Device. Returns a Unispool config file token line string.

SEE ALSO

Top

HH::Unispool::Config, HH::Unispool::Config::DateFormat, HH::Unispool::Config::Entry, HH::Unispool::Config::Entry::Device, HH::Unispool::Config::Entry::Device::0, HH::Unispool::Config::Entry::Device::1, HH::Unispool::Config::Entry::Device::2, HH::Unispool::Config::Entry::Device::3, HH::Unispool::Config::Entry::Device::4, HH::Unispool::Config::Entry::Device::5, HH::Unispool::Config::Entry::Device::6, HH::Unispool::Config::Entry::Device::7, HH::Unispool::Config::Entry::Filter, HH::Unispool::Config::Entry::Numbered, HH::Unispool::Config::Entry::RemoteSystem, HH::Unispool::Config::Entry::RemoteSystem::3, HH::Unispool::Config::Entry::RemoteSystem::6, HH::Unispool::Config::Entry::RemoteSystem::7, HH::Unispool::Config::Entry::RemoteSystem::8, HH::Unispool::Config::Entry::System, HH::Unispool::Config::ExecPri, HH::Unispool::Config::File::Token, HH::Unispool::Config::File::Token::Comment, HH::Unispool::Config::File::Token::Comment::Cs, HH::Unispool::Config::File::Token::Comment::Date, HH::Unispool::Config::File::Token::Comment::Device, HH::Unispool::Config::File::Token::Comment::Filter, HH::Unispool::Config::File::Token::Comment::Group, HH::Unispool::Config::File::Token::Comment::Head, HH::Unispool::Config::File::Token::Comment::Misc, HH::Unispool::Config::File::Token::Comment::NetDesc, HH::Unispool::Config::File::Token::Comment::RSys, HH::Unispool::Config::File::Token::Comment::Scope, HH::Unispool::Config::File::Token::Comment::Tail, HH::Unispool::Config::File::Token::Factory, HH::Unispool::Config::File::Token::Numbered, HH::Unispool::Config::File::Token::Numbered::Device, HH::Unispool::Config::File::Token::Numbered::Device::0, HH::Unispool::Config::File::Token::Numbered::Device::1, HH::Unispool::Config::File::Token::Numbered::Device::2, HH::Unispool::Config::File::Token::Numbered::Device::3, HH::Unispool::Config::File::Token::Numbered::Device::4, HH::Unispool::Config::File::Token::Numbered::Device::5, HH::Unispool::Config::File::Token::Numbered::Device::6, HH::Unispool::Config::File::Token::Numbered::Device::Group, HH::Unispool::Config::File::Token::Numbered::Device::Info, HH::Unispool::Config::File::Token::Numbered::Device::P, HH::Unispool::Config::File::Token::Numbered::Network, HH::Unispool::Config::File::Token::Numbered::System, HH::Unispool::Config::File::Token::Numbered::System::3, HH::Unispool::Config::File::Token::Numbered::System::6, HH::Unispool::Config::File::Token::Numbered::System::7, HH::Unispool::Config::File::Token::Numbered::System::8, HH::Unispool::Config::File::Token::Numbered::System::Info, HH::Unispool::Config::File::Token::Numbered::X, HH::Unispool::Config::File::Token::Unnumbered, HH::Unispool::Config::File::Token::Unnumbered::Bcs, HH::Unispool::Config::File::Token::Unnumbered::CSN, HH::Unispool::Config::File::Token::Unnumbered::Cs, HH::Unispool::Config::File::Token::Unnumbered::CsBcs, HH::Unispool::Config::File::Token::Unnumbered::Filter, HH::Unispool::Config::File::Token::Unnumbered::Host, HH::Unispool::Config::File::Token::Unnumbered::Misc, HH::Unispool::Config::File::Tokenizer, HH::Unispool::Config::FilterType, HH::Unispool::Config::OS, HH::Unispool::Config::Scope

BUGS

Top

None known (yet.)

HISTORY

Top

First development: February 2003 Last update: September 2003

AUTHOR

Top

Vincenzo Zocca

COPYRIGHT

Top

LICENSE

Top

This file is part of the HH::Unispool::Config module hierarchy for Perl by Vincenzo Zocca.

The HH::Unispool::Config module hierarchy is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version.

The HH::Unispool::Config module hierarchy is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License along with the HH::Unispool::Config module hierarchy; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA


HH-Unispool-Config documentation Contained in the HH-Unispool-Config distribution.

package HH::Unispool::Config::File::Token::Numbered::Device::7;

use 5.006;
use base qw( HH::Unispool::Config::File::Token::Numbered::Device );
use strict;
use warnings;
use AutoLoader qw(AUTOLOAD);
use Error qw(:try);
use HH::Unispool::Config::File::Token qw( :rx :frm );

# Package version
our ($VERSION) = '$Revision: 0.3 $' =~ /\$Revision:\s+([^\s]+)/;

1;

__END__

sub read_string {
    my $self = shift;
    my $line = shift;

    # Parse line for name
    my ($number, $device_name, $tail) = $line =~ /$USP_D7_RX/;
    defined($number) || throw Error::Simple("ERROR: HH::Unispool::Config::File::Token::Numbered::Device::7::read_string, parameter 'LINE' does not match the regular expression for this token's line string.");
    $device_name =~ s/\s*$//;
    my @tail = $self->_split_tail($tail);
    my $remote_device_name = $tail[6];
    my $flags = $tail[7];
    my $execution_priority = $tail[8];
    defined($flags) && ( $flags =~ /h/i ) && throw Error::Simple("ERROR: HH::Unispool::Config::File::Token::Numbered::Device::7::read_string, flag 'H' is not allowed in the token's line string.");
    defined($flags) && ( $flags =~ /u/i ) && throw Error::Simple("ERROR: HH::Unispool::Config::File::Token::Numbered::Device::7::read_string, flag 'U' is not allowed in the token's line string.");

    # Set attributes
    $self->set_number($number);
    $self->set_device_name($device_name);
    $self->set_remote_device_name($remote_device_name);
    require HH::Unispool::Config::ExecPri;
    $self->set_execution_priority( HH::Unispool::Config::ExecPri->new( { execution_priority => $execution_priority } ) );
    $self->set_initially_spooled( $flags =~ /i/i );
    $self->set_networkwide( $flags =~ /n/i );
    $self->set_save_printfile( $flags =~ /s/i );
}

sub write_string {
    my $self = shift;

    # Make string and return it
    my $flags = '';
    $flags .= ' ';
    $flags .= $self->is_initially_spooled() ? 'I' : ' ';
    $flags .= $self->is_networkwide() ? 'N' : ' ';
    $flags .= $self->is_save_printfile() ? 'S' : ' ';
    $flags .= ' ';
    return(
        sprintf(
            $USP_D7_FRM,
            $self->get_number() || 0,
            $self->get_device_name() || '',
            $self->get_remote_device_name() || '',
            $flags || '',
            $self->get_execution_priority()->get_execution_priority() || '',
        )
    );
}