#include <stdio.h>
#include <stdlib.h>
#include <stddef.h>
#include <errno.h>
#include <ctype.h>
#include <stdarg.h>
#include <fcntl.h>
#include <unistd.h>
#include <net/if.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/wait.h>
#include <sys/ipc.h>
#include <sys/ddi.h>
#include <stropts.h>
#include <assert.h>
#include <termios.h>
#include <time.h>
#include <string.h>
#include <strings.h>
#include <auth_attr.h>
#include <auth_list.h>
#include <libdevinfo.h>
#include <secdb.h>
#include <priv.h>
#include <pwd.h>
#include <umem.h>
#include <locale.h>
#include <libintl.h>
#include <dirent.h>
#include <inet/wifi_ioctl.h>
#ifdef DEBUG
int wifi_debug = 0;
void wifi_dbgprintf(char *fmt, ...);
#define PRTDBG(msg) if (wifi_debug > 1) wifi_dbgprintf msg
#else
#define PRTDBG(msg)
#endif
#define MAX_HISTORY_NUM 10
#define MAX_PREFERENCE_NUM 10
#define MAX_SCANBUF_LEN 256
#define MAX_CONFIG_FILE_LENGTH 256
#define MAX_LOADPF_LENGTH 256
#define LOADPROFILE_TIMEOUT 10
#define RECORD_ADD 0
#define RECORD_DEL 1
#define WIFI_EXIT_DEF 0
#define WIFI_FATAL_ERR 1
#define WIFI_IMPROPER_USE 2
#define WIFI_MINOR_ERR 3
#define WIFI_LOCKF "/var/run/lockf_wifi"
typedef enum {
PREFERENCE,
HISTORY,
ACTIVEP,
PROFILE,
OTHER
} list_type_t;
#define WIFI_PREFER "{preference}"
#define WIFI_HISTORY "{history}"
#define WIFI_ACTIVEP "{active_profile}"
typedef enum {
LINKSTATUS = 0,
BSSID,
ESSID,
BSSTYPE,
CREATEIBSS,
CHANNEL,
RATES,
POWERMODE,
AUTHMODE,
ENCRYPTION,
WEPKEYID,
WEPKEY,
SIGNAL,
RADIOON,
WLANLIST,
CONFIG_ITEM_END
} config_item_t;
typedef struct ae {
struct ae *ae_next;
char *ae_arg;
}ae_t;
typedef struct aelist {
int ael_argc;
ae_t *ael_head, *ael_tail;
list_type_t type;
}aelist_t;
typedef struct section {
struct section *section_next;
aelist_t *list;
char *section_id;
}section_t;
typedef struct config_file {
int section_argc;
section_t *section_head, *section_tail;
}config_file_t;
static config_file_t *gp_config_file = NULL;
static config_file_t *gp_wepkey_file = NULL;
static char *p_file_wifi = "/etc/inet/wifi";
static char *p_file_wifiwepkey = "/etc/inet/secret/wifiwepkey";
typedef enum {
AUTH_WEP = 0,
AUTH_OTHER = 1
} wifi_auth_t;
static char *p_auth_string[] = {
WIFI_WEP_AUTH,
WIFI_CONFIG_AUTH
};
static wldp_t *gbuf = NULL;
static char *gExecName = NULL;
static void print_error(uint32_t);
static void *safe_malloc(size_t);
static void *safe_calloc(size_t, size_t);
static char *safe_strdup(const char *s1);
static void safe_snprintf(char *s, size_t n,
const char *format, ...);
static void safe_fclose(FILE *stream);
static void new_ae(aelist_t *ael, const char *arg);
static aelist_t *new_ael(list_type_t type);
static config_file_t *new_config_file();
static void new_section(config_file_t *p_config_file, aelist_t *p_list,
const char *section_id);
static void destroy_config(config_file_t *p_config_file);
static config_file_t *parse_file(const char *pfile);
static char **aeltoargv(aelist_t *ael, int *ael_num);
static boolean_t fprint_config_file(config_file_t *p_config_file,
const char *file_name);
static char *append_pa(const char *arg);
static section_t *find_section(config_file_t *p_config_file,
const char *section_id);
static ae_t *find_ae(aelist_t *plist, const char *arg);
static void update_aelist(aelist_t *plist, const char *arg);
static const char *get_value(const char *arg);
static char *find_active_profile(int);
static const char *essid_of_profile(const char *profile);
static boolean_t search_interface(char *interface);
static int open_dev(char *devname);
static boolean_t call_ioctl(int, int, uint32_t, uint32_t);
static boolean_t del_prefer(config_file_t *p_config_file, const char *prefer,
boolean_t rflag);
static boolean_t del_section(config_file_t *p_config_file, char *section_id);
static boolean_t set_prefer(config_file_t *p_config_file, const char *prefer,
int rank);
static void add_to_history(config_file_t *p_config_file,
int argc, char **argv);
static boolean_t check_authority(wifi_auth_t type);
static void heuristic_load(int fd, uint32_t ess_num, wl_ess_conf_t **);
static char *select_profile(int fd, int readonly, int timeout);
static char *construct_format(uint32_t nt);
static void print_gbuf(config_item_t index);
static boolean_t items_in_profile(aelist_t *, aelist_t *, int, char **);
static char *get_commit_key(int, int, char **);
static void print_wepkey_info(const char *id, const char *wepkeyn);
static void do_print_usage();
static boolean_t do_print_support_params(int fd);
static boolean_t do_autoconf(int fd, int argc, char **argv);
static boolean_t do_startconf(int fd, int argc, char **argv);
static boolean_t do_loadpf(int fd, int argc, char **argv);
static boolean_t do_disconnect(int fd, int argc, char **argv);
static boolean_t do_printpf(int fd, int argc, char **argv);
static boolean_t do_restoredef(int fd, int argc, char **argv);
static boolean_t do_history(int fd, int argc, char **argv);
static boolean_t do_deletepf(int fd, int argc, char **argv);
static boolean_t do_wepkey(int fd, int argc, char **argv);
static boolean_t do_setprefer(int fd, int argc, char **arg);
static boolean_t do_rmprefer(int fd, int argc, char **argv);
static boolean_t do_lsprefer(int fd, int argc, char **argv);
static boolean_t do_wlanlist(int fd, int argc, char **argv);
static boolean_t do_showstatus(int fd, int argc, char **argv);
static boolean_t do_getprofparam(int fd, int argc, char **argv);
static boolean_t do_setprofparam(int fd, int argc, char **argv);
static boolean_t do_setprofwepkey(int fd, int argc, char **argv);
static boolean_t is_rates_support(int fd, int num, uint8_t *rates);
static boolean_t do_set_bsstype(int fd, const char *arg);
static boolean_t do_set_essid(int fd, const char *arg);
static boolean_t do_set_powermode(int fd, const char *arg);
static boolean_t do_set_rates(int fd, const char *arg);
static boolean_t do_set_channel(int fd, const char *arg);
static boolean_t do_set_createibss(int fd, const char *arg);
static boolean_t do_set_radioon(int fd, const char *arg);
static boolean_t do_set_wepkeyid(int fd, const char *arg);
static boolean_t do_set_encryption(int fd, const char *arg);
static boolean_t do_set_authmode(int fd, const char *arg);
static boolean_t do_set_wepkey(int fd, const char *pbuf);
static boolean_t do_get_createibss(int fd);
static boolean_t do_get_bsstype(int fd);
static boolean_t do_get_essid(int fd);
static boolean_t do_get_bssid(int fd);
static boolean_t do_get_radioon(int fd);
static boolean_t do_get_signal(int fd);
static boolean_t do_get_wepkeyid(int fd);
static boolean_t do_get_encryption(int fd);
static boolean_t do_get_authmode(int fd);
static boolean_t do_get_powermode(int fd);
static boolean_t do_get_rates(int fd);
static boolean_t do_get_wlanlist(int fd);
static boolean_t do_get_linkstatus(int fd);
static boolean_t do_get_channel(int fd);
static boolean_t do_get(int fd, int argc, char **argv);
static boolean_t do_set(int fd, int argc, char **argv);
static boolean_t do_createprofile(int fd, int argc, char **argv);
static boolean_t value_is_valid(config_item_t item, const char *value);
typedef struct cmd_ops {
char cmd[32];
boolean_t (*p_do_func)(int fd, int argc, char **argv);
boolean_t b_auth;
boolean_t b_fileonly;
boolean_t b_readonly;
} cmd_ops_t;
static cmd_ops_t do_func[] = {
{
"autoconf",
do_autoconf,
B_TRUE,
B_FALSE,
B_FALSE
},
{
"startconf",
do_startconf,
B_TRUE,
B_FALSE,
B_TRUE
},
{
"connect",
do_loadpf,
B_TRUE,
B_FALSE,
B_FALSE
},
{
"disconnect",
do_disconnect,
B_TRUE,
B_FALSE,
B_FALSE
},
{
"showprofile",
do_printpf,
B_FALSE,
B_TRUE,
B_TRUE
},
{
"deleteprofile",
do_deletepf,
B_TRUE,
B_TRUE,
B_FALSE
},
{
"history",
do_history,
B_FALSE,
B_TRUE,
B_TRUE
},
{
"listprefer",
do_lsprefer,
B_FALSE,
B_TRUE,
B_TRUE
},
{
"removeprefer",
do_rmprefer,
B_TRUE,
B_TRUE,
B_FALSE
},
{
"setprefer",
do_setprefer,
B_TRUE,
B_TRUE,
B_FALSE
},
{
"setwepkey",
do_wepkey,
B_TRUE,
B_FALSE,
B_FALSE
},
{
"restoredef",
do_restoredef,
B_TRUE,
B_FALSE,
B_FALSE
},
{
"getparam",
do_get,
B_FALSE,
B_FALSE,
B_TRUE
},
{
"setparam",
do_set,
B_TRUE,
B_FALSE,
B_FALSE
},
{
"createprofile",
do_createprofile,
B_TRUE,
B_TRUE,
B_FALSE
},
{
"scan",
do_wlanlist,
B_FALSE,
B_FALSE,
B_FALSE
},
{
"showstatus",
do_showstatus,
B_FALSE,
B_FALSE,
B_TRUE
},
{
"setprofileparam",
do_setprofparam,
B_TRUE,
B_TRUE,
B_FALSE
},
{
"getprofileparam",
do_getprofparam,
B_FALSE,
B_TRUE,
B_TRUE
},
{
"setprofilewepkey",
do_setprofwepkey,
B_TRUE,
B_TRUE,
B_FALSE
}
};
typedef enum {RW, RO, WO} rw_property_t;
typedef struct gs_ops {
config_item_t index;
char cmd[32];
boolean_t (*p_do_get_func)(int fd);
boolean_t (*p_do_set_func)(int fd, const char *arg);
rw_property_t rw;
} gs_ops_t;
static gs_ops_t do_gs_func[] = {
{LINKSTATUS, "linkstatus", NULL, NULL, RO},
{BSSID, "bssid", do_get_bssid, NULL, RO},
{ESSID, "essid", do_get_essid, do_set_essid, RW},
{BSSTYPE, "bsstype", do_get_bsstype, do_set_bsstype, RW},
{CREATEIBSS, "createibss", do_get_createibss, do_set_createibss, RW},
{CHANNEL, "channel", do_get_channel, do_set_channel, RW},
{RATES, "rates", do_get_rates, do_set_rates, RW},
{POWERMODE, "powermode", do_get_powermode, do_set_powermode, RW},
{AUTHMODE, "authmode", do_get_authmode, do_set_authmode, RW},
{ENCRYPTION, "encryption", do_get_encryption, do_set_encryption, RW},
{WEPKEYID, "wepkeyindex", do_get_wepkeyid, do_set_wepkeyid, RW},
{WEPKEY, "wepkey|1-4", NULL, do_set_wepkey, WO},
{SIGNAL, "signal", do_get_signal, NULL, RO},
{RADIOON, "radio", do_get_radioon, do_set_radioon, RW},
};
#define N_FUNC sizeof (do_func) / sizeof (cmd_ops_t)
#define N_GS_FUNC sizeof (do_gs_func) / sizeof (gs_ops_t)
typedef struct wifi_rates_tab {
char *rates_s;
uint8_t rates_i;
uint8_t rates_reserve0;
uint8_t rates_reserve1;
uint8_t rates_reserve2;
} wifi_rates_tab_t;
#define WIFI_RATES_NUM 14
static wifi_rates_tab_t wifi_rates_s[WIFI_RATES_NUM] = {
{"1", WL_RATE_1M, 0, 0, 0},
{"2", WL_RATE_2M, 0, 0, 0},
{"5.5", WL_RATE_5_5M, 0, 0, 0},
{"6", WL_RATE_6M, 0, 0, 0},
{"9", WL_RATE_9M, 0, 0, 0},
{"11", WL_RATE_11M, 0, 0, 0},
{"12", WL_RATE_12M, 0, 0, 0},
{"18", WL_RATE_18M, 0, 0, 0},
{"22", WL_RATE_22M, 0, 0, 0},
{"24", WL_RATE_24M, 0, 0, 0},
{"33", WL_RATE_33M, 0, 0, 0},
{"36", WL_RATE_36M, 0, 0, 0},
{"48", WL_RATE_48M, 0, 0, 0},
{"54", WL_RATE_54M, 0, 0, 0}
};
static void
print_error(uint32_t errorno)
{
char *buf;
switch (errorno) {
case WL_SUCCESS:
buf = gettext("command succeeded");
break;
case WL_NOTSUPPORTED:
case WL_LACK_FEATURE:
case WL_HW_ERROR:
case WL_ACCESS_DENIED:
buf = strerror(errorno);
break;
case WL_READONLY:
buf = gettext("parameter read-only");
break;
case WL_WRITEONLY:
buf = gettext("parameter write-only");
break;
case WL_NOAP:
buf = gettext("no access point available");
break;
default:
buf = gettext("unknown error");
break;
}
(void) fprintf(stderr, "%s\n", buf);
}
static void *
safe_malloc(size_t size)
{
void *buf;
buf = malloc(size);
if (buf == NULL) {
(void) fprintf(stderr, gettext("%s: malloc: %s\n"),
gExecName, strerror(errno));
exit(WIFI_FATAL_ERR);
}
return (buf);
}
static void *
safe_calloc(size_t nelem, size_t elsize)
{
void *buf;
buf = calloc(nelem, elsize);
if (buf == NULL) {
(void) fprintf(stderr, gettext("%s: calloc: %s\n"),
gExecName, strerror(errno));
exit(WIFI_FATAL_ERR);
}
return (buf);
}
static char *
safe_strdup(const char *s1)
{
char *p;
p = strdup(s1);
if (p == NULL) {
(void) fprintf(stderr, gettext("%s: strdup: %s\n"),
gExecName, strerror(errno));
exit(WIFI_FATAL_ERR);
}
return (p);
}
static void
safe_snprintf(char *s, size_t n, const char *format, ...)
{
int len;
va_list ap;
va_start(ap, format);
len = vsnprintf(s, n, format, ap);
if ((len <= 0) || (len > n - 1)) {
(void) fprintf(stderr,
gettext("%s: snprintf: %s\n"),
gExecName, strerror(errno));
exit(WIFI_FATAL_ERR);
}
va_end(ap);
}
static void
safe_fclose(FILE *stream)
{
int err;
err = fclose(stream);
if (err == EOF) {
(void) fprintf(stderr, gettext("%s: fclose: %s\n"),
gExecName, strerror(errno));
exit(WIFI_FATAL_ERR);
}
}
static void
new_ae(aelist_t *ael, const char *arg)
{
ae_t *pae = NULL;
PRTDBG(("new_ae(0x%x, \"%s\")\n", ael, arg));
assert((ael != NULL) && (arg != NULL));
pae = safe_calloc(sizeof (*pae), 1);
pae->ae_arg = safe_strdup(arg);
pae->ae_next = NULL;
if (ael->ael_tail == NULL) {
ael->ael_head = pae;
} else {
ael->ael_tail->ae_next = pae;
}
ael->ael_tail = pae;
ael->ael_argc++;
}
static aelist_t *
new_ael(list_type_t type)
{
aelist_t *plist;
plist = safe_calloc(sizeof (*plist), 1);
plist->type = type;
plist->ael_argc = 0;
plist->ael_head = plist->ael_tail = NULL;
PRTDBG(("new_ael(%d) = 0x%x\n", type, plist));
return (plist);
}
static config_file_t *
new_config_file()
{
config_file_t *p_config_file;
p_config_file = safe_calloc(sizeof (config_file_t), 1);
p_config_file->section_argc = 0;
p_config_file->section_head = p_config_file->section_tail = NULL;
PRTDBG(("new_config_file() = 0x%x\n", p_config_file));
return (p_config_file);
}
static void
new_section(config_file_t *p_config_file, aelist_t *p_list,
const char *section_id)
{
section_t *p_section = NULL;
PRTDBG(("new_section(0x%x, 0x%x, \"%s\")\n", p_config_file, p_list,
section_id));
assert((p_config_file != NULL) && (p_list != NULL) &&
(section_id != NULL));
p_section = safe_calloc(sizeof (*p_section), 1);
p_section->list = p_list;
p_section->section_next = NULL;
p_section->section_id = safe_strdup(section_id);
if (p_config_file->section_tail == NULL) {
p_config_file->section_head = p_section;
} else {
p_config_file->section_tail->section_next = p_section;
}
p_config_file->section_tail = p_section;
p_config_file->section_argc++;
}
static void
destroy_config(config_file_t *p_config_file)
{
section_t *p_section = NULL;
aelist_t *p_list = NULL;
ae_t *pae = NULL;
PRTDBG(("destory_config(0x%x)\n", p_config_file));
assert(p_config_file != NULL);
p_section = p_config_file->section_head;
while (p_section != NULL) {
p_list = p_section->list;
if (p_list != NULL) {
pae = p_list->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL)
free(pae->ae_arg);
pae->ae_arg = NULL;
pae = pae->ae_next;
free(p_list->ael_head);
p_list->ael_head = pae;
}
free(p_list);
p_list = NULL;
}
if (p_section->section_id != NULL)
free(p_section->section_id);
p_section->section_id = NULL;
p_section = p_section->section_next;
free(p_config_file->section_head);
p_config_file->section_head = p_section;
}
free(p_config_file);
p_config_file = NULL;
}
static config_file_t *
parse_file(const char *pfile)
{
FILE *file = NULL;
int fd = 0;
char buf_line[256];
config_file_t *p_config_file;
list_type_t cur_list = OTHER;
aelist_t *prefer_list = NULL;
aelist_t *history_list = NULL;
aelist_t *profile_list = NULL;
aelist_t *activep_list = NULL;
assert(pfile != NULL);
file = fopen(pfile, "r");
if (file == NULL) {
fd = open(pfile, O_CREAT|O_EXCL|O_RDWR, 0600);
if (fd < 0) {
(void) fprintf(stderr, gettext("%s: failed to open %s"
"\n"), gExecName, pfile);
goto error1;
}
file = fdopen(fd, "w");
(void) chmod(pfile, S_IRUSR);
}
p_config_file = new_config_file();
while (fgets(buf_line, sizeof (buf_line), file) != NULL) {
if ((buf_line[0] == '\n') || (buf_line[0] == ' '))
continue;
buf_line[strlen(buf_line) - 1] = '\0';
if (strstr(buf_line, WIFI_PREFER) == buf_line) {
if (prefer_list == NULL) {
cur_list = PREFERENCE;
prefer_list = new_ael(PREFERENCE);
new_section(p_config_file, prefer_list,
WIFI_PREFER);
} else {
(void) fprintf(stderr, gettext("%s: "
"%s : duplicated %s section\n"),
gExecName, pfile, WIFI_PREFER);
goto error;
}
} else if (strstr(buf_line, WIFI_HISTORY) == buf_line) {
if (history_list == NULL) {
cur_list = HISTORY;
history_list = new_ael(HISTORY);
new_section(p_config_file, history_list,
WIFI_HISTORY);
} else {
(void) fprintf(stderr, gettext("%s: "
"%s : duplicated %s section\n"),
gExecName, pfile, WIFI_HISTORY);
goto error;
}
} else if (strstr(buf_line, WIFI_ACTIVEP) == buf_line) {
if (activep_list == NULL) {
cur_list = ACTIVEP;
activep_list = new_ael(ACTIVEP);
new_section(p_config_file, activep_list,
WIFI_ACTIVEP);
} else {
(void) fprintf(stderr, gettext("%s: "
"%s : duplicated %s section\n"),
gExecName, pfile, WIFI_ACTIVEP);
goto error;
}
} else if ((strchr(buf_line, '[') == buf_line) &&
(buf_line[strlen(buf_line) - 1] == ']')) {
cur_list = PROFILE;
profile_list = new_ael(PROFILE);
new_section(p_config_file, profile_list,
buf_line);
} else {
switch (cur_list) {
case PREFERENCE:
if (prefer_list->ael_argc <=
MAX_PREFERENCE_NUM)
new_ae(prefer_list, buf_line);
break;
case HISTORY:
if (history_list->ael_argc <=
MAX_HISTORY_NUM)
new_ae(history_list, buf_line);
break;
case ACTIVEP:
if ((activep_list->ael_argc <= 1) &&
(strpbrk(buf_line, "=") != NULL))
new_ae(activep_list, buf_line);
break;
case PROFILE:
if (strpbrk(buf_line, "=") != NULL)
new_ae(profile_list, buf_line);
break;
default:
(void) fprintf(stderr,
gettext("%s: %s: file format error\n"),
gExecName, pfile);
goto error;
}
}
}
PRTDBG(("parse_file(\"%s\")=0x%x\n", pfile, p_config_file));
(void) fclose(file);
return (p_config_file);
error:
destroy_config(p_config_file);
(void) fclose(file);
error1:
return (NULL);
}
static char **
aeltoargv(aelist_t *ael, int *ael_num)
{
ae_t *ae = NULL;
char **argv = NULL;
int argc = 0;
PRTDBG(("aeltoargv(%x)\n", ael));
assert(ael != NULL);
argv = safe_calloc(sizeof (*argv), ael->ael_argc);
for (argc = 0, ae = ael->ael_head; ae; ae = ae->ae_next) {
if (strncmp(ae->ae_arg, "bssid=", strlen("bssid=")) == 0)
continue;
argv[argc] = safe_strdup(ae->ae_arg);
argc++;
if (ae == ael->ael_tail)
break;
}
PRTDBG(("aeltoargv(0x%x) = 0x%x\n\n", ael, argv));
*ael_num = argc;
return (argv);
}
static boolean_t
fprint_config_file(config_file_t *p_config_file, const char *file_name)
{
FILE *file = NULL;
int fd = 0;
int len;
section_t *p_section = NULL;
aelist_t *p_list = NULL;
ae_t *pae = NULL;
char temp_file[256];
struct stat buf;
PRTDBG(("fprint_config_file(0x%x, \"%s\")\n", p_config_file,
file_name));
assert((p_config_file != NULL)&&(strcmp(file_name, "") != 0));
safe_snprintf(temp_file, sizeof (temp_file),
"%s.tmp", file_name);
fd = open(temp_file, O_CREAT|O_WRONLY|O_TRUNC, 0600);
if (fd < 0) {
(void) fprintf(stderr, gettext("%s: failed to open %s\n"),
gExecName, temp_file);
return (B_FALSE);
}
file = fdopen(fd, "w");
p_section = p_config_file->section_head;
while (p_section != NULL) {
p_list = p_section->list;
if (p_list != NULL) {
PRTDBG(("fprint_config_file: section_id=%s\n",
p_section->section_id));
len = fprintf(file, "\n%s\n", p_section->section_id);
if (len < 0) {
(void) fprintf(stderr, gettext("%s: "
"failed to update %s: %s\n"),
gExecName, file_name, strerror(errno));
safe_fclose(file);
return (B_FALSE);
}
pae = p_list->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL) {
len = fprintf(file, "%s\n",
pae->ae_arg);
if (len < 0) {
(void) fprintf(stderr,
gettext("%s: failed to "
"update %s: %s\n"),
gExecName, file_name,
strerror(errno));
safe_fclose(file);
return (B_FALSE);
}
}
pae = pae->ae_next;
}
}
p_section = p_section->section_next;
}
safe_fclose(file);
if (stat(file_name, &buf) != 0) {
if (errno == ENOENT) {
buf.st_mode = 0600;
} else {
(void) fprintf(stderr, gettext("%s: failed to get "
"file %s stat: %s\n"),
gExecName, file_name, strerror(errno));
return (B_FALSE);
}
}
if (rename(temp_file, file_name) != 0) {
(void) fprintf(stderr, gettext("%s: failed to update %s: %s"
"\n"), gExecName, file_name, strerror(errno));
return (B_FALSE);
}
(void) chmod(file_name, buf.st_mode);
return (B_TRUE);
}
static char *
append_pa(const char *arg)
{
char *pbuf = NULL;
int len;
assert(arg != NULL);
len = strlen(arg) + 3;
pbuf = safe_malloc(len);
safe_snprintf(pbuf, len, "[%s]", arg);
PRTDBG(("append_pa(\"%s\") = \"%s\"\n", arg, pbuf));
return (pbuf);
}
static section_t *
find_section(config_file_t *p_config_file, const char *section_id)
{
section_t *p_section = NULL;
PRTDBG(("find_section(0x%x, \"%s\")\n", p_config_file, section_id));
assert((section_id != NULL)&&(p_config_file != NULL));
p_section = p_config_file->section_head;
while (p_section != NULL) {
if ((p_section->section_id != NULL) &&
(strcmp(p_section->section_id, section_id) == 0))
return (p_section);
p_section = p_section->section_next;
}
return (NULL);
}
static const char *
get_value(const char *arg)
{
char *p;
assert(arg != NULL);
p = strchr(arg, '=');
PRTDBG(("get_value(\"%s\") = \"%s\"\n", arg, p + 1));
if (p != NULL)
return (p + 1);
else
return (NULL);
}
static boolean_t
search_interface(char *interface)
{
DIR *dirp;
struct dirent *dp;
char buf[256];
int fd;
PRTDBG(("search interface\n"));
assert(interface != NULL);
if ((dirp = opendir("/dev/wifi")) == NULL) {
PRTDBG(("failed to open '/dev/wifi'\n"));
return (B_FALSE);
}
while ((dp = readdir(dirp)) != NULL) {
if (strcmp(dp->d_name, ".") == 0 ||
strcmp(dp->d_name, "..") == 0)
continue;
if (dp->d_name[strlen(dp->d_name) - 1] < '0' ||
dp->d_name[strlen(dp->d_name) - 1] > '9')
continue;
safe_snprintf(buf, sizeof (buf), "%s%s",
"/dev/wifi/", dp->d_name);
fd = open(buf, O_RDWR);
if (fd == -1) {
PRTDBG(("interface %s doesn't exist\n", dp->d_name));
continue;
} else {
PRTDBG(("interface %s is the first found interface\n",
dp->d_name));
(void) strlcpy(interface, buf, LIFNAMSIZ);
(void) close(fd);
(void) closedir(dirp);
return (B_TRUE);
}
}
PRTDBG(("failed to find available wireless interface\n"));
(void) closedir(dirp);
return (B_FALSE);
}
static int
open_dev(char *devname)
{
int fd;
int len;
char *pbuf = NULL;
PRTDBG(("open_dev(\"%s\")\n", devname));
assert(devname != NULL);
if (strncmp(devname, "/dev/wifi/", strlen("/dev/wifi/")) == 0) {
pbuf = safe_strdup(devname);
} else {
len = strlen(devname) + strlen("/dev/") + 1;
pbuf = safe_malloc(len);
safe_snprintf(pbuf, len, "/dev/%s", devname);
}
fd = open(pbuf, O_RDWR);
free(pbuf);
if (fd == -1) {
(void) fprintf(stderr, gettext("%s: failed to open '%s': %s"
"\n"), gExecName, devname, strerror(errno));
return (-1);
}
if (!isastream(fd)) {
(void) fprintf(stderr, gettext("%s: %s is "
"not a stream device\n"),
gExecName, devname);
(void) close(fd);
return (-1);
}
return (fd);
}
static boolean_t
call_ioctl(int fd, int cmd, uint32_t params, uint32_t buf_len)
{
struct strioctl stri;
PRTDBG(("call_ioctl_gs(%d, 0x%x, 0x%x, 0x%x)\n",
fd, cmd, params, buf_len));
switch (cmd) {
case WLAN_GET_PARAM:
(void) memset(gbuf, 0, MAX_BUF_LEN);
stri.ic_len = MAX_BUF_LEN;
break;
case WLAN_SET_PARAM:
gbuf->wldp_length = buf_len + WIFI_BUF_OFFSET;
stri.ic_len = gbuf->wldp_length;
break;
case WLAN_COMMAND:
gbuf->wldp_length = sizeof (wldp_t);
stri.ic_len = gbuf->wldp_length;
break;
default:
(void) fprintf(stderr, gettext("%s: ioctl : "
"unsupported ioctl command\n"), gExecName);
return (B_FALSE);
}
gbuf->wldp_type = NET_802_11;
gbuf->wldp_id = params;
stri.ic_cmd = cmd;
stri.ic_timout = 0;
stri.ic_dp = (char *)gbuf;
if (ioctl(fd, I_STR, &stri) == -1) {
gbuf->wldp_result = 0xffff;
return (B_FALSE);
}
if (cmd == WLAN_COMMAND) {
return (B_TRUE);
} else {
return (gbuf->wldp_result != WL_SUCCESS ?
B_FALSE:B_TRUE);
}
}
static boolean_t
del_prefer(config_file_t *p_config_file, const char *prefer, boolean_t rflag)
{
section_t *p_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
int i = 0, position = 0;
int number;
ae_t *prm_ae = NULL;
PRTDBG(("del_prefer(0x%x, \"%s\")\n", p_config_file, prefer));
assert((prefer != NULL)&&(p_config_file != NULL));
p_section = find_section(p_config_file, WIFI_PREFER);
if (p_section != NULL)
plist = p_section->list;
if ((p_section == NULL) || (plist == NULL))
return (B_FALSE);
number = plist->ael_argc;
pae = plist->ael_head;
prm_ae = plist->ael_head;
while (pae != NULL) {
if (strcmp(prefer, pae->ae_arg) == 0) {
free(pae->ae_arg);
pae->ae_arg = NULL;
if (!position) {
plist->ael_head = pae->ae_next;
if (pae->ae_next == NULL)
plist->ael_tail = NULL;
} else {
for (i = 0; i < position - 1; i++)
prm_ae = prm_ae->ae_next;
prm_ae->ae_next = pae->ae_next;
if (pae->ae_next == NULL)
plist->ael_tail = prm_ae;
}
free(pae);
pae = NULL;
plist->ael_argc--;
break;
}
position++;
pae = pae->ae_next;
}
if ((number == plist->ael_argc) && (rflag == B_TRUE)) {
(void) fprintf(stderr, gettext("%s: removeprefer : "
"no such profile: '%s' in the preference list\n"),
gExecName, prefer);
return (B_FALSE);
}
return (B_TRUE);
}
static boolean_t
del_section(config_file_t *p_config_file, char *section_id)
{
section_t *p_section = NULL;
section_t *prm_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
int i = 0, position = 0;
PRTDBG(("del_section(0x%x, \"%s\")\n", p_config_file, section_id));
PRTDBG(("del_section: %d section(s) in config file\n",
p_config_file->section_argc));
assert((section_id != NULL)&&(p_config_file != NULL));
if (find_section(p_config_file, section_id) == NULL) {
return (B_FALSE);
}
p_section = p_config_file->section_head;
prm_section = p_config_file->section_head;
while (p_section != NULL) {
if (p_section->section_id != NULL) {
if (strcmp(p_section->section_id, section_id) == 0) {
plist = p_section->list;
pae = plist->ael_head;
while (pae != NULL) {
free(pae->ae_arg);
pae->ae_arg = NULL;
pae = pae->ae_next;
free(plist->ael_head);
plist->ael_head = pae;
}
free(plist);
p_section->list = NULL;
free(p_section->section_id);
p_section->section_id = NULL;
if (!position) {
p_config_file->section_head =
p_section->section_next;
if (p_section->section_next == NULL)
p_config_file->section_tail =
NULL;
} else {
for (i = 0; i < position - 1; i++) {
prm_section =
prm_section->section_next;
}
prm_section->section_next =
p_section->section_next;
if (p_section->section_next == NULL)
p_config_file->section_tail =
prm_section;
}
free(p_section);
p_config_file->section_argc--;
break;
}
position++;
}
p_section = p_section->section_next;
}
return (B_TRUE);
}
static boolean_t
set_prefer(config_file_t *p_config_file, const char *prefer, int rank)
{
char *pbuf = NULL;
aelist_t *plist = NULL;
section_t *p_section = NULL;
ae_t *pae = NULL;
int i = 0, position = 0;
ae_t *pae_move = NULL;
assert(prefer != NULL);
PRTDBG(("set_prefer(0x%x, \"%s\", %d)\n", p_config_file, prefer, rank));
pbuf = append_pa(prefer);
if (find_section(p_config_file, pbuf) == NULL) {
(void) fprintf(stderr, gettext("%s: setprefer: "
"no such profile: '%s'\n"),
gExecName, prefer);
free(pbuf);
return (B_FALSE);
}
free(pbuf);
p_section = find_section(p_config_file, WIFI_PREFER);
if (p_section == NULL) {
plist = new_ael(PREFERENCE);
new_section(p_config_file, plist, WIFI_PREFER);
new_ae(plist, prefer);
return (B_TRUE);
} else {
plist = p_section->list;
}
pae = plist->ael_head;
pae_move = plist->ael_head;
while (pae != NULL) {
if (strcmp(prefer, pae->ae_arg) == 0) {
free(pae->ae_arg);
pae->ae_arg = NULL;
if (!position) {
plist->ael_head = pae->ae_next;
if (pae->ae_next == NULL)
plist->ael_tail = NULL;
} else {
for (i = 0; i < position - 1; i++)
pae_move = pae_move->ae_next;
pae_move->ae_next = pae->ae_next;
if (pae->ae_next == NULL)
plist->ael_tail = pae_move;
}
free(pae);
plist->ael_argc--;
break;
}
position++;
pae = pae->ae_next;
}
PRTDBG(("set_prefer: %d Profiles in prefer list\n", plist->ael_argc));
if (rank > plist->ael_argc) {
new_ae(plist, prefer);
} else if (rank <= 1) {
pae = safe_calloc(sizeof (ae_t), 1);
pae->ae_arg = safe_strdup(prefer);
pae->ae_next = plist->ael_head;
plist->ael_head = pae;
plist->ael_argc++;
} else {
pae_move = plist->ael_head;
for (i = 1; i < rank-1; i++) {
pae_move = pae_move->ae_next;
}
pae = safe_calloc(sizeof (ae_t), 1);
pae->ae_arg = safe_strdup(prefer);
pae->ae_next = pae_move->ae_next;
pae_move->ae_next = pae;
plist->ael_argc++;
}
if (plist->ael_argc > MAX_PREFERENCE_NUM) {
pae = plist->ael_head;
while (pae->ae_next != plist->ael_tail)
pae = pae->ae_next;
free(plist->ael_tail->ae_arg);
plist->ael_tail->ae_arg = NULL;
free(plist->ael_tail);
plist->ael_tail = pae;
plist->ael_tail->ae_next = NULL;
plist->ael_argc--;
}
PRTDBG(("set_prefer: %d Profiles in prefer list\n", plist->ael_argc));
return (B_TRUE);
}
static void
add_to_history(config_file_t *p_config_file, int argc, char **argv)
{
int i = 0, j = 0, pos = 0;
aelist_t *plist = NULL;
section_t *p_section = NULL;
ae_t *pae = NULL;
ae_t *pae_m = NULL;
char item[256];
time_t cltime;
PRTDBG(("add_to_history(0x%x, %d, 0x%x)\n", p_config_file, argc, argv));
assert(p_config_file != NULL);
p_section = find_section(p_config_file, WIFI_HISTORY);
if (p_section == NULL) {
plist = new_ael(HISTORY);
new_section(p_config_file, plist, WIFI_HISTORY);
} else {
plist = p_section->list;
}
if (plist != NULL) {
for (i = 0; i < argc; i++) {
if (!strlen(argv[i]))
continue;
pos = 0;
pae = plist->ael_head;
pae_m = plist->ael_head;
cltime = time(&cltime);
(void) snprintf(item, sizeof (item), "%s%c%ld",
argv[i], ',', cltime);
while (pae != NULL) {
if (strncmp(item, pae->ae_arg,
strlen(argv[i])) == 0) {
free(pae->ae_arg);
pae->ae_arg = NULL;
if (!pos) {
plist->ael_head = pae->ae_next;
if (pae->ae_next == NULL)
plist->ael_tail = NULL;
} else {
for (j = 0; j < pos - 1; j++)
pae_m = pae_m->ae_next;
pae_m->ae_next = pae->ae_next;
if (pae->ae_next == NULL)
plist->ael_tail = pae_m;
}
free(pae);
plist->ael_argc--;
break;
}
pos++;
pae = pae->ae_next;
}
new_ae(plist, item);
}
if (plist->ael_argc > MAX_HISTORY_NUM) {
for (i = 0; i < plist->ael_argc - MAX_HISTORY_NUM;
i++) {
pae = plist->ael_head;
free(pae->ae_arg);
plist->ael_head = pae->ae_next;
free(pae);
}
plist->ael_argc = MAX_HISTORY_NUM;
}
}
}
static void
do_print_usage()
{
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" autoconf [wait={n|forever}]\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" connect profile [wait={n|forever}]\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" connect essid [wait={n|forever}]\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" disconnect\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" getparam [parameter [...]]\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" setparam [parameter=value [...]]\n"), gExecName);
(void) fprintf(stderr, gettext(
"\tparameters:\n"
"\t\tbssid\t\t - read only: 6 byte mac address of "
"base station\n"
"\t\tessid\t\t - name of the network, a string of up "
"to 32 chars\n"
"\t\tbsstype\t\t - bss(ap, infrastructure), ibss(ad-hoc)"
" or auto\n"
"\t\tcreateibss\t - flag to identify whether a ibss is to be\n"
"\t\t\t\t created when the network to connect is\n"
"\t\t\t\t not available, yes or no\n"
"\t\tchannel\t\t - channel(used only when creating an ibss)\n"
"\t\t\t\t valid value:\n"
"\t\t\t\t\t 802.11a: 0-99\n"
"\t\t\t\t\t 802.11b: 1-14\n"
"\t\t\t\t\t 802.11g: 1-14\n"
"\t\trates\t\t - set of rates, seperated by ',' valid rates:\n"
"\t\t\t\t 1,2,5.5,6,9,11,12,18,22,24,33,36,48 and 54\n"
"\t\tpowermode\t - off, mps or fast\n"
"\t\tauthmode\t - opensystem or shared_key\n"
"\t\tencryption\t - none or wep\n"
"\t\twepkey|1-4\t - write only:\n"
"\t\t\t\t 5 chars or 10 hex digits for 40bit wepkey;\n"
"\t\t\t\t 13 chars or 26 hex digits for 128bit wepkey\n"
"\t\twepkeyindex\t - an integer within the range 1-4\n"
"\t\tsignal\t\t - read only: signal strength from 0 to 15\n"
"\t\tradio\t\t - on or off\n"));
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" restoredef\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" scan\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" showstatus\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path][-i interface]"
" setwepkey 1|2|3|4\n"), gExecName);
(void) fprintf(stderr, "\n");
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" createprofile profile parameter=value [...]\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" deleteprofile profile1 [profile2 [...]]\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" showprofile profile1 [profile2 [...]]\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" setprofilewepkey profile 1|2|3|4\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" getprofileparam profile [parameter [...]]\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" setprofileparam profile [parameter=value [...]]\n"), gExecName);
(void) fprintf(stderr, "\n");
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" history\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" listprefer\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" removeprefer profile\n"), gExecName);
(void) fprintf(stderr, gettext("\t%s [-R root_path]"
" setprefer profile [n]\n"), gExecName);
}
static boolean_t
do_print_support_params(int fd)
{
int i = 0, n = 0;
PRTDBG(("do_print_support_params(\"%d\")\n", fd));
assert(fd != -1);
(void) printf(gettext("\t parameter\tproperty\n"));
for (i = 0; i < N_GS_FUNC; i++) {
gbuf->wldp_result = WL_LACK_FEATURE;
if ((do_gs_func[i].p_do_get_func != NULL) &&
(do_gs_func[i].p_do_get_func(fd) != B_TRUE)) {
continue;
}
if (gbuf->wldp_result == WL_SUCCESS) {
(void) printf("\t%11s", do_gs_func[i].cmd);
if (do_gs_func[i].rw == RO)
(void) printf(gettext("\tread only\n"));
else
(void) printf(gettext("\tread/write\n"));
n++;
}
}
return (n ? B_TRUE : B_FALSE);
}
static boolean_t
check_authority(wifi_auth_t type)
{
struct passwd *pw = NULL;
PRTDBG(("check_authority()\n"));
pw = getpwuid(getuid());
if (pw == NULL)
return (B_FALSE);
if (chkauthattr(p_auth_string[type], pw->pw_name) == 0) {
if (type == AUTH_WEP)
(void) fprintf(stderr, gettext("%s: "
"privilege '%s' is required for setting "
"wepkey.\n"), gExecName, WIFI_WEP_AUTH);
else
(void) fprintf(stderr, gettext("%s: "
"privilege '%s' is required.\n"),
gExecName, WIFI_CONFIG_AUTH);
return (B_FALSE);
} else {
return (B_TRUE);
}
}
static char *
construct_format(uint32_t nt)
{
char *format;
int len = 0, i;
#define FORMAT_LEN 256
assert((nt >= 1) && (nt <= 4));
format = safe_malloc(FORMAT_LEN);
for (i = 0; i < nt; i++)
len += snprintf(format + len, FORMAT_LEN - len, "\t");
if ((len <= 0) || (len > FORMAT_LEN - 1)) {
return ("\t\t\t\t");
}
return (format);
}
static const char *
essid_of_profile(const char *profile)
{
section_t *p_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
char *pbuf;
PRTDBG(("essid_of_profile: profile = %s\n", profile));
pbuf = append_pa(profile);
p_section = find_section(gp_config_file, pbuf);
free(pbuf);
if (p_section == NULL) {
return (NULL);
} else {
plist = p_section->list;
}
pae = plist->ael_head;
while (pae != NULL) {
if (strncmp(pae->ae_arg, "essid=", strlen("essid=")) == 0) {
PRTDBG(("essid_of_profile: essid = %s\n",
pae->ae_arg));
return (get_value(pae->ae_arg));
}
pae = pae->ae_next;
}
return (NULL);
}
static void
heuristic_load(int fd, uint32_t ess_num, wl_ess_conf_t **p_ess_conf)
{
int i = 0;
char *flag = NULL;
int have_nowep_wlan = 0;
wl_rssi_t maxsignal = 0;
char essid[34];
int timeout = LOADPROFILE_TIMEOUT;
PRTDBG(("heuristic_load: enter\n"));
(void) call_ioctl(fd, WLAN_COMMAND, WL_LOAD_DEFAULTS, 0);
flag = calloc(sizeof (char), ess_num);
for (i = 0; i < ess_num; i++) {
if (p_ess_conf[i]->wl_ess_conf_wepenabled == B_FALSE) {
flag[i] = 1;
have_nowep_wlan = 1;
}
}
if (!have_nowep_wlan)
(void) memset(flag, 1, ess_num);
for (i = 0; i < ess_num; i++) {
if (flag[i] == 1) {
if (p_ess_conf[i]->wl_ess_conf_sl > maxsignal) {
maxsignal = p_ess_conf[i]->wl_ess_conf_sl;
(void) memset(flag, 0, i);
} else if (p_ess_conf[i]->wl_ess_conf_sl == maxsignal)
continue;
else
flag[i] = 0;
}
}
for (i = 0; i < ess_num; i++) {
if (flag[i] == 1)
break;
}
free(flag);
PRTDBG(("heuristic_load: %s is selected\n",
p_ess_conf[i]->wl_ess_conf_essid.wl_essid_essid));
if (i == ess_num)
(void) do_set_essid(fd, "");
else
(void) do_set_essid(fd,
p_ess_conf[i]->wl_ess_conf_essid.wl_essid_essid);
if ((ess_num == 0) || (do_get_essid(fd) == B_FALSE)) {
(void) fprintf(stderr, gettext("%s: autoconf:"
" failed to connect to any essid\n"),
gExecName);
exit(WIFI_MINOR_ERR);
}
(void) strlcpy(essid, ((wl_essid_t *)(gbuf->wldp_buf))->wl_essid_essid,
sizeof (essid));
(void) printf(gettext("%s: autoconf: essid '%s' is selected%s\n"),
gExecName, essid,
have_nowep_wlan ? "" : ": this is a WEPed "
"access point");
if (!have_nowep_wlan)
exit(WIFI_FATAL_ERR);
while (timeout > 0) {
if ((do_get_linkstatus(fd) == B_TRUE) &&
(*(wl_linkstatus_t *)(gbuf->wldp_buf) == WL_CONNECTED)) {
(void) printf(gettext("%s: connecting to "
"essid '%s'\n"), gExecName, essid);
return;
}
(void) sleep(1);
timeout--;
}
(void) fprintf(stderr, gettext("%s: failed to connect to "
"essid '%s'\n"), gExecName, essid);
exit(WIFI_FATAL_ERR);
}
static char *
select_profile(int fd, int readonly, int timeout)
{
uint32_t ess_num = 0;
int nprefer = 1;
char **ess_argv;
char **hisess_argv;
wl_ess_conf_t **p_ess_conf;
section_t *p_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
int i;
const char *parg;
char *selected = NULL;
boolean_t flag = B_FALSE;
if ((call_ioctl(fd, WLAN_COMMAND, WL_SCAN, 0) == B_FALSE) ||
(do_get_wlanlist(fd) == B_FALSE)) {
(void) fprintf(stderr, gettext("%s: "
"autoconf : failed to scan\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
ess_num = ((wl_ess_list_t *)(gbuf->wldp_buf))->wl_ess_list_num;
ess_argv = safe_calloc(sizeof (char *), ess_num);
hisess_argv = safe_calloc(sizeof (char *), ess_num);
p_ess_conf = safe_calloc(sizeof (wl_ess_list_t *), ess_num);
for (i = 0; i < ess_num; i++) {
p_ess_conf[i] = ((wl_ess_list_t *)gbuf->wldp_buf)
->wl_ess_list_ess + i;
ess_argv[i] = safe_malloc(MAX_SCANBUF_LEN);
if (readonly == 0) {
hisess_argv[i] = safe_malloc(MAX_SCANBUF_LEN);
(void) snprintf(hisess_argv[i], MAX_SCANBUF_LEN,
"%s%c%02x:%02x:%02x:%02x:%02x:%02x%c%s",
p_ess_conf[i]->wl_ess_conf_essid.wl_essid_essid,
',',
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[0]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[1]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[2]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[3]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[4]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[5]), ',',
(p_ess_conf[i]->wl_ess_conf_wepenabled == B_TRUE
? "wep":"none"));
}
(void) snprintf(ess_argv[i], MAX_SCANBUF_LEN, "%s",
p_ess_conf[i]->wl_ess_conf_essid.wl_essid_essid);
}
if (readonly == 0) {
add_to_history(gp_config_file, ess_num, hisess_argv);
for (i = 0; i < ess_num; i++) {
free(hisess_argv[i]);
}
free(hisess_argv);
}
p_section = find_section(gp_config_file, WIFI_PREFER);
if (p_section == NULL) {
if (ess_num > 0) {
heuristic_load(fd, ess_num, p_ess_conf);
exit(WIFI_EXIT_DEF);
}
goto done;
}
plist = p_section->list;
assert(plist != NULL);
if (plist != NULL) {
nprefer = plist->ael_argc;
if (nprefer == 0) {
if (ess_num > 0) {
heuristic_load(fd, ess_num, p_ess_conf);
exit(WIFI_EXIT_DEF);
}
goto done;
}
}
pae = plist->ael_head;
while ((pae != NULL) && (flag != B_TRUE)) {
parg = essid_of_profile(pae->ae_arg);
if (parg != NULL) {
for (i = 0; i < ess_num; i++) {
if (strcmp(parg, ess_argv[i]) == 0) {
selected = pae->ae_arg;
flag = B_TRUE;
break;
}
}
}
pae = pae->ae_next;
}
done:
if ((selected == NULL) && (timeout == 0)) {
heuristic_load(fd, ess_num, p_ess_conf);
}
for (i = 0; i < ess_num; i++) {
free(ess_argv[i]);
}
free(ess_argv);
free(p_ess_conf);
return (selected);
}
static boolean_t
is_waittime_valid(char *pbuf)
{
int i;
i = atoi(pbuf);
if (i == -1)
return (B_TRUE);
for (i = 0; i < strlen(pbuf); i++) {
if (isdigit(pbuf[i]) == 0) {
return (B_FALSE);
}
}
return (B_TRUE);
}
static boolean_t
do_autoconf(int fd, int argc, char **argv)
{
const char *selected = NULL;
int timeout = LOADPROFILE_TIMEOUT, forever = 0, len = 0;
char *pequal, *param;
char **ld_argv = NULL;
boolean_t ret = B_TRUE;
PRTDBG(("do_autoconf(%d, 0x%x)\n", argc, argv));
assert(fd > 0);
if (argc > 0) {
param = safe_strdup(argv[0]);
pequal = strchr(param, '=');
if (pequal != NULL) {
*pequal++ = '\0';
} else {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (strcmp(param, "wait") != 0) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
} else {
if (strcmp(pequal, "forever") == 0) {
forever = 1;
} else {
if (is_waittime_valid(pequal) == B_FALSE) {
(void) fprintf(stderr, gettext("%s: "
"invalid value %s for 'wait'\n"),
gExecName, pequal);
exit(WIFI_FATAL_ERR);
}
if (sscanf(pequal, "%d", &timeout) != 1) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (timeout == -1) {
forever = 1;
}
}
}
free(param);
if (argc > 1) {
(void) fprintf(stderr, gettext("%s: trailing "
"useless tokens after '%s'\n"),
gExecName, argv[0]);
}
}
while ((forever == 1) || (timeout > 0)) {
timeout--;
selected = select_profile(fd, 0, max(timeout, forever));
if (selected != NULL)
break;
(void) sleep(1);
}
if (selected == NULL) {
return (B_TRUE);
}
(void) printf(gettext("%s: autoconf: profile [%s]"
" is selected\n"), gExecName, selected);
ld_argv = safe_calloc(sizeof (char *), argc+1);
ld_argv[0] = safe_strdup(selected);
if (argc > 0) {
len = max(strlen(argv[0]), strlen("wait=forever"));
ld_argv[1] = safe_malloc(len);
safe_snprintf(ld_argv[1], len + 1, forever == 1 ?
"wait=forever" : "wait=%d", timeout);
}
ret = do_loadpf(fd, argc+1, ld_argv);
free(ld_argv[0]);
if (argc > 0) {
free(ld_argv[1]);
}
free(ld_argv);
return (ret);
}
static boolean_t
do_startconf(int fd, int argc, char **argv)
{
int i = 0, ael_num = 0;
section_t *p_section = NULL;
section_t *p_wep_section = NULL;
aelist_t *plist = NULL;
const char *selected = NULL;
ae_t *pae = NULL;
char *pbuf = NULL;
char **argvnew = NULL;
PRTDBG(("do_startconf(%d, 0x%x)\n", argc, argv));
assert(fd > 0);
selected = select_profile(fd, 1, 0);
if (selected == NULL) {
return (B_TRUE);
}
(void) call_ioctl(fd, WLAN_COMMAND, WL_LOAD_DEFAULTS, 0);
pbuf = append_pa(selected);
p_wep_section = find_section(gp_wepkey_file, pbuf);
p_section = find_section(gp_config_file, pbuf);
free(pbuf);
if (p_wep_section != NULL) {
plist = p_wep_section->list;
pae = plist->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL)
(void) do_set_wepkey(fd, pae->ae_arg);
pae = pae->ae_next;
}
}
if (p_section != NULL) {
plist = p_section->list;
if (plist->ael_argc == 0) {
return (B_TRUE);
}
argvnew = aeltoargv(plist, &ael_num);
(void) do_set(fd, ael_num, argvnew);
for (i = 0; i < ael_num; i++)
free(argvnew[i]);
free(argvnew);
}
return (B_TRUE);
}
static char *
find_active_profile(int fd)
{
section_t *p_section = NULL, *activep_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
const char *pessid = NULL, *pbssid = NULL;
char essid[34], bssid[32];
const char *activeprofile = NULL;
PRTDBG(("find_active_profile: %d\n", fd));
if (do_get_essid(fd) == B_FALSE) {
return (NULL);
}
(void) strlcpy(essid, ((wl_essid_t *)(gbuf->wldp_buf))->wl_essid_essid,
sizeof (essid));
if (do_get_bssid(fd) == B_FALSE) {
return (NULL);
}
safe_snprintf(bssid, sizeof (bssid), "%02x:%02x:%02x:%02x:%02x:%02x",
((uint8_t *)gbuf->wldp_buf)[0],
((uint8_t *)gbuf->wldp_buf)[1],
((uint8_t *)gbuf->wldp_buf)[2],
((uint8_t *)gbuf->wldp_buf)[3],
((uint8_t *)gbuf->wldp_buf)[4],
((uint8_t *)gbuf->wldp_buf)[5]);
activep_section = find_section(gp_config_file, WIFI_ACTIVEP);
if (activep_section == NULL)
return (NULL);
activeprofile = get_value(activep_section->list->
ael_head->ae_arg);
if (activeprofile == NULL)
return (NULL);
p_section = gp_config_file->section_head;
while (p_section != NULL) {
if (((plist = p_section->list) != NULL) &&
(plist->type == PROFILE) &&
(strcmp(p_section->section_id, activeprofile) == 0)) {
pae = plist->ael_head;
while (pae != NULL) {
if (strncmp(pae->ae_arg, "essid=",
strlen("essid=")) == 0) {
pessid = get_value(pae->ae_arg);
}
if (strncmp(pae->ae_arg, "bssid=",
strlen("bssid=")) == 0) {
pbssid = get_value(pae->ae_arg);
}
pae = pae->ae_next;
}
if (pessid && pbssid &&
(strcmp(essid, pessid) == 0) &&
(strcmp(bssid, pbssid) == 0)) {
return (p_section->section_id);
}
}
p_section = p_section->section_next;
}
return (NULL);
}
static void
record_active_profile(char *pname, int action)
{
section_t *p_section = NULL;
aelist_t *plist = NULL;
char pbuf[256];
p_section = find_section(gp_config_file, WIFI_ACTIVEP);
if (p_section == NULL) {
plist = new_ael(ACTIVEP);
new_section(gp_config_file, plist, WIFI_ACTIVEP);
} else {
plist = p_section->list;
}
if (action == RECORD_ADD) {
assert(pname != NULL);
safe_snprintf(pbuf, sizeof (pbuf), "activep=%s", pname);
update_aelist(plist, pbuf);
} else if (action == RECORD_DEL) {
assert(pname == NULL);
update_aelist(plist, "activep= ");
}
}
static boolean_t
do_loadpf(int fd, int argc, char ** argv)
{
int i = 0, ael_num = 0;
int timeout = LOADPROFILE_TIMEOUT, forever = 0;
section_t *p_section = NULL;
section_t *p_wep_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
char *pbuf = NULL;
char **argvnew = NULL;
char *connect;
char *pequal, *param;
PRTDBG(("do_loadpf(%d, %x)\n", argc, argv));
assert(fd > 0);
if (argc == 0) {
(void) fprintf(stderr, gettext("%s: connect: "
"profile name missing\n"), gExecName);
return (B_FALSE);
}
if (argc > 1) {
param = safe_strdup(argv[1]);
pequal = strchr(param, '=');
if (pequal != NULL) {
*pequal++ = '\0';
} else {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (strcmp(param, "wait") != 0) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
} else {
if (strcmp(pequal, "forever") == 0) {
forever = 1;
} else {
if (is_waittime_valid(pequal) == B_FALSE) {
(void) fprintf(stderr, gettext("%s: "
"invalid value %s for 'wait'\n"),
gExecName, pequal);
exit(WIFI_FATAL_ERR);
}
if (sscanf(pequal, "%d", &timeout) != 1) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (timeout == -1) {
forever = 1;
}
}
}
free(param);
if (argc > 2) {
(void) fprintf(stderr, gettext("%s: trailing "
"useless tokens after '%s'\n"),
gExecName, argv[1]);
}
}
(void) call_ioctl(fd, WLAN_COMMAND, WL_LOAD_DEFAULTS, 0);
pbuf = append_pa(argv[0]);
p_wep_section = find_section(gp_wepkey_file, pbuf);
p_section = find_section(gp_config_file, pbuf);
if (p_wep_section != NULL) {
(void) set_prefer(gp_config_file, argv[0], 1);
plist = p_wep_section->list;
pae = plist->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL) {
(void) do_set_wepkey(fd, pae->ae_arg);
}
pae = pae->ae_next;
}
}
if (p_section != NULL) {
connect = "profile";
(void) set_prefer(gp_config_file, argv[0], 1);
plist = p_section->list;
if (plist->ael_argc == 0) {
free(pbuf);
return (B_TRUE);
}
argvnew = aeltoargv(plist, &ael_num);
for (i = 0; i < ael_num; i++) {
if (strncmp(argvnew[i], "essid=", strlen("essid="))
== 0)
break;
}
if (i == ael_num)
(void) do_set_essid(fd, argv[0]);
(void) do_set(fd, ael_num, argvnew);
for (i = 0; i < ael_num; i++)
free(argvnew[i]);
free(argvnew);
record_active_profile(pbuf, RECORD_ADD);
} else {
(void) do_set_essid(fd, argv[0]);
connect = "essid";
}
while ((forever == 1) || (timeout > 0)) {
if ((do_get_linkstatus(fd) == B_TRUE) &&
(*(wl_linkstatus_t *)(gbuf->wldp_buf) == WL_CONNECTED)) {
section_t *p_section = NULL;
aelist_t *plist = NULL;
char bssid[32];
if (do_get_bssid(fd) == B_FALSE) {
free(pbuf);
return (B_TRUE);
}
safe_snprintf(bssid, sizeof (bssid),
"bssid=%02x:%02x:%02x:%02x:%02x:%02x",
((uint8_t *)gbuf->wldp_buf)[0],
((uint8_t *)gbuf->wldp_buf)[1],
((uint8_t *)gbuf->wldp_buf)[2],
((uint8_t *)gbuf->wldp_buf)[3],
((uint8_t *)gbuf->wldp_buf)[4],
((uint8_t *)gbuf->wldp_buf)[5]);
p_section = find_section(gp_config_file, pbuf);
if (p_section != NULL) {
plist = p_section->list;
update_aelist(plist, bssid);
}
free(pbuf);
(void) printf(gettext("%s: connecting to "
"%s '%s'\n"), gExecName, connect, argv[0]);
return (B_TRUE);
}
(void) sleep(1);
timeout--;
PRTDBG(("connect counting:......%d\n", timeout));
}
(void) fprintf(stderr, gettext("%s: failed to connect to "
"%s '%s'\n"), gExecName, connect, argv[0]);
free(pbuf);
return (B_FALSE);
}
static void
print_wepkey_info(const char *id, const char *wepkeyn)
{
char *pequal, *param;
section_t *p_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
p_section = find_section(gp_wepkey_file, id);
if (p_section != NULL) {
plist = p_section->list;
pae = plist->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL) {
param = safe_strdup(pae->ae_arg);
pequal = strchr(param, '=');
if (pequal == NULL)
return;
*pequal = '\0';
if (wepkeyn != NULL) {
if (strcmp(wepkeyn, param) == 0)
(void) printf("\t%s=*****\n",
param);
free(param);
return;
} else {
(void) printf("\t%s=*****\n", param);
free(param);
}
}
pae = pae->ae_next;
}
}
}
static boolean_t
do_printpf(int fd, int argc, char ** argv)
{
section_t *p_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
char *pbuf = NULL;
int i;
PRTDBG(("do_printpf(%d, %x)\n", argc, argv));
if (argc == 0) {
p_section = gp_config_file->section_head;
while (p_section != NULL) {
plist = p_section->list;
if (plist->type == PROFILE) {
(void) printf("%s\n", p_section->section_id);
pae = plist->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL) {
(void) printf("\t%s\n",
pae->ae_arg);
}
pae = pae->ae_next;
}
print_wepkey_info(p_section->section_id, NULL);
}
p_section = p_section->section_next;
}
return (B_TRUE);
}
for (i = 0; i < argc; i++) {
pbuf = append_pa(argv[i]);
p_section = find_section(gp_config_file, pbuf);
free(pbuf);
if (p_section != NULL) {
(void) printf("%s\n", p_section->section_id);
plist = p_section->list;
if (plist != NULL) {
pae = plist->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL) {
(void) printf("\t%s\n",
pae->ae_arg);
}
pae = pae->ae_next;
}
print_wepkey_info(p_section->section_id, NULL);
}
} else {
(void) fprintf(stderr,
gettext("%s: showprofile : "
"no such profile: '%s'\n"),
gExecName, argv[i]);
return (B_FALSE);
}
}
return (B_TRUE);
}
static ae_t *
find_ae(aelist_t *plist, const char *arg)
{
char *param = NULL;
char *pnext = NULL;
ae_t *pae = NULL;
if ((arg == NULL) || (plist == NULL)) {
PRTDBG(("find_ae: arg= NULL or plist=NULL\n"));
return (NULL);
}
PRTDBG(("find_ae(0x%x, \"%s\")\n", plist, arg));
param = safe_strdup(arg);
pnext = strchr(param, '=');
if (pnext != NULL) {
*pnext = '\0';
} else {
PRTDBG(("find_ae: param = \"%s\"\n", param));
free(param);
return (NULL);
}
pae = plist->ael_head;
while (pae != NULL) {
if ((pae->ae_arg != NULL) &&
(strncmp(pae->ae_arg, param, strlen(param)) == 0)) {
PRTDBG(("find_ae: param = \"%s\"\n", param));
free(param);
return (pae);
}
pae = pae->ae_next;
}
free(param);
return (NULL);
}
static void
update_aelist(aelist_t *plist, const char *arg)
{
ae_t *pae = NULL;
assert((arg != NULL)&&(plist != NULL));
PRTDBG(("update_aelist(0x%x, \"%s\")\n", plist, arg));
pae = find_ae(plist, arg);
if (pae == NULL) {
new_ae(plist, arg);
} else {
free(pae->ae_arg);
pae->ae_arg = safe_strdup(arg);
}
}
static boolean_t
do_deletepf(int fd, int argc, char **argv)
{
int i = 0;
char *section_id;
char *prefer;
section_t *p_section = NULL, *p_sectionbak = NULL;
aelist_t *plist = NULL;
PRTDBG(("do_deletepf(%d, \"%s\")\n", argc, argv));
if (argc <= 0) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (strcasecmp(argv[0], "all") == 0) {
p_section = gp_config_file->section_head;
while ((p_section != NULL) &&
((plist = p_section->list) != NULL)) {
if (plist->type == PROFILE) {
p_sectionbak = p_section->section_next;
section_id = safe_strdup(p_section->section_id);
(void) del_section(gp_config_file, section_id);
(void) del_section(gp_wepkey_file, section_id);
prefer = section_id + 1;
*(prefer + strlen(section_id) - 2) = '\0';
(void) del_prefer(gp_config_file, prefer,
B_FALSE);
free(section_id);
p_section = p_sectionbak;
continue;
}
p_section = p_section->section_next;
}
return (B_TRUE);
}
if (gp_config_file != NULL) {
for (i = 0; i < argc; i++) {
section_id = append_pa(argv[i]);
if (del_section(gp_config_file, section_id)
== B_FALSE) {
if (del_section(gp_wepkey_file, section_id)
== B_TRUE) {
(void) del_prefer(gp_config_file,
argv[i], B_FALSE);
free(section_id);
return (B_TRUE);
} else {
(void) fprintf(stderr,
gettext("%s: deleteprofile"
": no such profile: '%s'\n"),
gExecName, argv[i]);
free(section_id);
return (B_FALSE);
}
}
(void) del_prefer(gp_config_file, argv[i], B_FALSE);
(void) del_section(gp_wepkey_file, section_id);
free(section_id);
}
}
return (B_TRUE);
}
static boolean_t
do_history(int fd, int argc, char **argv)
{
section_t *p_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
char *param, *param_bak, *pcomma;
uint32_t maxessidlen = 0, ulen;
char format[256], *ntstr;
uint32_t nt = 0, cnt = 0;
int len;
time_t cltime;
PRTDBG(("do_history(%d, 0x%x)\n", argc, argv));
if (argc > 0) {
(void) fprintf(stderr, gettext("%s: trailing useless tokens "
"after 'history'\n"), gExecName);
}
p_section = find_section(gp_config_file, WIFI_HISTORY);
if (p_section == NULL) {
PRTDBG(("no history section\n"));
return (B_FALSE);
}
plist = p_section->list;
if (plist == NULL)
return (B_TRUE);
pae = NULL;
pae = plist->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL) {
param = safe_strdup(pae->ae_arg);
pcomma = strchr(param, ',');
if (pcomma == NULL) {
(void) fprintf(stderr,
gettext("%s: history : "
"data format error\n"),
gExecName);
free(param);
return (B_FALSE);
}
*pcomma = '\0';
ulen = strlen(param);
maxessidlen = (maxessidlen > ulen
? maxessidlen:ulen);
free(param);
}
pae = pae->ae_next;
}
if ((nt = (maxessidlen / 8 + 1)) > 4)
nt = 4;
len = snprintf(format, sizeof (format), gettext("essid"));
ntstr = construct_format(nt);
assert((ntstr != NULL) && (strlen(ntstr) <= 4));
len += snprintf(format + len, sizeof (format) - len, "%s", ntstr);
len += snprintf(format + len, sizeof (format) - len,
gettext("bssid\t\t encryption\tlast seen\n"));
if ((len <= 0) || (len > sizeof (format) - 1)) {
(void) printf(gettext("essid\t\t\t\tbssid\t\t encryption"
"\tlast seen\n"));
} else {
(void) printf("%s", format);
}
pae = plist->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL) {
param = safe_strdup(pae->ae_arg);
param_bak = param;
if ((pcomma = strchr(param, ',')) != NULL) {
*pcomma = '\0';
cnt = nt - (min((strlen(param)/8 + 1), 4) - 1);
ntstr = construct_format(cnt);
assert(ntstr != NULL);
(void) printf("%s%s", param, ntstr);
free(ntstr);
}
param = pcomma + 1;
if ((pcomma = strchr(param, ',')) != NULL) {
*pcomma = '\0';
(void) printf("%s ", param);
}
param = pcomma + 1;
if ((pcomma = strchr(param, ',')) != NULL) {
*pcomma = '\0';
(void) printf("%s\t\t", param);
}
param = pcomma + 1;
cltime = (time_t)atol(param);
(void) printf("%s", ctime(&cltime));
free(param_bak);
}
pae = pae->ae_next;
}
return (B_TRUE);
}
static boolean_t
do_lsprefer(int fd, int argc, char **argv)
{
int i = 0;
section_t *p_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
char *pbuf;
PRTDBG(("do_lsprefer(%d, 0x%x)\n", argc, argv));
if (argc > 0) {
(void) fprintf(stderr, gettext("%s: trailing useless tokens "
"after 'listprefer'\n"), gExecName);
}
p_section = find_section(gp_config_file, WIFI_PREFER);
if (p_section != NULL) {
plist = p_section->list;
if (plist != NULL) {
pae = NULL;
pae = plist->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL) {
pbuf = append_pa(pae->ae_arg);
(void) printf("%d\t%s\n", ++i, pbuf);
}
pae = pae->ae_next;
}
}
return (B_TRUE);
} else {
PRTDBG(("no preference section\n"));
return (B_FALSE);
}
}
static boolean_t
do_rmprefer(int fd, int argc, char **argv)
{
int i = 0;
section_t *p_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
PRTDBG(("do_rmprefer(%d, 0x%x)\n", argc, argv));
if (argc <= 0) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (strcasecmp(argv[0], "all") == 0) {
p_section = find_section(gp_config_file, WIFI_PREFER);
if (p_section != NULL)
plist = p_section->list;
if ((p_section == NULL) || (plist == NULL))
return (B_FALSE);
pae = plist->ael_head;
while (pae != NULL) {
ae_t *next = pae->ae_next;
free(pae);
pae = next;
}
plist->ael_head = plist->ael_tail = NULL;
plist->ael_argc = 0;
} else if (gp_config_file != NULL) {
for (i = 0; i < argc; i++) {
if (del_prefer(gp_config_file, argv[i], B_TRUE)
== B_FALSE) {
return (B_FALSE);
}
}
}
return (B_TRUE);
}
static boolean_t
is_prefer_rank_valid(const char *pbuf)
{
int i;
boolean_t ret = B_FALSE;
for (i = 0; i < strlen(pbuf); i++) {
if (isdigit(pbuf[i]) == 0) {
ret = B_FALSE;
goto exit0;
}
}
i = atoi(pbuf);
if ((i >= 1) && (i <= MAX_PREFERENCE_NUM))
ret = B_TRUE;
exit0:
return (ret);
}
static boolean_t
do_setprefer(int fd, int argc, char **argv)
{
int rank = 0;
PRTDBG(("do_setprefer(%d, 0x%x)\n", argc, argv));
if (argc <= 0) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (argc == 1) {
rank = 1;
} else {
if (is_prefer_rank_valid(argv[1]) == B_FALSE) {
(void) fprintf(stderr, gettext("%s: preference rank "
"should be an integer within 1-10\n"), gExecName);
return (B_FALSE);
}
rank = atoi(argv[1]);
}
return (set_prefer(gp_config_file, argv[0], rank));
}
static boolean_t
is_wepkeyindex_valid(const char *pbuf)
{
int i;
boolean_t ret = B_FALSE;
for (i = 0; i < strlen(pbuf); i++) {
if (isdigit(pbuf[i]) == 0) {
ret = B_FALSE;
goto exit0;
}
}
i = atoi(pbuf);
if ((i >= 1) && (i <= MAX_NWEPKEYS))
ret = B_TRUE;
exit0:
return (ret);
}
static boolean_t
is_channel_valid(const char *pbuf)
{
int i;
boolean_t ret = B_FALSE;
for (i = 0; i < strlen(pbuf); i++) {
if (isdigit(pbuf[i]) == 0) {
ret = B_FALSE;
goto exit0;
}
}
i = atoi(pbuf);
if ((i >= 0) && (i <= MAX_CHANNEL_NUM))
ret = B_TRUE;
exit0:
return (ret);
}
static boolean_t
is_wepkey_valid(const char *pbuf, uint32_t length)
{
int i;
boolean_t ret = B_FALSE;
switch (length) {
case 10:
case 26:
for (i = 0; i < length; i++) {
if (isxdigit(pbuf[i]) == 0) {
ret = B_FALSE;
goto exit0;
}
}
ret = B_TRUE;
break;
case 5:
case 13:
ret = B_TRUE;
break;
default:
ret = B_FALSE;
break;
}
exit0:
if (ret == B_FALSE) {
(void) fprintf(stderr, gettext("%s: "
"wepkey should be:\n"
"\t 40bits: 5 char or 10 hex digits.\n"
"\t 128bits: 13 char or 26 hex digits.\n"),
gExecName);
}
return (ret);
}
static char *
get_valid_wepkey()
{
int i = 0;
char *buf = NULL;
uint8_t length = 0;
struct termios stored_settings;
struct termios new_settings;
PRTDBG(("get_valid_wepkey()\n"));
buf = safe_calloc(sizeof (char), MAX_KEY_LENGTH + 2);
(void) fflush(stdin);
(void) tcgetattr(0, &stored_settings);
new_settings = stored_settings;
new_settings.c_lflag &= (~ICANON);
new_settings.c_lflag &= (~ECHO);
new_settings.c_cc[VTIME] = 0;
new_settings.c_cc[VMIN] = 1;
(void) tcsetattr(0, TCSANOW, &new_settings);
while (((buf[i++] = getchar()) != '\n') && (i < MAX_KEY_LENGTH + 1)) {
(void) putchar('*');
}
(void) putchar('\n');
(void) tcsetattr(0, TCSANOW, &stored_settings);
(void) fflush(stdin);
if (buf[--i] != '\n') {
(void) fprintf(stderr, gettext("%s: wepkey length "
"exceeds 26 hex digits\n"), gExecName);
free(buf);
return (NULL);
}
buf[i] = '\0';
length = (uint8_t)i;
return ((is_wepkey_valid(buf, length) == B_TRUE)?
buf : NULL);
}
static boolean_t
do_set_wepkey(int fd, const char *pbuf)
{
int id = 0;
char i = 0;
uint8_t len = 0;
uint8_t length;
const char *wepkey = NULL;
char key[MAX_KEY_LENGTH] = {0};
unsigned int keytmp;
wl_wep_key_tab_t wepkey_tab;
PRTDBG(("do_set_wepkey(%d, \"%s\")\n", fd, pbuf));
if (!check_authority(AUTH_WEP)) {
exit(WIFI_FATAL_ERR);
}
id = pbuf[strlen("wepkeyn") - 1] - '0';
wepkey = get_value(pbuf);
length = strlen(wepkey);
switch (length) {
case 10:
case 26:
for (i = 0; i < length / 2; i++) {
(void) sscanf(wepkey + i * 2, "%2x", &keytmp);
key[i] = (char)keytmp;
}
len = length / 2;
break;
case 5:
case 13:
(void) strlcpy(key, wepkey, MAX_KEY_LENGTH);
len = length;
break;
default:
PRTDBG(("do_set_wepkey: error pbuf size\n"));
(void) fprintf(stderr, gettext("%s: "
"wepkey should be:\n"
"\t 40bits: 5 char or 10 hex digits.\n"
"\t 128bits: 13 char or 26 hex digits.\n"),
gExecName);
exit(WIFI_FATAL_ERR);
}
(void) memset(wepkey_tab, 0, sizeof (wepkey_tab));
for (i = 0; i < MAX_NWEPKEYS; i++) {
wepkey_tab[i].wl_wep_operation = WL_NUL;
}
if (id > 0 && id <= MAX_NWEPKEYS) {
wepkey_tab[id-1].wl_wep_operation = WL_ADD;
wepkey_tab[id-1].wl_wep_length = len;
(void) memcpy(wepkey_tab[id-1].wl_wep_key, key, len);
} else {
(void) fprintf(stderr, gettext("%s: wepkeyindex "
"should be an integer within the range 1-4\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
(void) memmove(gbuf->wldp_buf, &wepkey_tab, sizeof (wl_wep_key_tab_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_WEP_KEY_TAB,
sizeof (wl_wep_key_tab_t)));
}
static char *
get_commit_key(int fd, int argc, char **argv)
{
int key;
int len;
char *wepkey = NULL;
char *wepkey_confirm = NULL;
char *pbuf = NULL;
key = atoi(argv[0]);
if (key <= 0 || key > MAX_NWEPKEYS) {
(void) fprintf(stderr, gettext("%s: wepkeyindex "
"should be an integer within the range 1-4\n"), gExecName);
goto exit0;
}
(void) printf(gettext("input wepkey%d:"), key);
wepkey = get_valid_wepkey();
if (wepkey == NULL) {
goto exit0;
}
(void) printf(gettext("confirm wepkey%d:"), key);
wepkey_confirm = get_valid_wepkey();
if (wepkey_confirm == NULL) {
free(wepkey);
goto exit0;
}
if (strcmp(wepkey, wepkey_confirm) != 0) {
free(wepkey);
free(wepkey_confirm);
(void) fprintf(stderr,
gettext("%s: wepkey: "
"two inputs are not identical\n"), gExecName);
goto exit0;
}
free(wepkey_confirm);
len = MAX_KEY_LENGTH + strlen("wepkey1=\n") + 1;
pbuf = safe_malloc(len);
safe_snprintf(pbuf, len, "%s%d=%s", "wepkey", key, wepkey);
free(wepkey);
return (pbuf);
exit0:
return (NULL);
}
static boolean_t
do_wepkey(int fd, int argc, char **argv)
{
char *pbuf;
PRTDBG(("do_wepkey(%d, 0x%x)\n", argc, argv));
assert(fd > 0);
if (argc <= 0) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (argc > 1) {
(void) fprintf(stderr, gettext("%s: trailing useless tokens "
"after 'setwepkey'\n"), gExecName);
}
pbuf = get_commit_key(fd, argc, argv);
if ((pbuf != NULL) && (do_set_wepkey(fd, pbuf) == B_TRUE)) {
free(pbuf);
return (B_TRUE);
}
free(pbuf);
return (B_FALSE);
}
static boolean_t
do_setprofwepkey(int fd, int argc, char **argv)
{
char *pbuf;
char *section_id = NULL;
section_t *p_section = NULL;
aelist_t *plist = NULL;
PRTDBG(("do_setprofwepkey(%d, 0x%x)\n", argc, argv));
if (argc < 2) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (argc > 2) {
(void) fprintf(stderr, gettext("%s: trailing useless tokens "
"after 'setprofwepkey'\n"), gExecName);
}
section_id = append_pa(argv[0]);
p_section = find_section(gp_wepkey_file, section_id);
free(section_id);
if (p_section == NULL) {
(void) fprintf(stderr, gettext("%s: "
"no such profile: '%s'\n"),
gExecName, argv[0]);
return (B_FALSE);
}
argc--;
argv++;
pbuf = get_commit_key(fd, argc, argv);
if (pbuf == NULL)
return (B_FALSE);
plist = p_section->list;
update_aelist(plist, pbuf);
return (B_TRUE);
}
static boolean_t
do_wlanlist(int fd, int argc, char **argv)
{
PRTDBG(("do_wlanlist(%d, 0x%x)\n", argc, argv));
assert(fd > 0);
if (argc > 0) {
(void) fprintf(stderr, gettext("%s: trailing useless tokens "
"after 'scan'\n"), gExecName);
}
if (call_ioctl(fd, WLAN_COMMAND, WL_SCAN, 0) == B_FALSE) {
(void) fprintf(stderr, gettext("%s: failed to scan\n"),
gExecName);
return (B_FALSE);
}
if (do_get_wlanlist(fd) == B_TRUE) {
print_gbuf(WLANLIST);
}
return (B_TRUE);
}
static boolean_t
do_showstatus(int fd, int argc, char **argv)
{
wl_rssi_t signal;
char *active_profile = NULL;
PRTDBG(("do_showstatus(%d, 0x%x)\n", argc, argv));
assert(fd > 0);
if (argc > 0) {
(void) fprintf(stderr, gettext("%s: trailing useless tokens "
"after 'showstatus'\n"), gExecName);
}
if (do_get_linkstatus(fd) == B_TRUE) {
print_gbuf(LINKSTATUS);
if (*(wl_linkstatus_t *)(gbuf->wldp_buf) == WL_NOTCONNECTED) {
return (B_TRUE);
}
}
active_profile = find_active_profile(fd);
(void) printf("\tactive profile: %s\n",
active_profile ? active_profile : "none");
if (do_get_essid(fd) == B_TRUE) {
print_gbuf(ESSID);
}
if (do_get_bssid(fd) == B_TRUE) {
print_gbuf(BSSID);
}
if (do_get_encryption(fd) == B_TRUE) {
print_gbuf(ENCRYPTION);
}
if (do_get_signal(fd) == B_TRUE) {
signal = *(wl_rssi_t *)(gbuf->wldp_buf);
if (signal < 4) {
(void) printf("\tsignal strength: weak(%d)\n",
signal);
} else if ((signal >= 4) && (signal <= 11)) {
(void) printf("\tsignal strength: medium(%d)\n",
signal);
} else {
(void) printf("\tsignal strength: strong(%d)\n",
signal);
}
}
return (B_TRUE);
}
static boolean_t
do_restoredef(int fd, int argc, char **argv)
{
PRTDBG(("do_restoredef(%d, 0x%x)\n", argc, argv));
assert(fd > 0);
if (argc > 0) {
(void) fprintf(stderr, gettext("%s: trailing useless tokens "
"after 'restoredef'\n"), gExecName);
}
record_active_profile(NULL, RECORD_DEL);
if (call_ioctl(fd, WLAN_COMMAND, WL_LOAD_DEFAULTS, 0) == B_FALSE) {
return (B_FALSE);
} else {
return (B_TRUE);
}
}
static boolean_t
do_disconnect(int fd, int argc, char **argv)
{
PRTDBG(("do_disconnect(%d, 0x%x)\n", argc, argv));
assert(fd > 0);
if (argc > 0) {
(void) fprintf(stderr, gettext("%s: trailing useless tokens "
"after 'disconnect'\n"), gExecName);
}
record_active_profile(NULL, RECORD_DEL);
if (call_ioctl(fd, WLAN_COMMAND, WL_DISASSOCIATE, 0) == B_FALSE) {
return (B_FALSE);
} else {
return (B_TRUE);
}
}
static boolean_t
do_set_essid(int fd, const char *arg)
{
wl_essid_t essid;
PRTDBG(("do_set_essid(%d, \"%s\")\n", fd, arg));
record_active_profile(NULL, RECORD_DEL);
(void) memset(&essid, 0x0, sizeof (essid));
if (arg == NULL || strcmp(arg, "") == 0) {
essid.wl_essid_length = 0;
essid.wl_essid_essid[0] = '\0';
} else {
essid.wl_essid_length = strlen(arg);
if (essid.wl_essid_length > MAX_ESSID_LENGTH - 1) {
(void) fprintf(stderr, gettext("%s: "
"essid exceeds 32 bytes\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
(void) strcpy(essid.wl_essid_essid, arg);
}
(void) memmove(gbuf->wldp_buf, &essid, sizeof (wl_essid_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_ESSID, sizeof (wl_essid_t)));
}
static boolean_t
do_set_bsstype(int fd, const char *arg)
{
wl_bss_type_t bsstype;
assert(arg != NULL);
PRTDBG(("do_set_bsstype(%d, \"%s\")\n", fd, arg));
(void) memset(&bsstype, 0xff, sizeof (bsstype));
if ((strcasecmp(arg, "BSS") == 0) ||
(strcasecmp(arg, "AP") == 0) ||
(strcasecmp(arg, "INFRASTRUCTURE") == 0)) {
bsstype = WL_BSS_BSS;
} else if ((strcasecmp(arg, "IBSS") == 0) ||
(strcasecmp(arg, "AD-HOC") == 0)) {
bsstype = WL_BSS_IBSS;
} else if (strcasecmp(arg, "AUTO") == 0) {
bsstype = WL_BSS_ANY;
} else {
(void) fprintf(stderr, gettext("%s: bsstype: "
"bss(ap,infrastructure) ibss(ad-hoc) or auto\n"),
gExecName);
exit(WIFI_FATAL_ERR);
}
(void) memmove(gbuf->wldp_buf, &bsstype, sizeof (wl_bss_type_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_BSS_TYPE,
sizeof (wl_bss_type_t)));
}
static boolean_t
do_set_createibss(int fd, const char *arg)
{
wl_create_ibss_t create_ibss;
assert(arg != NULL);
PRTDBG(("do_set_createibss(%d, \"%s\")\n", fd, arg));
(void) memset(&create_ibss, 0x0, sizeof (create_ibss));
if (strcasecmp(arg, "YES") == 0) {
create_ibss = B_TRUE;
} else if (strcasecmp(arg, "NO") == 0) {
create_ibss = B_FALSE;
} else {
(void) fprintf(stderr, gettext("%s: "
"createibss: yes or no\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
(void) memmove(gbuf->wldp_buf, &create_ibss,
sizeof (wl_create_ibss_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_CREATE_IBSS,
sizeof (wl_create_ibss_t)));
}
static boolean_t
do_set_channel(int fd, const char *arg)
{
wl_phy_conf_t phy_conf;
assert(arg != NULL);
PRTDBG(("do_set_channel(%d, \"%s\")\n", fd, arg));
(void) memset(&phy_conf, 0xff, sizeof (phy_conf));
if (is_channel_valid(arg) == B_FALSE) {
(void) fprintf(stderr, gettext("%s: channel No. "
"should be:\n"
"\t802.11a: 0-99\n"
"\t802.11b: 1-14\n"
"\t802.11g: 1-14\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
phy_conf.wl_phy_dsss_conf.wl_dsss_channel = atoi(arg);
PRTDBG(("channel=%d\n", phy_conf.wl_phy_dsss_conf.wl_dsss_channel));
(void) memmove(gbuf->wldp_buf, &phy_conf, sizeof (wl_phy_conf_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_PHY_CONFIG,
sizeof (wl_phy_conf_t)));
}
static boolean_t
is_rates_support(int fd, int num, uint8_t *rates)
{
int rates_num = 0;
int i = 0, j = 0;
uint8_t value = 0;
assert((rates != NULL)&&(num != 0));
PRTDBG(("is_rates_support(%d, %d, 0x%x)\n", fd, num, rates));
if (call_ioctl(fd, WLAN_GET_PARAM, WL_SUPPORTED_RATES, 0)
== B_TRUE) {
rates_num = ((wl_rates_t *)(gbuf->wldp_buf))->wl_rates_num;
for (i = 0; i < num; i++) {
PRTDBG(("rates[%d] = %d\n", i, rates[i]));
for (j = 0; j < rates_num; j++) {
value = ((wl_rates_t *)gbuf->wldp_buf)
->wl_rates_rates[j];
PRTDBG(("supported rates[%d]=%d\n", j, value));
if (value == rates[i]) {
break;
}
}
if (j == rates_num) {
if (rates[i] == 11) {
(void) fprintf(stderr,
gettext("%s: "
"rate 5.5M is not supported\n"),
gExecName);
} else {
(void) fprintf(stderr,
gettext("%s: "
"rate %dM is not supported\n"),
gExecName, rates[i]/2);
}
return (B_FALSE);
}
}
return (B_TRUE);
}
return (B_FALSE);
}
static uint8_t
rates_convert(const char *rates)
{
int i;
uint8_t ret;
for (i = 0; i < WIFI_RATES_NUM; i++) {
if (strcmp(rates, wifi_rates_s[i].rates_s) == 0) {
ret = wifi_rates_s[i].rates_i;
break;
}
}
if (i == WIFI_RATES_NUM) {
(void) fprintf(stderr, gettext("%s: "
"invalid rates '%s'\n"), gExecName, rates);
exit(WIFI_FATAL_ERR);
}
return (ret);
}
static uint8_t *
get_rates(const char *arg, uint32_t *len)
{
int i = 1, j = 0;
uint8_t *rates = NULL;
char *pnext = NULL;
char *token;
char *pstart;
char *pstart_bak;
assert(arg != NULL);
if (strlen(arg) == 0) {
PRTDBG(("get_rates: empty rates string\n"));
return (NULL);
}
PRTDBG(("get_rates(\"%s\", 0x%x)\n", arg, len));
pstart = safe_strdup(arg);
pstart_bak = pstart;
while ((pnext = strchr(pstart, ',')) != NULL) {
pstart = pnext + 1;
i++;
}
*len = i;
rates = safe_calloc(sizeof (uint8_t), i);
pstart = pstart_bak;
if ((token = strtok(pstart, ",")) != NULL) {
PRTDBG(("rates[0]: %s\n", token));
rates[0] = rates_convert(token);
i = 1;
while ((token = strtok(NULL, ",")) != NULL) {
PRTDBG(("rates[%d]: %s\n", i, token));
rates[i++] = rates_convert(token);
}
}
free(pstart_bak);
for (i = 0; i < *len; i++) {
for (j = 0; j < i; j++)
if (rates[j] == rates[i]) {
(void) fprintf(stderr,
gettext("%s: rates duplicated\n"),
gExecName);
free(rates);
return (NULL);
}
}
return (rates);
}
static boolean_t
do_set_rates(int fd, const char *arg)
{
int i = 0;
uint32_t num = 0;
uint8_t *rates;
assert(arg != NULL);
PRTDBG(("do_set_rates(%d, \"%s\")\n", fd, arg));
rates = get_rates(arg, &num);
if ((rates == NULL) ||
is_rates_support(fd, num, rates) == B_FALSE) {
exit(WIFI_FATAL_ERR);
}
((wl_rates_t *)(gbuf->wldp_buf))->wl_rates_num = num;
for (i = 0; i < num; i++) {
((wl_rates_t *)gbuf->wldp_buf)->wl_rates_rates[i]
= rates[i];
}
free(rates);
return (call_ioctl(fd, WLAN_SET_PARAM, WL_DESIRED_RATES,
offsetof(wl_rates_t, wl_rates_rates) +
num*sizeof (char)));
}
static boolean_t
do_set_powermode(int fd, const char *arg)
{
wl_ps_mode_t ps_mode;
assert(arg != NULL);
PRTDBG(("do_set_powermode(%d, \"%s\")\n", fd, arg));
(void) memset(&ps_mode, 0xff, sizeof (ps_mode));
if ((strcasecmp(arg, "OFF") == 0) ||
(strcasecmp(arg, "MPS") == 0) ||
(strcasecmp(arg, "FAST") == 0)) {
switch (arg[0]) {
case 'O':
case 'o':
ps_mode.wl_ps_mode = WL_PM_AM;
break;
case 'M':
case 'm':
ps_mode.wl_ps_mode = WL_PM_MPS;
break;
case 'F':
case 'f':
ps_mode.wl_ps_mode = WL_PM_FAST;
break;
default:
break;
}
} else {
(void) fprintf(stderr,
gettext("%s: powermode: off mps or fast\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
(void) memmove(gbuf->wldp_buf, &ps_mode, sizeof (wl_ps_mode_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_POWER_MODE,
sizeof (wl_ps_mode_t)));
}
static boolean_t
do_set_authmode(int fd, const char *arg)
{
wl_authmode_t auth_mode;
assert(arg != NULL);
PRTDBG(("do_set_authmode(%d, \"%s\")\n", fd, arg));
(void) memset(&auth_mode, 0xff, sizeof (auth_mode));
if (strcasecmp(arg, "OPENSYSTEM") == 0) {
auth_mode = WL_OPENSYSTEM;
} else if (strcasecmp(arg, "SHARED_KEY") == 0) {
auth_mode = WL_SHAREDKEY;
} else {
(void) fprintf(stderr,
gettext("%s: authmode: "
"opensystem or shared_key\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
(void) memmove(gbuf->wldp_buf, &auth_mode, sizeof (wl_authmode_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_AUTH_MODE,
sizeof (wl_authmode_t)));
}
static boolean_t
do_set_encryption(int fd, const char *arg)
{
wl_encryption_t encryption;
assert(arg != NULL);
PRTDBG(("do_set_encryption(%d, \"%s\")\n", fd, arg));
(void) memset(&encryption, 0xff, sizeof (encryption));
if (strcasecmp(arg, "NONE") == 0) {
encryption = WL_NOENCRYPTION;
} else if (strcasecmp(arg, "WEP") == 0) {
encryption = WL_ENC_WEP;
} else {
(void) fprintf(stderr, gettext("%s: encryption: "
"none or wep\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
(void) memmove(gbuf->wldp_buf, &encryption, sizeof (wl_encryption_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_ENCRYPTION,
sizeof (wl_encryption_t)));
}
static boolean_t
do_set_wepkeyid(int fd, const char *arg)
{
wl_wep_key_id_t wep_key_id;
assert(arg != NULL);
PRTDBG(("do_set_wepkeyid(%d, \"%s\")\n", fd, arg));
(void) memset(&wep_key_id, 0xff, sizeof (wep_key_id));
if (is_wepkeyindex_valid(arg) == B_FALSE) {
(void) fprintf(stderr, gettext("%s: wepkeyindex "
"should be an integer within the range 1-4\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
wep_key_id = atoi(arg) - 1;
(void) memmove(gbuf->wldp_buf, &wep_key_id, sizeof (wl_wep_key_id_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_WEP_KEY_ID,
sizeof (wl_wep_key_id_t)));
}
static boolean_t
do_set_radioon(int fd, const char *arg)
{
wl_radio_t radio;
assert(arg != NULL);
PRTDBG(("do_set_radioon(%d, \"%s\")\n", fd, arg));
(void) memset(&radio, 0xff, sizeof (radio));
if (strcasecmp(arg, "ON") == 0) {
radio = B_TRUE;
} else if (strcasecmp(arg, "OFF") == 0) {
radio = B_FALSE;
} else {
(void) fprintf(stderr,
gettext("%s: radio : on or off\n"), gExecName);
exit(WIFI_FATAL_ERR);
}
(void) memmove(gbuf->wldp_buf, &radio, sizeof (wl_radio_t));
return (call_ioctl(fd, WLAN_SET_PARAM, WL_RADIO, sizeof (wl_radio_t)));
}
static void
print_gbuf(config_item_t index)
{
int i = 0, j = 0;
uint32_t ess_num;
char **ess_argv;
uint32_t rates_num;
uint32_t subtype;
wl_bss_type_t bsstype;
wl_create_ibss_t createibss;
wl_ps_mode_t *ps_mode;
wl_authmode_t authmode;
wl_encryption_t encryption;
wl_wep_key_id_t wepkeyid;
wl_rssi_t signal;
wl_radio_t radioon;
wl_ess_conf_t **p_ess_conf;
wl_linkstatus_t linkstatus;
char format[256], *ntstr;
uint32_t maxessidlen = 0, nt = 0, cnt = 0;
int len;
uint8_t bssid[6];
PRTDBG(("print_gbuf(%d)\n", index));
assert(gbuf->wldp_length < MAX_BUF_LEN);
switch (index) {
case BSSID:
(void) printf("\tbssid: ");
(void) memset(bssid, 0, sizeof (bssid));
if (memcmp((uint8_t *)gbuf->wldp_buf, bssid, sizeof (bssid))
== 0) {
(void) printf("none\n");
break;
}
(void) memset(bssid, 0xff, sizeof (bssid));
if (memcmp((uint8_t *)gbuf->wldp_buf, bssid, sizeof (bssid))
== 0) {
(void) printf("none\n");
break;
}
for (i = 0; i < 5; i++)
(void) printf("%02x:", ((uint8_t *)gbuf->wldp_buf)[i]);
(void) printf("%02x\n", ((uint8_t *)gbuf->wldp_buf)[i]);
break;
case ESSID:
(void) printf("\tessid: %s\n", ((wl_essid_t *)(gbuf->wldp_buf))
->wl_essid_essid);
break;
case BSSTYPE:
bsstype = *(wl_bss_type_t *)(gbuf->wldp_buf);
switch (bsstype) {
case WL_BSS_BSS:
(void) printf("\tbsstype: bss(ap, infrastructure)\n");
break;
case WL_BSS_IBSS:
(void) printf("\tbsstype: ibss(ad-hoc)\n");
break;
case WL_BSS_ANY:
(void) printf("\tbsstype: auto\n");
break;
default:
(void) fprintf(stderr,
gettext("%s: "
"invalid bsstype value\n"), gExecName);
}
break;
case CREATEIBSS:
createibss = *(wl_create_ibss_t *)(gbuf->wldp_buf);
switch (createibss) {
case B_TRUE:
(void) printf("\tcreateibss: yes\n");
break;
case B_FALSE:
(void) printf("\tcreateibss: no\n");
break;
default:
(void) fprintf(stderr,
gettext("%s: "
"invalid createibss value\n"), gExecName);
}
break;
case CHANNEL:
subtype = ((wl_fhss_t *)(gbuf->wldp_buf))->wl_fhss_subtype;
switch (subtype) {
case WL_FHSS:
case WL_DSSS:
case WL_IRBASE:
case WL_HRDS:
case WL_ERP:
(void) printf("\tchannel: %d\n", ((wl_fhss_t *)
(gbuf->wldp_buf))->wl_fhss_channel);
break;
case WL_OFDM:
(void) printf("\tchannel: %d\n", ((wl_ofdm_t *)
(gbuf->wldp_buf))
->wl_ofdm_frequency);
break;
default:
(void) fprintf(stderr, gettext("%s: "
"invalid subtype\n"), gExecName);
break;
}
break;
case RATES:
rates_num = ((wl_rates_t *)(gbuf->wldp_buf))->wl_rates_num;
(void) printf("\trates: ");
for (i = 0; i < rates_num; i++) {
char rate;
rate = ((wl_rates_t *)gbuf->wldp_buf)
->wl_rates_rates[i];
if (rate == WL_RATE_5_5M)
(void) printf("5.5");
else
(void) printf("%d", (uint8_t)(rate / 2));
if (i == (rates_num - 1))
(void) printf("\n");
else
(void) printf(",");
}
break;
case POWERMODE:
ps_mode = (wl_ps_mode_t *)(gbuf->wldp_buf);
switch (ps_mode->wl_ps_mode) {
case WL_PM_AM:
(void) printf("\tpowermode: off\n");
break;
case WL_PM_MPS:
(void) printf("\tpowermode: mps\n");
break;
case WL_PM_FAST:
(void) printf("\tpowermode: fast\n");
break;
default:
(void) fprintf(stderr,
gettext("%s: "
"invalid powermode value\n"), gExecName);
break;
}
break;
case AUTHMODE:
authmode = *(wl_authmode_t *)(gbuf->wldp_buf);
switch (authmode) {
case WL_OPENSYSTEM:
(void) printf("\tauthmode: opensystem\n");
break;
case WL_SHAREDKEY:
(void) printf("\tauthmode: shared_key\n");
break;
default:
(void) fprintf(stderr,
gettext("%s: "
"invalid authmode value\n"), gExecName);
break;
}
break;
case ENCRYPTION:
encryption = *(wl_encryption_t *)(gbuf->wldp_buf);
switch (encryption) {
case WL_NOENCRYPTION:
(void) printf("\tencryption: none\n");
break;
case WL_ENC_WEP:
(void) printf("\tencryption: wep\n");
break;
default:
(void) fprintf(stderr,
gettext("%s: "
"invalid encryption value\n"), gExecName);
break;
}
break;
case WEPKEYID:
wepkeyid = *(wl_wep_key_id_t *)(gbuf->wldp_buf);
(void) printf("\twepkeyindex: %d\n", wepkeyid + 1);
break;
case SIGNAL:
signal = *(wl_rssi_t *)(gbuf->wldp_buf);
(void) printf("\tsignal: %d\n", signal);
break;
case RADIOON:
radioon = *(wl_radio_t *)(gbuf->wldp_buf);
switch (radioon) {
case B_TRUE:
(void) printf("\tradio: on\n");
break;
case B_FALSE:
(void) printf("\tradio: off\n");
break;
default:
(void) fprintf(stderr,
gettext("%s: "
"invalid radioon value\n"), gExecName);
}
break;
case LINKSTATUS:
linkstatus = *(wl_linkstatus_t *)(gbuf->wldp_buf);
switch (linkstatus) {
case WL_CONNECTED:
(void) printf("\tlinkstatus: connected\n");
break;
case WL_NOTCONNECTED:
(void) printf("\tlinkstatus: not connected\n");
break;
default:
(void) fprintf(stderr,
gettext("%s: "
"invalid linkstatus value\n"), gExecName);
}
break;
case WLANLIST:
ess_num = ((wl_ess_list_t *)(gbuf->wldp_buf))->wl_ess_list_num;
ess_argv = safe_calloc(sizeof (char *), ess_num);
p_ess_conf = safe_calloc(sizeof (wl_ess_conf_t *), ess_num);
for (i = 0; i < ess_num; i++) {
p_ess_conf[i] = ((wl_ess_list_t *)gbuf->wldp_buf)
->wl_ess_list_ess + i;
maxessidlen = (maxessidlen >
strlen(p_ess_conf[i]
->wl_ess_conf_essid.wl_essid_essid) ?
maxessidlen :
strlen(p_ess_conf[i]
->wl_ess_conf_essid.wl_essid_essid));
}
if ((nt = (maxessidlen / 8 + 1)) > 4)
nt = 4;
len = snprintf(format, sizeof (format), gettext("essid"));
ntstr = construct_format(nt);
assert(ntstr != NULL);
len += snprintf(format + len, sizeof (format) - len, "%s",
ntstr);
len += snprintf(format + len, sizeof (format) - len,
gettext("bssid\t\t type\t\tencryption\tsignallevel\n"));
if ((len <= 0) || (len > sizeof (format) - 1)) {
(void) printf("essid\t\t\t\tbssid\t\t type\t\t"
"encryption\tsignallevel\n");
} else {
(void) printf("%s", format);
}
for (i = 0; i < ess_num; i++) {
ess_argv[i] = safe_malloc(MAX_SCANBUF_LEN);
safe_snprintf(ess_argv[i], MAX_SCANBUF_LEN,
"%s%c%02x:%02x:%02x:%02x:%02x:%02x%c%s",
p_ess_conf[i]->wl_ess_conf_essid.wl_essid_essid,
',',
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[0]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[1]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[2]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[3]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[4]),
(uint8_t)(p_ess_conf[i]->wl_ess_conf_bssid[5]), ',',
(p_ess_conf[i]->wl_ess_conf_wepenabled ==
B_TRUE ? "wep":"none"));
len = strlen(p_ess_conf[i]->wl_ess_conf_essid.
wl_essid_essid);
cnt = nt - (min(len /8 + 1, 4) - 1);
ntstr = construct_format(cnt);
assert(ntstr != NULL);
(void) printf("%s%s", p_ess_conf[i]->wl_ess_conf_essid.
wl_essid_essid, ntstr);
free(ntstr);
for (j = 0; j < 5; j++) {
(void) printf("%02x:", (uint8_t)(p_ess_conf[i]
->wl_ess_conf_bssid[j]));
}
(void) printf("%02x ", (uint8_t)(p_ess_conf[i]
->wl_ess_conf_bssid[j]));
if (p_ess_conf[i]->wl_ess_conf_bsstype ==
WL_BSS_BSS)
(void) printf("access point");
else
(void) printf("ad-hoc");
if (p_ess_conf[i]->wl_ess_conf_wepenabled ==
WL_ENC_WEP)
(void) printf("\twep\t");
else
(void) printf("\tnone\t");
(void) printf("\t%d\n", p_ess_conf[i]->wl_ess_conf_sl);
}
add_to_history(gp_config_file, ess_num, ess_argv);
free(p_ess_conf);
for (i = 0; i < ess_num; i++) {
free(ess_argv[i]);
}
free(ess_argv);
break;
default:
(void) fprintf(stderr, gettext("%s: "
"invalid parameter type\n"), gExecName);
break;
}
}
static boolean_t
do_get_bssid(int fd)
{
PRTDBG(("do_get_bssid(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_BSSID, 0));
}
static boolean_t
do_get_essid(int fd)
{
PRTDBG(("do_get_essid(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_ESSID, 0));
}
static boolean_t
do_get_bsstype(int fd)
{
PRTDBG(("do_get_bsstype(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_BSS_TYPE, 0));
}
static boolean_t
do_get_createibss(int fd)
{
PRTDBG(("do_get_createibss(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_CREATE_IBSS, 0));
}
static boolean_t
do_get_channel(int fd)
{
PRTDBG(("do_get_channel(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_PHY_CONFIG, 0));
}
static boolean_t
do_get_wlanlist(int fd)
{
PRTDBG(("do_get_wlanlist(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_ESS_LIST, 0));
}
static boolean_t
do_get_linkstatus(int fd)
{
PRTDBG(("do_get_linkstatus(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_LINKSTATUS, 0));
}
static boolean_t
do_get_rates(int fd)
{
PRTDBG(("do_get_rates(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_DESIRED_RATES, 0));
}
static boolean_t
do_get_powermode(int fd)
{
PRTDBG(("do_get_powermode(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_POWER_MODE, 0));
}
static boolean_t
do_get_authmode(int fd)
{
PRTDBG(("do_get_authmode(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_AUTH_MODE, 0));
}
static boolean_t
do_get_encryption(int fd)
{
PRTDBG(("do_get_encryption(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_ENCRYPTION, 0));
}
static boolean_t
do_get_wepkeyid(int fd)
{
PRTDBG(("do_get_wepkeyid(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_WEP_KEY_ID, 0));
}
static boolean_t
do_get_signal(int fd)
{
PRTDBG(("do_get_signal(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_RSSI, 0));
}
static boolean_t
do_get_radioon(int fd)
{
PRTDBG(("do_get_radioon(%d)\n", fd));
return (call_ioctl(fd, WLAN_GET_PARAM, WL_RADIO, 0));
}
static boolean_t
param_is_wepkey(char *param, boolean_t equalflag)
{
if ((equalflag == B_FALSE) &&
(strcmp(param, "wepkey1") == 0) ||
(strcmp(param, "wepkey2") == 0) ||
(strcmp(param, "wepkey3") == 0) ||
(strcmp(param, "wepkey4") == 0))
return (B_TRUE);
else if ((equalflag == B_TRUE) &&
(strncmp(param, "wepkey1=", strlen("wepkey1="))) == 0 ||
(strncmp(param, "wepkey2=", strlen("wepkey2="))) == 0 ||
(strncmp(param, "wepkey3=", strlen("wepkey3="))) == 0 ||
(strncmp(param, "wepkey4=", strlen("wepkey4="))) == 0)
return (B_TRUE);
else
return (B_FALSE);
}
static boolean_t
items_in_profile(aelist_t *cplist, aelist_t *wplist, int argc, char **argv)
{
int i = 0, j = 0;
char *param;
char *pequal;
const char *wepkey;
for (i = 0; i < argc; i++) {
if (param_is_wepkey(argv[i], B_TRUE) == B_TRUE) {
wepkey = get_value(argv[i]);
if (value_is_valid(WEPKEY, wepkey) == B_FALSE) {
(void) fprintf(stderr, gettext("%s: "
"invalid value '%s' for parameter "
"'wepkey'\n"), gExecName, wepkey);
return (B_FALSE);
}
update_aelist(wplist, argv[i]);
continue;
}
param = safe_strdup(argv[i]);
pequal = strchr(param, '=');
if (pequal == NULL) {
(void) fprintf(stderr, gettext("%s: "
"invalid argument '%s', use "
"parameter=value'\n"),
gExecName, argv[i]);
free(param);
return (B_FALSE);
}
*pequal++ = '\0';
for (j = 0; j < N_GS_FUNC; j++) {
if (strcmp(param, do_gs_func[j].cmd) == 0) {
break;
}
}
if (j == N_GS_FUNC) {
(void) fprintf(stderr, gettext("%s: "
"unrecognized parameter '%s'\n"),
gExecName, param);
free(param);
return (B_FALSE);
}
if (value_is_valid(do_gs_func[j].index, pequal) ==
B_FALSE) {
(void) fprintf(stderr, gettext("%s: "
"invalid value '%s' for parameter '%s'\n"),
gExecName, pequal, param);
return (B_FALSE);
}
free(param);
update_aelist(cplist, argv[i]);
}
return (B_TRUE);
}
static boolean_t
do_createprofile(int fd, int argc, char **argv)
{
int i = 0;
char *pbuf = NULL;
char *pfbuf = NULL;
const char *profilename;
aelist_t *plist_config = NULL, *plist_wepkey = NULL;
PRTDBG(("do_createprofile(%d, 0x%x)\n", argc, argv));
if (argc <= 0) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
if (strchr(argv[0], '=') == NULL) {
pfbuf = safe_strdup(argv[0]);
argc--;
argv++;
}
for (i = 0; i < argc; i++) {
if (strncmp(argv[i], "essid=", strlen("essid=")) == 0) {
break;
}
}
if (i == argc) {
(void) fprintf(stderr,
gettext("%s: "
"essid required when creating profile\n"),
gExecName);
goto exit0;
}
profilename = (pfbuf ? pfbuf : get_value(argv[i]));
if (strlen(profilename) == 0) {
(void) fprintf(stderr,
gettext("%s: "
"non-empty essid required\n"),
gExecName);
goto exit0;
}
if ((strcasecmp(profilename, "all") == 0) ||
(strcmp(profilename, WIFI_HISTORY) == 0) ||
(strcmp(profilename, WIFI_PREFER) == 0) ||
(strcmp(profilename, WIFI_ACTIVEP) == 0) ||
((profilename[0] == '[') &&
(profilename[strlen(profilename) - 1] == ']'))) {
(void) fprintf(stderr, gettext("%s: "
"'%s' is an invalid profile name\n"),
gExecName, profilename);
goto exit0;
}
pbuf = append_pa(profilename);
PRTDBG(("do_createprofile: profile_name = %s\n", pbuf));
if ((find_section(gp_config_file, pbuf) != NULL) ||
find_section(gp_wepkey_file, pbuf) != NULL) {
(void) fprintf(stderr,
gettext("%s: "
"profile '%s' already exists\n"),
gExecName, profilename);
goto exit1;
}
plist_config = new_ael(PROFILE);
new_section(gp_config_file, plist_config, pbuf);
plist_wepkey = new_ael(PROFILE);
new_section(gp_wepkey_file, plist_wepkey, pbuf);
free(pfbuf);
free(pbuf);
return (items_in_profile(plist_config, plist_wepkey,
argc, argv));
exit1:
free(pbuf);
exit0:
free(pfbuf);
return (B_FALSE);
}
static boolean_t
do_setprofparam(int fd, int argc, char **argv)
{
char *pbuf = NULL;
section_t *psection_config = NULL, *psection_wep = NULL;
aelist_t *plist_config = NULL, *plist_wepkey = NULL;
PRTDBG(("do_setprofparam(%d, 0x%x)\n", argc, argv));
if (argc < 1) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
pbuf = append_pa(argv[0]);
psection_config = find_section(gp_config_file, pbuf);
psection_wep = find_section(gp_wepkey_file, pbuf);
if ((psection_config == NULL) || (psection_wep == NULL)) {
(void) fprintf(stderr, gettext("%s: "
"profile '%s' doesn't exist\n"),
gExecName, argv[0]);
free(pbuf);
return (B_FALSE);
}
free(pbuf);
plist_config = psection_config->list;
plist_wepkey = psection_wep->list;
argc--;
argv++;
return (items_in_profile(plist_config, plist_wepkey,
argc, argv));
}
static boolean_t
do_getprofparam(int fd, int argc, char **argv)
{
int i = 0, j = 0;
int flag;
boolean_t ret = B_TRUE;
section_t *p_section = NULL;
aelist_t *plist = NULL;
ae_t *pae = NULL;
char *pbuf = NULL;
PRTDBG(("do_getprofparam(%d, 0x%x)\n", argc, argv));
if (argc < 1) {
do_print_usage();
exit(WIFI_IMPROPER_USE);
}
pbuf = append_pa(argv[0]);
p_section = find_section(gp_config_file, pbuf);
if (p_section == NULL) {
(void) fprintf(stderr, gettext("%s: "
"profile '%s' doesn't exist\n"),
gExecName, argv[0]);
ret = B_FALSE;
goto exit0;
}
argc--;
argv++;
plist = p_section->list;
assert(plist != NULL);
if (argc == 0) {
pae = plist->ael_head;
while (pae != NULL) {
if (pae->ae_arg != NULL) {
(void) printf("\t%s\n", pae->ae_arg);
}
pae = pae->ae_next;
}
print_wepkey_info(p_section->section_id, NULL);
ret = B_TRUE;
goto exit0;
}
for (i = 0; i < argc; i++) {
flag = 0;
for (j = 0; j < N_GS_FUNC; j++) {
if (strcmp(argv[i], do_gs_func[j].cmd) == 0) {
break;
}
if (param_is_wepkey(argv[i], B_FALSE) == B_TRUE) {
j = WEPKEY;
print_wepkey_info(p_section->section_id,
argv[i]);
flag++;
break;
}
}
if (j == N_GS_FUNC) {
(void) fprintf(stderr,
gettext("wificonifg: unrecognized parameter: "
"%s\n"), argv[i]);
ret = B_FALSE;
goto exit0;
}
pae = plist->ael_head;
while ((pae != NULL) && (!flag)) {
if ((pae->ae_arg != NULL) &&
(strncmp(pae->ae_arg, argv[i],
strlen(argv[i])) == 0)) {
(void) printf("\t%s\n", pae->ae_arg);
flag++;
}
pae = pae->ae_next;
}
if (!flag) {
(void) fprintf(stderr, gettext("%s: "
"parameter '%s' has not been set in profile %s\n"),
gExecName, argv[i], pbuf);
ret = B_FALSE;
goto exit0;
}
}
exit0:
free(pbuf);
return (ret);
}
static boolean_t
value_is_valid(config_item_t item, const char *value)
{
uint32_t num = 0;
uint8_t *rates;
boolean_t ret;
assert(value != NULL);
switch (item) {
case ESSID:
if (strlen(value) > 32)
ret = B_FALSE;
else
ret = B_TRUE;
break;
case BSSTYPE:
if ((strcasecmp(value, "bss") == 0) ||
(strcasecmp(value, "ap") == 0) ||
(strcasecmp(value, "infrastructure") == 0) ||
(strcasecmp(value, "ibss") == 0) ||
(strcasecmp(value, "ad-hoc") == 0) ||
(strcasecmp(value, "auto") == 0))
ret = B_TRUE;
else
ret = B_FALSE;
break;
case CREATEIBSS:
if ((strcasecmp(value, "yes") == 0) ||
(strcasecmp(value, "no") == 0))
ret = B_TRUE;
else
ret = B_FALSE;
break;
case AUTHMODE:
if ((strcasecmp(value, "opensystem") == 0) ||
(strcasecmp(value, "shared_key") == 0))
ret = B_TRUE;
else
ret = B_FALSE;
break;
case POWERMODE:
if ((strcasecmp(value, "off") == 0) ||
(strcasecmp(value, "mps") == 0) ||
(strcasecmp(value, "fast") == 0))
ret = B_TRUE;
else
ret = B_FALSE;
break;
case ENCRYPTION:
if ((strcasecmp(value, "wep") == 0) ||
(strcasecmp(value, "none") == 0))
ret = B_TRUE;
else
ret = B_FALSE;
break;
case RADIOON:
if ((strcasecmp(value, "on") == 0) ||
(strcasecmp(value, "off") == 0))
ret = B_TRUE;
else
ret = B_FALSE;
break;
case WEPKEYID:
ret = is_wepkeyindex_valid(value);
break;
case WEPKEY:
ret = is_wepkey_valid(value, strlen(value));
break;
case CHANNEL:
ret = is_channel_valid(value);
break;
case RATES:
rates = get_rates(value, &num);
if (rates == NULL) {
ret = B_FALSE;
} else {
free(rates);
ret = B_TRUE;
}
break;
default:
ret = B_FALSE;
break;
}
return (ret);
}
static boolean_t
do_set(int fd, int argc, char **argv)
{
int i = 0, j = 0;
char *param;
char *pequal;
char *value;
boolean_t ret;
PRTDBG(("do_set(%d, 0x%x)\n", argc, argv));
assert(fd > 0);
if (argc <= 0) {
(void) do_print_support_params(fd);
ret = B_FALSE;
goto exit0;
}
for (i = 0; i < argc; i++) {
param = safe_strdup(argv[i]);
pequal = strchr(param, '=');
value = NULL;
if (pequal != NULL) {
*pequal = '\0';
value = pequal + 1;
} else {
(void) fprintf(stderr,
gettext("%s: invalid setparam argument "
"'%s', use 'parameter=value'\n"),
gExecName, argv[i]);
free(param);
ret = B_FALSE;
goto exit0;
}
PRTDBG(("do_set: param = \"%s\", value = \"%s\"\n",
param, value));
for (j = 0; j < N_GS_FUNC; j++) {
if (strcmp(param, do_gs_func[j].cmd) == 0)
break;
if (param_is_wepkey(param, B_FALSE) == B_TRUE) {
value = argv[i];
j = WEPKEY;
break;
}
}
if (j == N_GS_FUNC) {
(void) fprintf(stderr,
gettext("%s: unrecognized parameter: "
"%s\n"), gExecName, param);
free(param);
ret = B_FALSE;
goto exit0;
}
if (do_gs_func[j].p_do_set_func == NULL) {
(void) fprintf(stderr,
gettext("%s: parameter '%s' is read-only\n"),
gExecName, do_gs_func[j].cmd);
free(param);
ret = B_FALSE;
goto exit0;
}
if (do_gs_func[j].p_do_set_func(fd, value)
== B_TRUE) {
ret = B_TRUE;
} else {
if (gbuf->wldp_result != WL_SUCCESS) {
(void) fprintf(stderr,
gettext("%s: "
"failed to set '%s' for "),
gExecName, param);
print_error(gbuf->wldp_result);
}
free(param);
ret = B_FALSE;
goto exit0;
}
free(param);
}
exit0:
return (ret);
}
static boolean_t
do_get(int fd, int argc, char **argv)
{
int i = 0, j = 0, n = 0;
boolean_t ret = B_TRUE;
PRTDBG(("do_get(%d, 0x%x)\n", argc, argv));
assert(fd > 0);
if (argc <= 0) {
for (i = 0; i < N_GS_FUNC; i++) {
if ((do_gs_func[i].p_do_get_func != NULL) &&
(do_gs_func[i].p_do_get_func(fd)
== B_TRUE)) {
print_gbuf(do_gs_func[i].index);
n++;
}
}
ret = n ? B_TRUE:B_FALSE;
goto exit0;
}
for (i = 0; i < argc; i++) {
for (j = 0; j < N_GS_FUNC; j++) {
if (strcmp(argv[i], do_gs_func[j].cmd) == 0) {
break;
}
if (param_is_wepkey(argv[i], B_FALSE) == B_TRUE) {
j = WEPKEY;
break;
}
}
if (j == N_GS_FUNC) {
(void) fprintf(stderr,
gettext("wificonifg: unrecognized parameter: "
"%s\n"), argv[i]);
ret = B_FALSE;
goto exit0;
}
if (do_gs_func[j].p_do_get_func == NULL) {
(void) fprintf(stderr,
gettext("%s: parameter '%s' is write-only\n"),
gExecName, do_gs_func[j].cmd);
ret = B_FALSE;
goto exit0;
}
if (do_gs_func[j].p_do_get_func(fd) == B_TRUE) {
print_gbuf(do_gs_func[j].index);
ret = B_TRUE;
} else {
(void) fprintf(stderr,
gettext("%s: "
"failed to read parameter '%s' : "),
gExecName, argv[i]);
print_error(gbuf->wldp_result);
ret = B_FALSE;
}
}
exit0:
return (ret);
}
static pid_t
enter_wifi_lock(int *fd)
{
int fd0 = -1;
struct flock lock;
fd0 = open(WIFI_LOCKF, O_CREAT|O_WRONLY, 0600);
if (fd0 < 0) {
(void) fprintf(stderr, gettext("%s: failed to open lockfile"
" '"WIFI_LOCKF"': %s\n"), gExecName, strerror(errno));
exit(WIFI_FATAL_ERR);
}
*fd = fd0;
lock.l_type = F_WRLCK;
lock.l_whence = SEEK_SET;
lock.l_start = 0;
lock.l_len = 0;
if ((fcntl(fd0, F_SETLK, &lock) == -1) &&
(errno == EAGAIN || errno == EDEADLK)) {
if (fcntl(fd0, F_GETLK, &lock) == -1) {
(void) fprintf(stderr,
gettext("%s: enter_filelock"));
exit(WIFI_FATAL_ERR);
}
(void) fprintf(stderr, gettext("%s:"
"enter_filelock:filelock is owned "
"by 'process %d'\n"), gExecName, lock.l_pid);
return (lock.l_pid);
}
return (getpid());
}
static void
exit_wifi_lock(int fd)
{
struct flock lock;
lock.l_type = F_UNLCK;
lock.l_whence = SEEK_SET;
lock.l_start = 0;
lock.l_len = 0;
if (fcntl(fd, F_SETLK, &lock) == -1) {
(void) fprintf(stderr, gettext("%s: failed to"
" exit_filelock: %s\n"),
gExecName, strerror(errno));
}
(void) close(fd);
}
int
main(int argc, char **argv)
{
int i, ret;
int fddev = -1;
int c, iflag = 0, rflag = 0, fileonly = 0, readonly = 0;
int fd;
char *iname = NULL;
char *path = NULL;
extern char *optarg;
extern int optind;
char interface[LIFNAMSIZ];
char file_wifi[MAX_CONFIG_FILE_LENGTH];
char file_wifiwepkey[MAX_CONFIG_FILE_LENGTH];
priv_set_t *ppriv;
wifi_auth_t autht;
PRTDBG(("main(%d, 0x%x)\n", argc, argv));
PRTDBG(("uid=%d\n", getuid()));
PRTDBG(("euid=%d\n", geteuid()));
#ifdef DEBUG
if (wifi_debug == 1) {
(void) printf("Press RETURN to continue...\n");
(void) getchar();
}
#endif
ret = WIFI_EXIT_DEF;
(void) setlocale(LC_ALL, "");
(void) textdomain(TEXT_DOMAIN);
gExecName = argv[0];
gbuf = safe_malloc(MAX_BUF_LEN);
if ((ppriv = priv_str_to_set("basic", ",", NULL)) == NULL) {
PRTDBG(("main: priviledge init error\n"));
(void) fprintf(stderr, gettext("%s: "
"set priviledge to 'basic' error\n"),
gExecName);
ret = WIFI_FATAL_ERR;
goto exit0;
}
(void) priv_addset(ppriv, PRIV_NET_RAWACCESS);
(void) priv_addset(ppriv, PRIV_SYS_NET_CONFIG);
if (setppriv(PRIV_SET, PRIV_PERMITTED, ppriv) == -1) {
(void) fprintf(stderr, gettext("%s: "
"set permitted priviledge: %s\n"),
gExecName, strerror(errno));
ret = WIFI_FATAL_ERR;
goto exit0;
}
if (setppriv(PRIV_SET, PRIV_LIMIT, ppriv) == -1) {
(void) fprintf(stderr, gettext("%s: "
"set limit priviledge: %s\n"),
gExecName, strerror(errno));
ret = WIFI_FATAL_ERR;
goto exit0;
}
if (setppriv(PRIV_SET, PRIV_INHERITABLE, ppriv) == -1) {
(void) fprintf(stderr, gettext("%s: "
"set inherit priviledge: %s\n"),
gExecName, strerror(errno));
ret = WIFI_FATAL_ERR;
goto exit0;
}
if (setppriv(PRIV_SET, PRIV_EFFECTIVE, ppriv) == -1) {
(void) fprintf(stderr, gettext("%s: "
"set effective priviledge: %s\n"),
gExecName, strerror(errno));
ret = WIFI_FATAL_ERR;
goto exit0;
}
priv_freeset(ppriv);
for (i = 0; i < argc; i++) {
PRTDBG(("%d\t\t\"%s\"\n", i, argv[i]));
}
while ((c = getopt(argc, argv, "i:R:")) != EOF) {
switch (c) {
case 'i':
if (iflag) {
do_print_usage();
ret = WIFI_IMPROPER_USE;
goto exit0;
}
iflag = 1;
iname = optarg;
break;
case 'R':
if (rflag) {
do_print_usage();
ret = WIFI_IMPROPER_USE;
goto exit0;
}
rflag = 1;
path = optarg;
break;
case '?':
default:
do_print_usage();
ret = WIFI_IMPROPER_USE;
goto exit0;
}
}
argc -= optind;
argv += optind;
if (argc <= 0) {
if (iname) {
if ((fddev = open_dev(iname)) == -1) {
ret = WIFI_FATAL_ERR;
goto exit0;
}
if (do_print_support_params(fddev) ==
B_TRUE)
ret = WIFI_EXIT_DEF;
else
ret = WIFI_FATAL_ERR;
goto exit1;
} else {
do_print_usage();
ret = WIFI_IMPROPER_USE;
goto exit0;
}
}
for (i = 0; i < N_FUNC; i++) {
if (strcmp(argv[0], do_func[i].cmd) == 0) {
autht = ((strcmp(argv[0], "setwepkey") == 0) ||
(strcmp(argv[0], "setprofwepkey") == 0)) ?
AUTH_WEP:AUTH_OTHER;
if (do_func[i].b_auth &&
!check_authority(autht)) {
ret = WIFI_FATAL_ERR;
goto exit0;
}
if (do_func[i].b_fileonly)
fileonly++;
if (do_func[i].b_readonly)
readonly++;
break;
}
}
if (i == N_FUNC) {
(void) fprintf(stderr, gettext("%s: unrecognized "
"subcommand: %s\n"), gExecName, argv[0]);
do_print_usage();
ret = WIFI_IMPROPER_USE;
goto exit0;
}
if ((fileonly) && (iname)) {
do_print_usage();
ret = WIFI_IMPROPER_USE;
goto exit0;
}
if ((!fileonly) && (!iname)) {
if (search_interface(interface) != B_TRUE) {
(void) fprintf(stderr, gettext("%s: "
"failed to find the default wifi interface;"
" -i option should be used to specify the "
"wifi interface\n"), gExecName);
ret = WIFI_FATAL_ERR;
goto exit0;
}
iname = interface;
}
if (iname) {
if ((fddev = open_dev(iname)) == -1) {
ret = WIFI_FATAL_ERR;
goto exit0;
}
}
if (rflag) {
safe_snprintf(file_wifi, sizeof (file_wifi),
"%s%s", path, p_file_wifi);
safe_snprintf(file_wifiwepkey, sizeof (file_wifiwepkey),
"%s%s", path, p_file_wifiwepkey);
} else {
safe_snprintf(file_wifi, sizeof (file_wifi),
"%s", p_file_wifi);
safe_snprintf(file_wifiwepkey, sizeof (file_wifiwepkey),
"%s", p_file_wifiwepkey);
}
if ((!readonly) && (enter_wifi_lock(&fd) != getpid())) {
ret = WIFI_FATAL_ERR;
goto exit1;
}
gp_config_file = parse_file(file_wifi);
if (gp_config_file == NULL) {
ret = WIFI_FATAL_ERR;
goto exit2;
}
gp_wepkey_file = parse_file(file_wifiwepkey);
if (gp_wepkey_file == NULL) {
destroy_config(gp_config_file);
ret = WIFI_FATAL_ERR;
goto exit2;
}
if (do_func[i].p_do_func(fddev, argc-1, argv+1)
== B_TRUE) {
if (do_func[i].b_readonly)
ret = WIFI_EXIT_DEF;
else if ((fprint_config_file(gp_config_file,
file_wifi) != B_TRUE) ||
(fprint_config_file(gp_wepkey_file,
file_wifiwepkey) != B_TRUE))
ret = WIFI_FATAL_ERR;
else
ret = WIFI_EXIT_DEF;
} else {
PRTDBG(("Command %s failed\n", argv[0]));
ret = WIFI_FATAL_ERR;
}
destroy_config(gp_wepkey_file);
destroy_config(gp_config_file);
exit2:
if (!readonly)
exit_wifi_lock(fd);
exit1:
if (iname)
(void) close(fddev);
exit0:
free(gbuf);
return (ret);
}
#ifdef DEBUG
static void
wifi_dbgprintf(char *fmt, ...)
{
va_list ap;
va_start(ap, fmt);
(void) vfprintf(stdout, fmt, ap);
va_end(ap);
}
#endif
