| Sys-Virt documentation | Contained in the Sys-Virt distribution. |
Sys::Virt::NodeDevice - Represent & manage a libvirt storage pool
The Sys::Virt::NodeDevice module represents a storage pool managed
by libvirt. There are a variety of storage pool implementations for
LVM, Local directories/filesystems, network filesystems, disk
partitioning, iSCSI, and SCSI.
Returns a string with a locally unique name of the device
Returns a string with a locally unique name of the parent of the device, or undef if there is no parent
Returns an XML document containing a complete description of the storage dev's configuration
Rebind the node device to the host OS device drivers.
Unbind the node device from the host OS device driver
Reset the node device. The device must be unbound from the host OS drivers for this to work
Destroy the virtual device releasing any OS resources associated with it.
Return a list of all capabilities in the device.
Daniel P. Berrange <berrange@redhat.com>
Copyright (C) 2006-2009 Red Hat Copyright (C) 2006-2009 Daniel P. Berrange
This program is free software; you can redistribute it and/or modify it under the terms of either 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), or, the Artistic License, as specified in the Perl README file.
Sys::Virt, Sys::Virt::Error, http://libvirt.org
| Sys-Virt documentation | Contained in the Sys-Virt distribution. |
# -*- perl -*- # # Copyright (C) 2006-2009 Red Hat # Copyright (C) 2006-2009 Daniel P. Berrange # # This program is free software; You can redistribute it and/or modify # it under either: # # a) the GNU General Public License as published by the Free # Software Foundation; either version 2, or (at your option) any # later version, # # or # # b) the "Artistic License" # # The file "LICENSE" distributed along with this file provides full # details of the terms and conditions of the two licenses.
package Sys::Virt::NodeDevice; use strict; use warnings; sub _new { my $proto = shift; my $class = ref($proto) || $proto; my %params = @_; my $con = exists $params{connection} ? $params{connection} : die "connection parameter is requried"; my $self; if (exists $params{name}) { $self = Sys::Virt::NodeDevice::_lookup_by_name($con, $params{name}); } elsif (exists $params{xml}) { $self = Sys::Virt::NodeDevice::_create_xml($con, $params{xml}); } else { die "name parameter is required"; } bless $self, $class; return $self; }
1;