Changeset 59

Show
Ignore:
Timestamp:
04/21/08 02:30:19 (10 years ago)
Author:
rmcmillen
Message:

Added logic to ensure the current keyboard layout is selected in the drop down menu for OS Administration -> Configure Keyboard Layout. This addresses a portion of the issue related to Ticket #30.

Location:
walleye/trunk/walleye
Files:
4 modified

Legend:

Unmodified
Added
Removed
  • walleye/trunk/walleye/Makefile

    r56 r59  
    1 ver=1.2.8 
     1ver=1.2.9 
    22pname=walleye-${ver} 
    33 
  • walleye/trunk/walleye/admin/osAdmin.pl

    r47 r59  
    6565} 
    6666 
     67sub get_current_keyboard_settings { 
     68        my $label; 
     69        my $value; 
     70        my $layout; 
     71        my $keyboard_setting = "/etc/sysconfig/keyboard"; 
     72        open(FILE, "<$keyboard_setting" ) || error("Could not open $keyboard_setting $!"); 
     73        while (<FILE>) 
     74        { 
     75                if (/KEYTABLE/) 
     76                { 
     77                        my @values = split(/=/); 
     78                        $value = $values[1]; 
     79                        $value =~ s/"//g; 
     80                        chomp($value); 
     81                        close(FILE); 
     82                        return $value; 
     83                } 
     84        } 
     85        close(FILE); 
     86} 
     87 
    6788sub config_keyboard { 
    6889        my $tmp_file = "/tmp/keyboard"; 
     
    258279        my $input; 
    259280        my %keyboard_settings; 
     281        my $cur_keyboard_layout; 
    260282 
    261283        # Refresh honeywall variables 
     
    278300                if($disp eq "configKeyboard") { $input = "templates/osConfigKeyboard.htm";  
    279301                                                                                %keyboard_settings = get_keyboard_settings(); 
     302$cur_keyboard_layout = get_current_keyboard_settings(); 
    280303                                                                                last SWITCH;} 
    281304 
     
    290313                keyboardSettings => \%keyboard_settings, 
    291314                logDir => $log_dir, 
     315                curKeyboardLayout => $cur_keyboard_layout, 
    292316        }; 
    293317         
  • walleye/trunk/walleye/admin/templates/osConfigKeyboard.htm

    r34 r59  
    7171                                        <select name="setting" size="1" > 
    7272                                            [% FOREACH key IN keyboardSettings.keys %] 
    73                                                 <option value="[% key %]"> 
     73                                                [% IF curKeyboardLayout == key %] 
     74                                                   <option value="[% key %]" selected="true"> 
    7475                                                        [% keyboardSettings.$key %] 
     76                                                [% ELSE %] 
     77                                                   <option value="[% key %]"> 
     78                                                        [% keyboardSettings.$key %] 
     79                                                [% END %] 
    7580                                                </option> 
    7681                                            [% END %] 
  • walleye/trunk/walleye/walleye.spec

    r56 r59  
    11Summary:  Walleye Honeynet data analysis  
    22Name: walleye 
    3 Version: 1.2.8 
     3Version: 1.2.9 
    44Release: 4 
    55License: GPL