Hi everyone
I'm looking for some assistance with trying to connect with
WIFI.
I can connect to my router with only a cable.
I have Ubuntu 7.10 on an Averatec 2300.
I found a support page for Ubuntu on the Averatec laptops,
and I found a
script that should help me connect to a network.
But when I run it, I get the error:
command not found:
I will post the script below.
Thanks for any help.
I copied it from the web page, and pasted it into notepad,
and transfered it
to the home folder on my laptop, and ran it...
#!/usr/bin/perl
# Wifi Connection Script for Averatec 2300-series (RT73)
Wireless
# Find and connect to WPA/WEP-enabled wireless networks.
#
# Copyright (C) 2007 - Lawrie Morey lmorey+rtavwifi 
gmail.com
#
# This program is free software: you can redistribute it
and/or modify
# it under the terms of the GNU General Public License as
published by
# the Free Software Foundation, either version 2 of the
License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be
useful,
# but WITHOUT ANY WARRANTY; without even the implied
warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General
Public License
# along with this program. If not, see <http://www.gnu.org/
licenses/>.
$ralink = mcp51; # replace with name of your adapter if it
is not rausb0
$count = -1;
print "Averatec 2300-series Wifi Script";
print
"n--------------------------------------n";
# scan for networks
open(SCAN, "iwpriv $ralink get_site_survey |");
while (<SCAN>) {
if ($count >= 1) {
($channel,$rssi,$ssid,$bssid,$enc,$auth,$type) =
split;
if ( $ssid ne "" ) {
print "$: SSID: $, Security: $
($)n";
}
}
$count += 1;
}
close(SCAN);
# make your choice!
print
"n--------------------------------------n";
print "Enter number of network to connect to: ";
chomp($choice = <STDIN>);
$count = -1;
# scan again and connect!
open(SCAN, "iwpriv $ralink get_site_survey |");
while (<SCAN>) {
if ($count == $choice) {
($channel,$rssi,$ssid,$bssid,$enc,$auth,$type) =
split;
print "Connecting to SSID: $n";
if ($auth eq "WPA-PSK") {
print "Enter passphrase: ";
chomp($key = <STDIN>);
`iwconfig $ralink essid $ssid`;
`iwpriv $ralink set NetworkType=$type`;
`iwpriv $ralink set AuthMode=WPAPSK`;
`iwpriv $ralink set EncrypType=$enc`;
`iwpriv $ralink set SSID=$ssid`;
`iwpriv $ralink set WPAPSK=$key`;
`iwpriv $ralink set SSID=$ssid`;
`dhclient $ralink`;
}
elsif ($enc eq"WEP") {
print "Enter key: ";
chomp($key = <STDIN>);
`iwconfig $ralink essid $ssid`;
`iwconfig $ralink channel $channel`;
`iwpriv $ralink set AuthMode=WEPAUTO`;
`iwpriv $ralink set EncrypType=$enc`;
`iwpriv $ralink set Key1=$key`;
`iwpriv $ralink set SSID=$ssid`;
`dhclient $ralink`;
}
else {
print "Cannot connect to network.n"
}
}
$count += 1;
}
close(SCAN);
_______________________________________________
Orca-list mailing list
Orca-listgnome.org
http
://mail.gnome.org/mailman/listinfo/orca-list
Visit http://live.gnome.org/Orca
for more information on Orca
|
