bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-03-04 03:43:23 -05:00
Code Issues Projects Releases Wiki Activity

This makes sure that the uml_exclusively and preserve_permissions remain dynamic

Browse Source 
in the YardBox.
This commit is contained in:
freesource 2001-12-20 22:47:27 +00:00
parent 2a4a174481
commit f9ad7744a7
2 changed files with 37 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
BootRoot/Yard.pm
View File

@ -91,11 +91,13 @@ sub warning {
sub verbosity { $verbosity = $_[0]; } sub verbosity { $verbosity = $_[0]; }
sub text_insert { $text_insert = $_[0]; $red = $_[1]; $blue = $_[2]; } sub text_insert { $text_insert = $_[0]; $red = $_[1]; $blue = $_[2]; }
sub logadj { $logadj = $_[0]; } sub logadj { $logadj = $_[0]; }
my ($ars, $kernel, $kernel_version_choice); my ($ars, $kernel, $kernel_version_choice, $uml_exclusively, $preserve_permissions);
sub ars2 { $ars = $_[0]; sub ars2 { $ars = $_[0];
$kernel = $ars->{kernel}; $kernel = $ars->{kernel};
$kernel_version_choice = $ars->{kernel_version_choice}; $kernel_version_choice = $ars->{kernel_version_choice};
$uml_exclusively = $ars->{uml_exclusively};
$preserve_permissions = $ars->{preserve_permissions};
} }
@ -159,9 +161,10 @@ sub kernel_version_check {
sub read_contents_file { sub read_contents_file {
my ( $contents_file, $mnt, $fs_size, $uml_expect ) = @_; my ( $contents_file, $mnt, $fs_size) = @_;
my $error; my $error;
# It's a good idea to clear the text buffer in the verbosity box # It's a good idea to clear the text buffer in the verbosity box
$text_insert->backward_delete($text_insert->get_length()); $text_insert->backward_delete($text_insert->get_length());
@ -208,7 +211,7 @@ sub read_contents_file {
print DEVICE_TABLE "/dev\t\td\t0755\t-\t-\t-\t-\t-\t-\t-\n"; print DEVICE_TABLE "/dev\t\td\t0755\t-\t-\t-\t-\t-\t-\t-\n";
} }
if ( $uml_expect->{uml_exclusively} == 1 ) { if ( $uml_exclusively == 1 ) {
unlink("$mnt/device_table.txt") if -e "$mnt/device_table.txt"; unlink("$mnt/device_table.txt") if -e "$mnt/device_table.txt";
system "rm -rf $mnt/loopback"; system "rm -rf $mnt/loopback";
@ -240,7 +243,7 @@ sub read_contents_file {
# and appending the changes to the device table. --freesource # and appending the changes to the device table. --freesource
if ( $fs_type eq "genext2fs" && $fs_size <= 8192 && if ( $fs_type eq "genext2fs" && $fs_size <= 8192 &&
$uml_expect->{uml_exclusively} == 0 ) { $uml_exclusively == 0 ) {
# If a device is found on the same line with a non-device(s) # If a device is found on the same line with a non-device(s)
# the non-device(s) is sent on its merry way. # the non-device(s) is sent on its merry way.
@ -1117,7 +1120,7 @@ sub space_check {
sub create_filesystem { sub create_filesystem {
my ($filename, $fs_size, $mnt, $strip_lib, my ($filename, $fs_size, $mnt, $strip_lib,
$strip_bin, $strip_module, $obj_count, $uml_expect) = @_; $strip_bin, $strip_module, $obj_count) = @_;
$device = "$mnt/$filename"; $device = "$mnt/$filename";
$mount_point = "$mnt/loopback"; $mount_point = "$mnt/loopback";
@ -1143,7 +1146,7 @@ sub create_filesystem {
# is doing. This gives him the opportunity to use the loop device, # is doing. This gives him the opportunity to use the loop device,
# but his fs will almost definitely not work, because of permissions. # but his fs will almost definitely not work, because of permissions.
if ( $> != 0 && $uml_expect->{uml_exclusively} == 0 && if ( $> != 0 && $uml_exclusively == 0 &&
$fs_type ne "genext2fs" ) { $fs_type ne "genext2fs" ) {
@ -1151,7 +1154,7 @@ sub create_filesystem {
# Allow smaller than 8192 if exclusive. # Allow smaller than 8192 if exclusive.
if ( $uml_expect->{uml_exclusively} == 1 ) { if ( $uml_exclusively == 1 ) {
sync(); sync();
sys("dd if=/dev/zero of=$device bs=1k count=$fs_size"); sys("dd if=/dev/zero of=$device bs=1k count=$fs_size");
sync(); sync();
@ -1171,7 +1174,7 @@ sub create_filesystem {
# that exists now for non-root users, but if uml_exclusively # that exists now for non-root users, but if uml_exclusively
# then the filsystem will be used from the helper machine. --freesource # then the filsystem will be used from the helper machine. --freesource
if ( $fs_type ne "genext2fs" && if ( $fs_type ne "genext2fs" &&
$uml_expect->{uml_exclusively} == 0 ) { $uml_exclusively == 0 ) {
if (-f $device) { if (-f $device) {
##### If device is a plain file, it means we're using some ##### If device is a plain file, it means we're using some
@ -1201,7 +1204,7 @@ sub create_filesystem {
if ( $fs_type ne "genext2fs" && if ( $fs_type ne "genext2fs" &&
$uml_expect->{uml_exclusively} == 0 ) { $uml_exclusively == 0 ) {
return "ERROR" if errm(mount_device($device,$mount_point)) == 2; return "ERROR" if errm(mount_device($device,$mount_point)) == 2;
##### lost+found on a ramdisk is pointless ##### lost+found on a ramdisk is pointless
@ -1361,7 +1364,7 @@ sub create_filesystem {
} }
if ( $fs_type ne "genext2fs" && $uml_expect->{uml_exclusively} == 0 ) { if ( $fs_type ne "genext2fs" && $uml_exclusively == 0 ) {
## Probably will want to umount here ## Probably will want to umount here
return "ERROR" if errum(sys("umount $mount_point")) == 2; return "ERROR" if errum(sys("umount $mount_point")) == 2;
} }
@ -1378,7 +1381,7 @@ sub create_filesystem {
# Just for testing purposes .. working out the logic in a little bit. # Just for testing purposes .. working out the logic in a little bit.
if ( $uml_expect->{uml_exclusively} ) { if ( $uml_exclusively ) {
my $expect_program = "/usr/lib/bootroot/expect_uml"; my $expect_program = "/usr/lib/bootroot/expect_uml";
@ -1386,7 +1389,7 @@ sub create_filesystem {
my $ubd0 = my $ubd0 =
"ubd0=/usr/lib/bootroot/root_filesystem/root_fs_helper"; "ubd0=/usr/lib/bootroot/root_filesystem/root_fs_helper";
my $ubd1 = "ubd1=$device"; my $ubd1 = "ubd1=$device";
my $options = "root=/dev/ubd0"; my $options = "root=/dev/ubd0"; # need to keep this 1
my $filesystem; my $filesystem;
if ( $fs_type eq "genext2fs" ) { if ( $fs_type eq "genext2fs" ) {
$filesystem = "mke2fs -m0"; $filesystem = "mke2fs -m0";
@ -1398,7 +1401,7 @@ sub create_filesystem {
my $x_count = 1; my $x_count = 1;
my $command_line = "$expect_program $ubd0 $ubd1 $options " . my $command_line = "$expect_program $ubd0 $ubd1 $options " .
"$mount_point $uml_expect->{preserve_permissions} $filesystem"; "$mount_point $preserve_permissions $filesystem";
info(1,"\n$command_line\n\n"); info(1,"\n$command_line\n\n");

23
BootRoot/YardBox.pm
View File

@ -282,6 +282,13 @@ sub filesystem_size {
!$uml_expect{uml_exclusively}; !$uml_expect{uml_exclusively};
$uml_expect{preserve_permissions} = 1 if $uml_expect{preserve_permissions} = 1 if
!$uml_expect{preserve_permissions}; !$uml_expect{preserve_permissions};
$ars->{uml_exclusively} = $uml_expect{uml_exclusively};
ars2($ars);
$ars->{preserve_permissions} = $uml_expect{preserve_permissions};
ars2($ars);
} }
else { else {
@ -309,8 +316,15 @@ sub filesystem_size {
} }
} }
$ars->{uml_exclusively} = $uml_expect{uml_exclusively};
ars2($ars);
$uml_expect{preserve_permissions} = 0 if $uml_expect{preserve_permissions} = 0 if
!$uml_expect{preserve_permissions}; !$uml_expect{preserve_permissions};
$ars->{preserve_permissions} = $uml_expect{preserve_permissions};
ars2($ars);
} }
} # end sub fileystem_size } # end sub fileystem_size
@ -379,7 +393,10 @@ sub file_system {
$uml_expect{uml_exclusively} = 1; $uml_expect{uml_exclusively} = 1;
} }
# for Yard.pm
$ars->{uml_exclusively} =
$uml_expect{uml_exclusively};
ars2($ars);
}); });
$table_filesystem->attach($uml_exclusively,0,1,1,2,['expand'], $table_filesystem->attach($uml_exclusively,0,1,1,2,['expand'],
['fill','shrink'],0,0); ['fill','shrink'],0,0);
@ -407,7 +424,9 @@ sub file_system {
$uml_expect{preserve_permissions} = 1; $uml_expect{preserve_permissions} = 1;
} }
$ars->{preserve_permissions} =
$uml_expect{preserve_permissions};
ars2($ars);
}); });
$preserve_permissions->show; $preserve_permissions->show;