summaryrefslogtreecommitdiffstats
path: root/lib/network
diff options
context:
space:
mode:
Diffstat (limited to 'lib/network')
-rw-r--r--lib/network/connection_manager.pm4
-rw-r--r--lib/network/connection_manager/gtk.pm29
-rwxr-xr-xlib/network/drakroam.pm3
-rwxr-xr-xlib/network/netcenter.pm9
4 files changed, 24 insertions, 21 deletions
diff --git a/lib/network/connection_manager.pm b/lib/network/connection_manager.pm
index fdfe5ca..fd5489c 100644
--- a/lib/network/connection_manager.pm
+++ b/lib/network/connection_manager.pm
@@ -13,9 +13,9 @@ use network::connection;
use modules;
sub new {
- my ($class, $in, $net, $w, $pixbufs) = @_;
+ my ($class, $in, $net) = @_;
bless {
- in => $in, net => $net, gui => { w => $w, pixbufs => $pixbufs },
+ in => $in, net => $net,
}, $class;
}
diff --git a/lib/network/connection_manager/gtk.pm b/lib/network/connection_manager/gtk.pm
index 5a3d8e0..3f8c21b 100644
--- a/lib/network/connection_manager/gtk.pm
+++ b/lib/network/connection_manager/gtk.pm
@@ -11,16 +11,21 @@ use Gtk2::SimpleList;
use network::signal_strength;
use locale; # for cmp
-sub create_pixbufs() {
- {
- state => { map { $_ => gtkcreate_pixbuf($_) } qw(connected disconnected refresh) },
- link_level => { map {
- $_ => gtkcreate_pixbuf('wifi-' . sprintf('%03d', $_))->scale_simple(24, 24, 'hyper');
- } qw(20 40 60 80 100) },
- encryption => { map {
- $_ => gtkcreate_pixbuf("encryption-$_-24");
- } qw(open weak strong) },
- };
+our %pixbufs = (
+ state => { map { $_ => gtkcreate_pixbuf($_) } qw(connected disconnected refresh) },
+ link_level => { map {
+ $_ => gtkcreate_pixbuf('wifi-' . sprintf('%03d', $_))->scale_simple(24, 24, 'hyper');
+ } qw(20 40 60 80 100) },
+ encryption => { map {
+ $_ => gtkcreate_pixbuf("encryption-$_-24");
+ } qw(open weak strong) },
+);
+
+sub new {
+ my ($class, $in, $net, $w) = @_;
+ bless {
+ in => $in, net => $net, gui => { w => $w },
+ }, $class;
}
sub start_connection {
@@ -177,7 +182,7 @@ sub update_networks_list {
my @networks = filter_networks($cmanager->{connection});
foreach my $network (@networks) {
my $ap = $network->{ap};
- my $connected_pixbuf = $network->{current} ? $connected ? $cmanager->{gui}{pixbufs}{state}{connected} : $cmanager->{gui}{pixbufs}{state}{refresh} : undef;
+ my $connected_pixbuf = $network->{current} ? $connected ? $pixbufs{state}{connected} : $pixbufs{state}{refresh} : undef;
my $network_name = !$network->{essid} && exists $cmanager->{net}{wireless}{$ap} && $cmanager->{net}{wireless}{$ap}{WIRELESS_ESSID} || $network->{name};
my $strength_pixbuf = network::signal_strength::get_strength_icon($network);
@@ -193,7 +198,7 @@ sub update_networks_list {
$connected_pixbuf,
$network_name,
$strength_pixbuf,
- $cmanager->{gui}{pixbufs}{encryption}{$network->{flags} =~ /WPA/i ? 'strong' : $network->{flags} =~ /WEP/i ? 'weak' : 'open'},
+ $pixbufs{encryption}{$network->{flags} =~ /WPA/i ? 'strong' : $network->{flags} =~ /WEP/i ? 'weak' : 'open'},
$network->{mode},
];
}
diff --git a/lib/network/drakroam.pm b/lib/network/drakroam.pm
index c29e41d..236a326 100755
--- a/lib/network/drakroam.pm
+++ b/lib/network/drakroam.pm
@@ -109,8 +109,7 @@ sub main {
#- so that transient_for is defined, for wait messages and popups to be centered
$::main_window = $w->{real_window};
- my $pixbufs = network::connection_manager::gtk::create_pixbufs();
- my $droam = network::connection_manager::gtk->new($in, $net, $w, $pixbufs);
+ my $droam = network::connection_manager::gtk->new($in, $net, $w);
$droam->create_networks_list;
create_drakroam_gui($droam, $dbus, $title, $icon);
diff --git a/lib/network/netcenter.pm b/lib/network/netcenter.pm
index 510aab7..603295d 100755
--- a/lib/network/netcenter.pm
+++ b/lib/network/netcenter.pm
@@ -16,9 +16,9 @@ use network::network;
use run_program;
sub build_cmanager {
- my ($in, $net, $w, $pixbufs, $connection) = @_;
+ my ($in, $net, $w, $connection) = @_;
- my $cmanager = network::connection_manager::gtk->new($in, $net, $w, $pixbufs);
+ my $cmanager = network::connection_manager::gtk->new($in, $net, $w);
$cmanager->set_connection($connection);
$cmanager->{gui}{show_unique_network} = $cmanager->{connection}->has_unique_network;
@@ -160,8 +160,7 @@ sub main {
my @connections = get_connections();
- my $pixbufs = network::connection_manager::gtk::create_pixbufs();
- my @cmanagers = map { build_cmanager($in, $net, $w, $pixbufs, $_) } @connections;
+ my @cmanagers = map { build_cmanager($in, $net, $w, $_) } @connections;
(undef, my $rootwin_height) = gtkroot()->get_size;
my $scrolled_height = $rootwin_height > 480 ? 400 : 295;
@@ -192,7 +191,7 @@ sub main {
detect_devices::probeall_update_cache();
my $connection = find { $_->get_interface eq $interface } get_connections()
or return;
- $cmanager = build_cmanager($in, $net, $w, $pixbufs, $connection);
+ $cmanager = build_cmanager($in, $net, $w, $connection);
push @connections, $connection;
push @cmanagers, $cmanager;
my $box = build_cmanager_box($cmanager, @connections == 0);