bike
/
gbootroot
mirror of https://github.com/fspc/gbootroot.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity
Browse Source

* Linked stripper options 

* Altered some visible text to reflect the DCS aspect.
master
freesource 24 years ago
parent
a8e3ecc354
commit
77fa2d1966
1 changed files with 50 additions and 22 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 60
      gBootRoot

60
gBootRoot
View File

@ -141,6 +141,7 @@ my ($spinner_advanced,$spinner_size);
my $button_count = 0; my $button_count = 0;
my $button_count_root = 0; my $button_count_root = 0;
my $obj_count = 0; my $obj_count = 0;
my $obj_count_root = 0;
my ($lib_strip_check,$bin_strip_check); my ($lib_strip_check,$bin_strip_check);
my ($lib_strip_check_root,$bin_strip_check_root,$module_strip_check_root); my ($lib_strip_check_root,$bin_strip_check_root,$module_strip_check_root);
my ($bz2_toggle,$gz_toggle); my ($bz2_toggle,$gz_toggle);
@ -329,7 +330,7 @@ button("Kernel Selection",$entry2,"Kernel Selection",1);
# Third row # Third row
hbox(); hbox();
my $entry3 = entry($true,2); my $entry3 = entry($true,2);
button("Compressed Filesystem",$entry3,"Compressed Filesystem",2); button("Root Filesystem",$entry3,"Root Filesystem",2);
# In the future, if experimenters send in data, there will be two # In the future, if experimenters send in data, there will be two
# different devices. # different devices.
@ -410,7 +411,7 @@ $vbox_advanced->show();
hbox_advanced($vbox_advanced); hbox_advanced($vbox_advanced);
my $button_advanced = new Gtk::Button("Advanced Boot Section"); my $button_advanced = new Gtk::Button("Advanced Boot Section");
$tooltips->set_tip( $button_advanced, $tooltips->set_tip( $button_advanced,
"Change settings for the bootdisk.", "" ); "Change settings for the Boot Disk Image.", "" );
$button_advanced->signal_connect("clicked",\&advanced_boot_section ); $button_advanced->signal_connect("clicked",\&advanced_boot_section );
$hbox_advanced->pack_start( $button_advanced, $true, $true, 0 ); $hbox_advanced->pack_start( $button_advanced, $true, $true, 0 );
$button_advanced->show(); $button_advanced->show();
@ -424,7 +425,7 @@ $vbox_advanced_root->show();
hbox_advanced($vbox_advanced_root); hbox_advanced($vbox_advanced_root);
$button_advanced = new Gtk::Button("Advanced Root Section"); $button_advanced = new Gtk::Button("Advanced Root Section");
$tooltips->set_tip( $button_advanced, $tooltips->set_tip( $button_advanced,
"Generate a root system and/or use a different root device.", "" ); "Generate a Root Filesystem and/or use a different Root Device.", "" );
$button_advanced->signal_connect("clicked",\&advanced_root_section ); $button_advanced->signal_connect("clicked",\&advanced_root_section );
$hbox_advanced->pack_start( $button_advanced, $true, $true, 0 ); $hbox_advanced->pack_start( $button_advanced, $true, $true, 0 );
$button_advanced->show(); $button_advanced->show();
@ -518,26 +519,46 @@ sub objcopy_right_click_advanced {
if ( ( defined( $event->{'type'} ) ) if ( ( defined( $event->{'type'} ) )
and ( $event->{'type'} eq 'button_press' ) ) { and ( $event->{'type'} eq 'button_press' ) ) {
if ( $event->{'button'} == 3 ) { if ( $event->{'button'} == 3 ) {
if (defined $lib_strip_check) {
if ($obj_count == 0) { if ($obj_count == 0) {
$tooltips->set_tip( $lib_strip_check, $tooltips->set_tip( $lib_strip_check,
"This is generally a good idea. Press the" . "This is generally a good idea." .
" right mouse button to change from" . " Press the right mouse button to" .
" [objcopy --strip-all] to" . " change from [objcopy --strip-all]" .
" [objcopy --strip-debug].", "" ); " to [objcopy --strip-debug].", "" );
$obj_count++; $obj_count++;
} }
else { else {
$tooltips->set_tip( $lib_strip_check, $tooltips->set_tip( $lib_strip_check,
"This is generally a good idea. Press the" . "This is generally a good idea." .
" right mouse button to change from" . " Press the right mouse button to" .
" [objcopy --strip-debug] to" . " change from [objcopy --strip-debug]".
" [objcopy --strip-all].", "" ); " to [objcopy --strip-all].", "" );
$obj_count--; $obj_count--;
} }
} }
if (defined $lib_strip_check_root) {
if ($obj_count_root == 0) {
$tooltips->set_tip( $lib_strip_check_root,
"This is generally a good idea." .
" Press the right mouse button to" .
" change from [objcopy --strip-all]" .
" to [objcopy --strip-debug].", "" );
$obj_count_root++;
}
else {
$tooltips->set_tip( $lib_strip_check_root,
"This is generally a good idea." .
" Press the right mouse button to" .
" change from [objcopy --strip-debug]".
" to [objcopy --strip-all].", "" );
$obj_count_root--;
}
}
}
} }
} } # end obj_right_click_advanced
sub advanced_boot_section { sub advanced_boot_section {
@ -771,9 +792,11 @@ sub advanced_root_section {
$compression_off->show(); $compression_off->show();
# This whole section will be relocated to the Yard box,
# since stripping isn't universal amongst methods.
#_______________________________________ #_______________________________________
# lib_strip_check # lib_strip_check
# $::strip_objfiles 1 - yes 0 - no altered Yard.pm to take # $strip_objfiles 1 - yes 0 - no altered Yard.pm to take
# into account adjustable library stripping # into account adjustable library stripping
my $hbox_between2 = new Gtk::HBox(1,1); my $hbox_between2 = new Gtk::HBox(1,1);
@ -997,8 +1020,6 @@ sub yard {
#my @stuff = <YARD>; #my @stuff = <YARD>;
#print @stuff; #print @stuff;
#start_logging_output($yard_temp,$verbosity);
# Error handling in Yard will take some strategy # Error handling in Yard will take some strategy
if (!-d $container[1] && -f $container[1]) { if (!-d $container[1] && -f $container[1]) {
kernel_version_check($container[1]); # Yard: kernel,kernel version kernel_version_check($container[1]); # Yard: kernel,kernel version
@ -1008,12 +1029,19 @@ sub yard {
error_window("Kernel Selection required"); error_window("Kernel Selection required");
return; return;
} }
read_contents_file("$template_dir$template"); read_contents_file("$template_dir$template");
extra_links("$template_dir$template"); extra_links("$template_dir$template");
library_dependencies("$template_dir$template"); library_dependencies("$template_dir$template");
hard_links(); hard_links();
space_check($tmp);
space_check($filesystem_size, $lib_strip_check_root->get_active(),
$bin_strip_check_root->get_active(),
$module_strip_check_root->get_active(),
$obj_count_root, $tmp);
} # end sub yard } # end sub yard

Write Preview
Loading…
Cancel
Save