The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

VMPS::Server - VLAN Membership Policy Server

This package implements a VMPS server. For more information on VMPS itself, consult the Cisco web site:

    http://www.cisco.com/

VERSION

Version 0.04

SYNOPSIS

    package My::VMPSServer;
    use base qw/VMPS::Server/;

    sub vmps_request{ ... }

    __PACKAGE__->run();

HANDLING REQUESTS

vmps_request()

Child modules should implement the vmps_request method. The method should return a VMPS::Packet response object. The default behavior is to reject all requests. For more info, see VMPS::Packet.

    sub vmps_request {
        my ($this, $packet, $from_ip) = @_;
        ....
        return $packet->reply(...);
    }

DEFAULTS

The module listens on the "vqp" port (1589/udp), on all interfaces.

CUSTOMIZING

This module inherits its behavior from Net::Server. Sub-classes may implement any of the hooks/arguments from Net::Server in order to customize their behavior. For more information, see the documentation for Net::Server.

AUTHOR

kevin brintnall, <kbrint at rufus.net>

ACKNOWLEDGEMENTS

The packet handling code is based on VQP spec documentation from the OpenVMPS project. For more information, see:

    http://vmps.sourceforge.net/

COPYRIGHT & LICENSE

Copyright 2008 kevin brintnall, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.