ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/wvsniff/wvsniff
(Generate patch)

Comparing wvsniff/wvsniff (file contents):
Revision 1.6 by root, Fri Apr 26 23:38:00 2002 UTC vs.
Revision 1.7 by root, Fri Apr 26 23:42:09 2002 UTC

… …
2 2
3use Event; 3use Event;
4use Time::HiRes qw(time); 4use Time::HiRes qw(time);
5use Curses; 5use Curses;
6use Socket; 6use Socket;
7use Storable;
7use GPS; 8use GPS;
8 9
9my $GPS = eval { new GPS }; 10my $GPS = eval { new GPS };
10 11
11$DEV = "eth1"; 12$DEV = "eth1";
12$RAWDEV = "wifi0"; 13$RAWDEV = "wifi0";
13$PROC = "/proc/driver/aironet/$DEV"; 14$PROC = "/proc/driver/aironet/$DEV";
15$STOREFILE = "/tmp/wvsniff.dat";
14 16
15$SIG{INT} = 17$SIG{INT} =
16$SIG{TERM} = 18$SIG{TERM} =
17$SIG{HUP} = sub { exit }; 19$SIG{HUP} = sub { exit };
18 20
… …
92 }; 94 };
93 } 95 }
94 $refresh->start; 96 $refresh->start;
95}); 97});
96 98
99-r $STOREFILE and
100 $db = Storable::retrieve $STOREFILE;
101
97END { 102END {
103 Storable::store $db, $STOREFILE;
98 end_win; 104 end_win;
99 config "Mode: adhoc\n"; 105 config "Mode: adhoc\n";
100} 106}
101 107
102sub decode_tags { 108sub decode_tags {

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines