static void
wireless_applet_scan (WirelessApplet *applet)
{
GList *filtered_list = NULL;
GList *l = NULL;
GList *ap_list = NULL;
time_t stamp = 0;
iw_scan (applet->skfd, applet->device, scan_handler, applet);
ap_list = applet->scan_list;
applet->scan_list = NULL;
for (l = ap_list; l; l = l->next) {
wireless_ap *ap = l->data;
wireless_ap *found_ap = find_ap (filtered_list, ap->essid);
if (found_ap != NULL) {
if (found_ap->quality < ap->quality) {
/* we want to display the max quality of
* a given essid
*/
found_ap->quality = ap->quality;
iw_wireless_ap_free (ap);
}
} else {
filtered_list = g_list_append (filtered_list, ap);
}
}
g_list_free (ap_list);
for (l = filtered_list; l; l = l->next) {
wireless_ap *ap = l->data;
GtkTreeIter iter;
if (!wireless_applet_find_mac (applet, ap->address, &iter)) {
gtk_list_store_append (applet->ap_store,
&iter);
}
gtk_list_store_set (applet->ap_store,
&iter, 0, ap, -1);
stamp = ap->stamp;
}
if (stamp != 0) {
wireless_applet_remove_old_ap (applet, stamp);
}
//g_list_foreach (filtered_list, (GFunc)iw_wireless_ap_free, NULL);
g_list_free (filtered_list);
}
int refresh_list() {
clear();
attrset(COLOR_PAIR(3)|A_BOLD);
printw("\n\n Getting wifi listing ...\n");
refresh();
iw_scan(skfd,ifname,we_ver,&context);
wireless_scan *ws;
int n;
for (ws = context.result, n=0; ws; ws = ws->next)
if ((mode & MODE_HIDDEN) || strlen(ws->b.essid)) n++;
clear();
return n-1;
}
int netcfg_wireless_show_essids(struct debconfclient *client, struct netcfg_interface *interface)
{
wireless_scan_head network_list;
wireless_config wconf;
char *buffer;
int essid_list_len = 1;
iw_get_basic_config (wfd, interface->name, &wconf);
interface_up(interface->name);
if (iw_scan(wfd, interface->name, iw_get_kernel_we_version(),
&network_list) >= 0 ) {
wireless_scan *network;
di_info("Scan of wireless interface %s succeeded.", interface->name);
/* Determine the actual length of the buffer. */
for (network = network_list.result; network; network =
network->next) {
if (!exists_in_network_list(network_list, network)) {
essid_list_len += (strlen(network->b.essid) + 2);
}
}
/* Buffer initialization. */
buffer = malloc(essid_list_len * sizeof(char));
if (buffer == NULL) {
/* Error in memory allocation. */
di_warning("Unable to allocate memory for network list buffer.");
return ENTER_MANUALLY;
}
strcpy(buffer, "");
/* Create list of available ESSIDs. */
for (network = network_list.result; network; network = network->next) {
if (!exists_in_network_list(network_list, network)) {
strcat(buffer, network->b.essid);
strcat(buffer, ", ");
}
}
/* Asking the user. */
debconf_capb(client, "backup");
debconf_subst(client, "netcfg/wireless_show_essids", "essid_list", buffer);
debconf_fset(client, "netcfg/wireless_show_essids", "seen", "false");
debconf_input(client, "high", "netcfg/wireless_show_essids");
if (debconf_go(client) == CMD_GOBACK) {
debconf_fset(client, "netcfg/wireless_show_essids", "seen",
"false");
free_network_list(&network_list.result);
free(buffer);
return GO_BACK;
}
debconf_get(client, "netcfg/wireless_show_essids");
/* User wants to enter an ESSID manually. */
if (strcmp(client->value, "manual") == 0) {
free_network_list(&network_list.result);
free(buffer);
return ENTER_MANUALLY;
}
/* User has chosen a network from the list, need to find which one and
* get its cofiguration. */
for (network = network_list.result; network; network = network->next) {
if (strcmp(network->b.essid, client->value) == 0) {
wconf = network->b;
interface->essid = strdup(network->b.essid);
break;
}
}
/* Free the network list. */
free_network_list(&network_list.result);
free(buffer);
}
else {
/* Go directly to choosing manually, use the wireless_essid_again
* question. */
if (netcfg_wireless_choose_essid_manually(client, interface,
"netcfg/wireless_essid_again") == GO_BACK) {
return GO_BACK;
}
return 0;
}
iw_set_basic_config(wfd, interface->name, &wconf);
interface_down(interface->name);
di_info("Network chosen: %s. Proceeding to connect.", interface->essid);
return 0;
}
int main(int argc, const char **argv) {
/* Check uid */
if (getuid() != 0) {
fprintf(stderr,"Swifer must be run as root.\n");
return 1;
}
/* Check config file for interface and dhcp */
FILE *cfg;
if ( (cfg=fopen(config,"r")) ) {
char *line = calloc(MAX_LINE+1,sizeof(char));
char *val = calloc(MAX_LINE+1,sizeof(char));
while (fgets(line,MAX_LINE,cfg) != NULL) {
if (line[0] == '#') continue;
if (sscanf(line,"INTERFACE = %s",val))
strncpy(ifname,val,IFNAMSIZ);
else if (sscanf(line,"DHCP = %s",val))
strncpy(dhcp,val,DHCPLEN);
else if (sscanf(line,"PRE_UP = %s",val))
hook_preup = strdup(val);
else if (sscanf(line,"POST_UP = %s",val))
hook_postup = strdup(val);
else if (strncmp(line,"[NETWORKS]",10)==0)
break;
}
free(line); free(val); fclose(cfg);
}
/* Get basic wifi info */
we_ver = iw_get_kernel_we_version();
skfd = iw_sockets_open();
iw_get_basic_config(skfd,ifname,&cur);
/* Bring up interface (eg "ip link set IFACE up") */
struct ifreq req;
int err;
strncpy(req.ifr_name,ifname,IFNAMSIZ);
if ( (err=ioctl(skfd,SIOCGIFFLAGS,&req)) ){
int loop = 0;
while ( (err=ioctl(skfd,SIOCGIFFLAGS,&req)) ) {
usleep(100000);
if (loop++ > 50) break;
}
if (err) {
close(skfd);
return 2;
}
}
req.ifr_flags |= IFF_UP;
if (ioctl(skfd,SIOCSIFFLAGS,&req)) {
close(skfd); return 3;
}
/* Processes command line arguments */
int i;
for (i = 1; i < argc; i++) {
if (strncmp(argv[i],"ad",2)==0) mode |= MODE_ADD;
else if (strncmp(argv[i],"au",2)==0) mode |= MODE_AUTO;
else if (strncmp(argv[i],"hi",2)==0) mode |= MODE_HIDDEN;
else if (strncmp(argv[i],"an",2)==0) mode |= (MODE_ANY | MODE_AUTO);
else if (strncmp(argv[i],"re",2)==0) mode |= (MODE_RECONNECT | MODE_AUTO);
else if (strncmp(argv[i],"ve",2)==0) mode |= MODE_VERBOSE;
else if (strncmp(argv[i],"wa",2)==0) mode |= MODE_WAIT;
else if (strncmp(argv[i],"de",2)==0) {
if (argc > i+1) remove_network(argv[i+1]);
}
else fprintf(stderr,"[%s] Ignoring unknown parameter: %s\n",
argv[0],argv[i]);
}
if ( (mode & MODE_VERBOSE) && (mode & MODE_AUTO) ) mode &= ~MODE_VERBOSE;
/* Scan and select network */
iw_scan(skfd,ifname,we_ver,&context);
wireless_scan *ws;
if (mode & MODE_AUTO) {
if (mode && MODE_WAIT) {
int loops;
/* keep trying for up to 5 minutes */
for (loops = 0; loops < 30 && !(ws=get_best()); ++loops)
sleep(TIMEOUT);
}
else ws = get_best();
}
else ws = show_menu();
const char *arg[4];
if (ws) { /* Stop any current processes then connect to "ws" */
arg[0] = killall; arg[1] = dhcp; arg[2] = NULL;
if (fork()==0) {
fclose(stdout); fclose(stderr);
execvp(arg[0],(char * const *) arg);
}
arg[1] = wpa_sup;
if (fork()==0) {
fclose(stdout); fclose(stderr);
execvp(arg[0],(char * const *) arg);
}
sleep(1);
if ( (mode & MODE_ADD) && is_known(ws) ) mode &= ~MODE_ADD;
if (ws->b.key_flags == 2048) mode |= MODE_SECURE;
mode_t pre = umask(S_IWGRP|S_IWOTH|S_IRGRP|S_IROTH);
ws_connect(ws);
umask(pre);
}
else if ( !(mode & MODE_RECONNECT) ) {
fprintf(stderr,"[swifer] no suitable networks found.\n");
return 5;
}
/* Keep alive to reconnect? */
iw_sockets_close(skfd);
if (mode & MODE_RECONNECT) {
if (fork() == 0) {
setsid();
int level = THRESHOLD + 1, ret;
char scanline[256];
snprintf(scanline,255,"%%*[^\n]\n%%*[^\n]\n%s: %%*d %%d.",ifname);
FILE *procw;
while (level > THRESHOLD) {
sleep(TIMEOUT);
procw = fopen(PROC_NET_WIRELESS,"r");
ret = fscanf(procw,scanline,&level);
fclose(procw);
if (ret != 1) level = 0;
}
arg[0] = argv[0]; arg[1] = re; arg[2] = an; arg[3] = NULL;
if ( !(mode & MODE_ANY)) arg[2] = NULL;
execvp(arg[0],(char * const *) arg);
}
}
if (hook_preup) free(hook_preup);
if (hook_postup) free(hook_postup);
return 0;
}
