bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-22 08:33:24 -05:00
Code Issues Projects Releases Wiki Activity

Added create_fstab().

Browse Source
This commit is contained in:
freesource 2001-08-03 03:40:22 +00:00
parent a1443bfc21
commit 581f5ee7d5
1 changed files with 61 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

64
BootRoot/Yard.pm
View File

@ -34,7 +34,7 @@ use Exporter;
@EXPORT = qw(start_logging_output info kernel_version_check verbosity @EXPORT = qw(start_logging_output info kernel_version_check verbosity
read_contents_file extra_links library_dependencies hard_links read_contents_file extra_links library_dependencies hard_links
space_check create_filesystem find_file_in_path sys space_check create_filesystem find_file_in_path sys
text_insert error logadj *LOGFILE which_tests); text_insert error logadj *LOGFILE which_tests create_fstab);
use strict; use strict;
use File::Basename; use File::Basename;
@ -774,7 +774,7 @@ sub create_filesystem {
if (sys("$main::makefs $device $fs_size") !~ if (sys("$main::makefs $device $fs_size") !~
/^0$/ ) { /^0$/ ) {
my $fs_type = (split(/\s/,$main::makefs))[0]; my $fs_type = (split(/\s/,$main::makefs))[0];
$error = error("Can not $fs_type filesystem"); $error = error("Can not $fs_type filesystem.");
return "ERROR" if $error && $error eq "ERROR"; return "ERROR" if $error && $error eq "ERROR";
} }
@ -782,7 +782,7 @@ sub create_filesystem {
if (sys("$main::makefs $device $fs_size") !~ if (sys("$main::makefs $device $fs_size") !~
/^0$/ ) { /^0$/ ) {
my $fs_type = (split(/\s/,$main::makefs))[0]; my $fs_type = (split(/\s/,$main::makefs))[0];
$error = error("Can not $fs_type filesystem"); $error = error("Can not $fs_type filesystem.");
return "ERROR" if $error && $error eq "ERROR"; return "ERROR" if $error && $error eq "ERROR";
} }
} }
@ -2123,9 +2123,67 @@ sub check_termcap {
##### END OF CHECK_ROOT_FS ##### END OF CHECK_ROOT_FS
##### REPLACEMENTS
sub create_fstab {
my($NEWFSTAB) = @_;
open(NEWFSTAB, ">$NEWFSTAB") or die "$NEWFSTAB: $!";
print NEWFSTAB <<BLARD;
# DEVICE MOUNTPOINT TYPE OPTIONS DUMP FSCKORDER
#----------------------------------------------------------------
# /dev/ram0 / ext2 defaults
/proc /proc proc defaults
# Entries adapted from existing fstab:
BLARD
my($line);
open(FSTAB, "/etc/fstab") or die "/etc/fstab: $!\n";
while ($line = <FSTAB>) {
chomp $line;
next if $line =~ /^\#/ or $line =~ /^\s*$/;
my($device, $mpt, $type, $options, @rest) = split(' ', $line);
if ($device =~ m!^/(proc|dev/ram)! or $type eq "proc") {
## Don't allow /proc or /dev/ram? definitions
next;
} elsif ($type eq 'swap') {
## Pass swap through unchanged
} else {
## By default:
## - Add a 'noauto' option if it doesn't already have one
## - Put mountpoint under oldroot
$options .= ',noauto' unless $options =~ /\bnoauto\b/;
print "$device $mpt\n";
if ($mpt eq '/') {
$mpt = "/"; # limitation of mount cmd
} else {
$mpt = $mpt;
}
}
print NEWFSTAB join("\t", ($device, $mpt, $type, $options,
@rest)), "\n";
}
close(FSTAB);
close(NEWFSTAB);
info(0,"Created $NEWFSTAB\n");
} # end create_fstab
##### END REPLACEMENTS
1; 1;