| Sys-Filesystem documentation | Contained in the Sys-Filesystem distribution. |
Sys::Filesystem::Netbsd - Return NetBSD filesystem information to Sys::Filesystem
See Sys::Filesystem.
Sys::Filesystem::Netbsd
ISA Sys::Filesystem::Unix
ISA UNIVERSAL
Return the version of the (sub)module.
The following is a list of filesystem properties which may be queried as methods through the parent Sys::Filesystem object.
Describes the block special device or remote filesystem to be mounted.
Describes the mount point for the filesystem. For swap partitions, this field should be specified as none. If the name of the mount point contains spaces these can be escaped as \040.
Dscribes the type of the filesystem.
Describes the mount options associated with the filesystem.
Used for these filesystems by the dump(8) command to determine which filesystems need to be dumped.
Used by the fsck(8) program to determine the order in which filesystem checks are done at reboot time.
$Id: Netbsd.pm 185 2010-07-15 19:25:30Z trevor $
Jens Rehsack <rehsack@cpan.org> - http://www.rehsack.de/
Copyright 2009,2010 Jens Rehsack.
This software is licensed under The Apache Software License, Version 2.0.
| Sys-Filesystem documentation | Contained in the Sys-Filesystem distribution. |
############################################################ # # $Id: Netbsd.pm 185 2010-07-15 19:25:30Z trevor $ # Sys::Filesystem - Retrieve list of filesystems and their properties # # Copyright 2009 Jens Rehsack # # Licensed under the Apache License, Version 2.0 (the "License"); # you may not use this file except in compliance with the License. # You may obtain a copy of the License at # # http://www.apache.org/licenses/LICENSE-2.0 # # Unless required by applicable law or agreed to in writing, software # distributed under the License is distributed on an "AS IS" BASIS, # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. # See the License for the specific language governing permissions and # limitations under the License. # ############################################################ package Sys::Filesystem::Netbsd; # vim:ts=4:sw=4:tw=78 use strict; use vars qw(@ISA $VERSION); require Sys::Filesystem::Unix; use Carp qw(croak); $VERSION = '1.30'; @ISA = qw(Sys::Filesystem::Unix); sub version() { return $VERSION; } # Default fstab and mtab layout my @keys = qw(fs_spec fs_file fs_vfstype fs_mntops fs_freq fs_passno); my %special_fs = ( swap => 1, procfs => 1, kernfs => 1, ptyfs => 1, tmpfs => 1, ); my $mount_rx = qr|^([/:\w]+)\s+on\s+([/\w]+)\s+type\s+(\w+)|; my $swap_rx = qr|^(/[/\w]+)\s+|; sub new { ref( my $class = shift ) && croak 'Class name required'; my %args = @_; my $self = bless( {}, $class ); # Defaults $args{fstab} ||= '/etc/fstab'; my @mounts = qx( /sbin/mount ); $self->readMounts( $mount_rx, [ 0, 1, 2 ], [qw(fs_spec fs_file fs_vfstype fs_mntops)], \%special_fs, @mounts ); $self->readSwap( $swap_rx, qx( /sbin/swapctl -l ) ); unless ( $self->readFsTab( $args{fstab}, \@keys, [ 0, 1, 2 ], \%special_fs ) ) { croak "Unable to open fstab file ($args{fstab})\n"; } return $self; } 1;