Browse Source

Added Root Device widgets to ARS.

master
freesource 24 years ago
parent
commit
2a94af7f1f
  1. 80
      gBootRoot

80
gBootRoot

@ -7,6 +7,12 @@
# Developer # Developer
# Cristian Ionescu-Idbohrn <cii@axis.com> # Cristian Ionescu-Idbohrn <cii@axis.com>
# #
# Tester
# Magnus Holmberg <pucko@lysator.liu.se>
#
# Helper
# Yahshua Mashiyach
#
# http://the.netpedia.net/gBootRoot.html # http://the.netpedia.net/gBootRoot.html
# This program is free software; you can redistribute it and/or modify # This program is free software; you can redistribute it and/or modify
@ -127,8 +133,10 @@ my $separator_advanced;
my @entry_advanced; my @entry_advanced;
my $entry_advanced; my $entry_advanced;
my ($ea1,$ea2,$ea3); my ($ea1,$ea2,$ea3);
my ($ear1,$ear2,$ear3,$ear4); # entry advanced root
my $table_advanced; my $table_advanced;
my $table_advanced_root; my $table_advanced_root;
my $spinner_advanced;
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;
@ -347,6 +355,7 @@ $entry5->set_usize(15,20);
$box2->pack_start( $entry5, $true, $true, 0 ); $box2->pack_start( $entry5, $true, $true, 0 );
$entry5->show(); $entry5->show();
###########################
# The ADVANCED BOOT SECTION # The ADVANCED BOOT SECTION
########################### ###########################
# Separator # Separator
@ -367,26 +376,18 @@ $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();
########################### ###########################
# The ADVANCED ROOT SECTION # The ADVANCED ROOT SECTION
########################### ###########################
# Separator
$separator = new Gtk::HSeparator();
$vbox_advanced->pack_start( $separator, $false, $true, 0 );
$separator->show();
my $vbox_advanced_root = new Gtk::VBox($false,0); my $vbox_advanced_root = new Gtk::VBox($false,0);
$box1->add($vbox_advanced_root); $box1->add($vbox_advanced_root);
$vbox_advanced_root->show(); $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, "Change settings for the bootdisk.", "" ); $tooltips->set_tip( $button_advanced, "Generate a root system 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();
########################### ###########################
# Separator # Separator
@ -591,11 +592,35 @@ sub advanced_root_section {
if ($button_count_root == 0) { if ($button_count_root == 0) {
my $boolean; my $boolean;
# The strip section
$table_advanced_root = new Gtk::Table( 4, 3, $true ); $table_advanced_root = new Gtk::Table( 7, 3, $true );
# temp solution?
$table_advanced_root->set_row_spacings( 3 );
$vbox_advanced_root->pack_start( $table_advanced_root, $true, $true, 0 ); $vbox_advanced_root->pack_start( $table_advanced_root, $true, $true, 0 );
# Root Device selection
label_advanced("Root Device:",0,1,0,1,$table_advanced_root);
$ear1 = entry_advanced(1,2,0,1,0,$table_advanced_root);
$ear1->set_text($container[3]) if defined $container[3];
$tooltips->set_tip( $ear1,
"Type in the location of the Root Device to use.",
"" );
button_advanced(2,3,0,1,"Selection",$ear1,"Selection",4,"/dev/fd0");
# Root Device Size
label_advanced("Root Device Size:",0,1,1,2,$table_advanced_root);
$spinner_advanced = new Gtk::SpinButton( $adj, 0, 0 );
$table_advanced_root->attach($spinner_advanced,1,2,1,2,
['shrink','fill','expand'],['fill','shrink'],0,0);
$tooltips->set_tip( $spinner_advanced, "Choose the Root Device Size.", "" );
$spinner_advanced->set_wrap( $true );
$spinner_advanced->set_numeric( $true );
$spinner_advanced->set_shadow_type( 'in' );
$spinner_advanced->show();
$table_advanced_root->show(); $table_advanced_root->show();
label_advanced("Hi there!",0,1,1,2,$table_advanced_root);
$button_count_root++; $button_count_root++;
} }
@ -607,6 +632,33 @@ sub advanced_root_section {
} # end sub advanced_root_section } # end sub advanced_root_section
sub button_advanced {
# cretzu should like this
my ($left_attach,$right_attach,$top_attach,$bottom_attach,$text,$ent,
$name,$order,$device) = @_;
my $button = new Gtk::Button($text);
$table_advanced_root->attach($button,$left_attach,$right_attach,
$top_attach,$bottom_attach,
['shrink','fill','expand'],['fill','shrink'],0,0);
# example
if ($order == 1) {
$tooltips->set_tip( $button, "Select the Kernel.", "" );
}
elsif ($order == 2) {
$tooltips->set_tip( $button, "Select the Compressed Filesystem.", "" );
}
else {
$tooltips->set_tip( $button, "Select the Root Device.", "" );
}
$button->signal_connect( "clicked",\&fileselect,$ent,$name,$order,$device);
$button->show();
}
sub entry_advanced { sub entry_advanced {
@ -830,9 +882,13 @@ sub entry {
else { else {
$entry->signal_connect( "changed", sub { $entry->signal_connect( "changed", sub {
$container[$num] = $entry->get_text(); $container[$num] = $entry->get_text();
# here's where types in entry3, types other places
if (defined $ea1 and $num == 3) { if (defined $ea1 and $num == 3) {
$ea1->set_text($container[$num]); $ea1->set_text($container[$num]);
} }
if (defined $ear1 and $num == 3) {
$ear1->set_text($container[$num]);
}
# auto-detect compression if system has file # auto-detect compression if system has file
if ($num == 2) { if ($num == 2) {

Loading…
Cancel
Save