[thirdparty/iw.git] / iw.c

/*
 * nl80211 userspace tool
 *
 * Copyright 2007, 2008	Johannes Berg <johannes@sipsolutions.net>
 */

#include <errno.h>
#include <stdio.h>
#include <string.h>
#include <net/if.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <unistd.h>
                     
#include <netlink/genl/genl.h>
#include <netlink/genl/family.h>
#include <netlink/genl/ctrl.h>  
#include <netlink/msg.h>
#include <netlink/attr.h>

#include "nl80211.h"
#include "iw.h"
#include "version.h"

#ifndef CONFIG_LIBNL20
/* libnl 2.0 compatibility code */

static inline struct nl_handle *nl_socket_alloc(void)
{
	return nl_handle_alloc();
}

static inline void nl_socket_free(struct nl_sock *h)
{
	nl_handle_destroy(h);
}

static inline int __genl_ctrl_alloc_cache(struct nl_sock *h, struct nl_cache **cache)
{
	struct nl_cache *tmp = genl_ctrl_alloc_cache(h);
	if (!tmp)
		return -ENOMEM;
	*cache = tmp;
	return 0;
}
#define genl_ctrl_alloc_cache __genl_ctrl_alloc_cache
#endif /* CONFIG_LIBNL20 */

static int debug = 0;

static int nl80211_init(struct nl80211_state *state)
{
	int err;

	state->nl_sock = nl_socket_alloc();
	if (!state->nl_sock) {
		fprintf(stderr, "Failed to allocate netlink socket.\n");
		return -ENOMEM;
	}

	if (genl_connect(state->nl_sock)) {
		fprintf(stderr, "Failed to connect to generic netlink.\n");
		err = -ENOLINK;
		goto out_handle_destroy;
	}

	if (genl_ctrl_alloc_cache(state->nl_sock, &state->nl_cache)) {
		fprintf(stderr, "Failed to allocate generic netlink cache.\n");
		err = -ENOMEM;
		goto out_handle_destroy;
	}

	state->nl80211 = genl_ctrl_search_by_name(state->nl_cache, "nl80211");
	if (!state->nl80211) {
		fprintf(stderr, "nl80211 not found.\n");
		err = -ENOENT;
		goto out_cache_free;
	}

	return 0;

 out_cache_free:
	nl_cache_free(state->nl_cache);
 out_handle_destroy:
	nl_socket_free(state->nl_sock);
	return err;
}

static void nl80211_cleanup(struct nl80211_state *state)
{
	genl_family_put(state->nl80211);
	nl_cache_free(state->nl_cache);
	nl_socket_free(state->nl_sock);
}

__COMMAND(NULL, NULL, NULL, 0, 0, 0, CIB_NONE, NULL);
__COMMAND(NULL, NULL, NULL, 1, 0, 0, CIB_NONE, NULL);

static int cmd_size;

static void usage(const char *argv0)
{
	struct cmd *cmd;

	fprintf(stderr, "Usage:\t%s [options] command\n", argv0);
	fprintf(stderr, "Options:\n");
	fprintf(stderr, "\t--debug\t\tenable netlink debugging\n");
	fprintf(stderr, "\t--version\tshow version\n");
	fprintf(stderr, "Commands:\n");
	fprintf(stderr, "\thelp\n");
	fprintf(stderr, "\tevent\n");
	for (cmd = &__start___cmd; cmd < &__stop___cmd;
	     cmd = (struct cmd *)((char *)cmd + cmd_size)) {
		if (!cmd->handler || cmd->hidden)
			continue;
		switch (cmd->idby) {
		case CIB_NONE:
			fprintf(stderr, "\t");
			break;
		case CIB_PHY:
			fprintf(stderr, "\tphy <phyname> ");
			break;
		case CIB_NETDEV:
			fprintf(stderr, "\tdev <devname> ");
			break;
		}
		if (cmd->section)
			fprintf(stderr, "%s ", cmd->section);
		fprintf(stderr, "%s", cmd->name);
		if (cmd->args)
			fprintf(stderr, " %s", cmd->args);
		fprintf(stderr, "\n");
	}
}

static void version(void)
{
	printf("iw version " IW_VERSION "\n");
}

static int phy_lookup(char *name)
{
	char buf[200];
	int fd, pos;

	snprintf(buf, sizeof(buf), "/sys/class/ieee80211/%s/index", name);

	fd = open(buf, O_RDONLY);
	if (fd < 0)
		return -1;
	pos = read(fd, buf, sizeof(buf) - 1);
	if (pos < 0)
		return -1;
	buf[pos] = '\0';
	return atoi(buf);
}

static int error_handler(struct sockaddr_nl *nla, struct nlmsgerr *err,
			 void *arg)
{
	int *ret = arg;
	*ret = err->error;
	return NL_STOP;
}

static int finish_handler(struct nl_msg *msg, void *arg)
{
	int *ret = arg;
	*ret = 0;
	return NL_SKIP;
}

static int ack_handler(struct nl_msg *msg, void *arg)
{
	int *ret = arg;
	*ret = 0;
	return NL_STOP;
}

int handle_cmd(struct nl80211_state *state, enum id_input idby,
	       int argc, char **argv)
{
	struct cmd *cmd, *match = NULL;
	struct nl_cb *cb;
	struct nl_msg *msg;
	int devidx = 0;
	int err, o_argc;
	const char *command, *section;
	char *tmp, **o_argv;
	enum command_identify_by command_idby = CIB_NONE;

	if (argc <= 1 && idby != II_NONE)
		return 1;

	o_argc = argc;
	o_argv = argv;

	switch (idby) {
	case II_PHY_IDX:
		command_idby = CIB_PHY;
		devidx = strtoul(*argv + 4, &tmp, 0);
		if (*tmp != '\0')
			return 1;
		argc--;
		argv++;
		break;
	case II_PHY_NAME:
		command_idby = CIB_PHY;
		devidx = phy_lookup(*argv);
		argc--;
		argv++;
		break;
	case II_NETDEV:
		command_idby = CIB_NETDEV;
		devidx = if_nametoindex(*argv);
		if (devidx == 0)
			devidx = -1;
		argc--;
		argv++;
		break;
	default:
		break;
	}

	if (devidx < 0)
		return -errno;

	section = command = *argv;
	argc--;
	argv++;

	for (cmd = &__start___cmd; cmd < &__stop___cmd;
	     cmd = (struct cmd *)((char *)cmd + cmd_size)) {
		if (!cmd->handler)
			continue;
		if (cmd->idby != command_idby)
			continue;
		if (cmd->section) {
			if (strcmp(cmd->section, section))
				continue;
			/* this is a bit icky ... */
			if (command == section) {
				if (argc <= 0) {
					if (match)
						break;
					return 1;
				}
				command = *argv;
				argc--;
				argv++;
			}
		} else if (section != command)
			continue;
		if (strcmp(cmd->name, command))
			continue;
		if (argc && !cmd->args)
			continue;

		match = cmd;
	}

	cmd = match;

	if (!cmd)
		return 1;

	if (!cmd->cmd) {
		argc = o_argc;
		argv = o_argv;
		return cmd->handler(state, NULL, NULL, argc, argv);
	}

	msg = nlmsg_alloc();
	if (!msg) {
		fprintf(stderr, "failed to allocate netlink message\n");
		return 2;
	}

	cb = nl_cb_alloc(debug ? NL_CB_DEBUG : NL_CB_DEFAULT);
	if (!cb) {
		fprintf(stderr, "failed to allocate netlink callbacks\n");
		err = 2;
		goto out_free_msg;
	}

	genlmsg_put(msg, 0, 0, genl_family_get_id(state->nl80211), 0,
		    cmd->nl_msg_flags, cmd->cmd, 0);

	switch (command_idby) {
	case CIB_PHY:
		NLA_PUT_U32(msg, NL80211_ATTR_WIPHY, devidx);
		break;
	case CIB_NETDEV:
		NLA_PUT_U32(msg, NL80211_ATTR_IFINDEX, devidx);
		break;
	default:
		break;
	}

	err = cmd->handler(state, cb, msg, argc, argv);
	if (err)
		goto out;

	err = nl_send_auto_complete(state->nl_sock, msg);
	if (err < 0)
		goto out;

	err = 1;

	nl_cb_err(cb, NL_CB_CUSTOM, error_handler, &err);
	nl_cb_set(cb, NL_CB_FINISH, NL_CB_CUSTOM, finish_handler, &err);
	nl_cb_set(cb, NL_CB_ACK, NL_CB_CUSTOM, ack_handler, &err);

	while (err > 0)
		nl_recvmsgs(state->nl_sock, cb);
 out:
	nl_cb_put(cb);
 out_free_msg:
	nlmsg_free(msg);
	return err;
 nla_put_failure:
	fprintf(stderr, "building message failed\n");
	return 2;
}

static int no_seq_check(struct nl_msg *msg, void *arg)
{
	return NL_OK;
}

static int print_event(struct nl_msg *msg, void *arg)
{
	struct genlmsghdr *gnlh = nlmsg_data(nlmsg_hdr(msg));
	struct nlattr *tb[NL80211_ATTR_MAX + 1];
	char ifname[100];
	__u8 reg_type;

	nla_parse(tb, NL80211_ATTR_MAX, genlmsg_attrdata(gnlh, 0),
		  genlmsg_attrlen(gnlh, 0), NULL);
                          
	switch (gnlh->cmd) {
	case NL80211_CMD_NEW_WIPHY:
		printf("wiphy rename: phy #%d to %s\n",
		       nla_get_u32(tb[NL80211_ATTR_WIPHY]),
		       nla_get_string(tb[NL80211_ATTR_WIPHY_NAME]));
		break;
	case NL80211_CMD_NEW_SCAN_RESULTS:
		if_indextoname(nla_get_u32(tb[NL80211_ATTR_IFINDEX]), ifname);
		printf("scan finished on %s (phy #%d)\n",
		       ifname, nla_get_u32(tb[NL80211_ATTR_WIPHY]));
		break;
	case NL80211_CMD_SCAN_ABORTED:
		if_indextoname(nla_get_u32(tb[NL80211_ATTR_IFINDEX]), ifname);
		printf("scan aborted on %s (phy #%d)\n",
		       ifname, nla_get_u32(tb[NL80211_ATTR_WIPHY]));
		break;
	case NL80211_CMD_REG_CHANGE:

		printf("regulatory domain change: ");

		reg_type = nla_get_u8(tb[NL80211_ATTR_REG_TYPE]);

		switch (reg_type) {
		case NL80211_REGDOM_TYPE_COUNTRY:
			printf("set to %s by %s request",
			       nla_get_string(tb[NL80211_ATTR_REG_ALPHA2]),
			       reg_initiator_to_string(nla_get_u8(tb[NL80211_ATTR_REG_INITIATOR])));
			if (tb[NL80211_ATTR_WIPHY])
				printf(" on phy%d", nla_get_u32(tb[NL80211_ATTR_WIPHY]));
			break;
		case NL80211_REGDOM_TYPE_WORLD:
			printf("set to world roaming by %s request",
			       reg_initiator_to_string(nla_get_u8(tb[NL80211_ATTR_REG_INITIATOR])));
			break;
		case NL80211_REGDOM_TYPE_CUSTOM_WORLD:
			printf("custom world roaming rules in place on phy%d by %s request",
			       nla_get_u32(tb[NL80211_ATTR_WIPHY]),
			       reg_initiator_to_string(nla_get_u32(tb[NL80211_ATTR_REG_INITIATOR])));
			break;
		case NL80211_REGDOM_TYPE_INTERSECTION:
			printf("intersection used due to a request made by %s",
			       reg_initiator_to_string(nla_get_u32(tb[NL80211_ATTR_REG_INITIATOR])));
			if (tb[NL80211_ATTR_WIPHY])
				printf(" on phy%d", nla_get_u32(tb[NL80211_ATTR_WIPHY]));
			break;
		default:
			printf("unknown source (upgrade this utility)");
			break;
		}

		printf("\n");
		break;
	default:
		printf("unknown event: %d\n", gnlh->cmd);
		break;
	}

	return NL_SKIP;
}

struct wait_event {
	int n_cmds;
	const __u32 *cmds;
	__u32 cmd;
};

static int wait_event(struct nl_msg *msg, void *arg)
{
	struct wait_event *wait = arg;
	struct genlmsghdr *gnlh = nlmsg_data(nlmsg_hdr(msg));
	int i;

	for (i = 0; i < wait->n_cmds; i++) {
		if (gnlh->cmd == wait->cmds[i]) {
			wait->cmd = gnlh->cmd;
		}
	}

	return NL_SKIP;
}

__u32 listen_events(struct nl80211_state *state,
		    const int n_waits, const __u32 *waits)
{
	int mcid, ret;
	struct nl_cb *cb = nl_cb_alloc(debug ? NL_CB_DEBUG : NL_CB_DEFAULT);
	struct wait_event wait_ev;

	if (!cb) {
		fprintf(stderr, "failed to allocate netlink callbacks\n");
		return -ENOMEM;
	}

	/* Configuration multicast group */
	mcid = nl_get_multicast_id(state->nl_sock, "nl80211", "config");
	if (mcid < 0)
		return mcid;

	ret = nl_socket_add_membership(state->nl_sock, mcid);
	if (ret)
		return ret;

	/* Scan multicast group */
	mcid = nl_get_multicast_id(state->nl_sock, "nl80211", "scan");
	if (mcid >= 0) {
		ret = nl_socket_add_membership(state->nl_sock, mcid);
		if (ret)
			return ret;
	}

	/* Regulatory multicast group */
	mcid = nl_get_multicast_id(state->nl_sock, "nl80211", "regulatory");
	if (mcid >= 0) {
		ret = nl_socket_add_membership(state->nl_sock, mcid);
		if (ret)
			return ret;
	}

	/* no sequence checking for multicast messages */
	nl_cb_set(cb, NL_CB_SEQ_CHECK, NL_CB_CUSTOM, no_seq_check, NULL);

	if (n_waits && waits) {
		wait_ev.cmds = waits;
		wait_ev.n_cmds = n_waits;
		nl_cb_set(cb, NL_CB_VALID, NL_CB_CUSTOM, wait_event, &wait_ev);
	} else {
		nl_cb_set(cb, NL_CB_VALID, NL_CB_CUSTOM, print_event, NULL);
	}

	wait_ev.cmd = 0;

	while (!wait_ev.cmd)
		nl_recvmsgs(state->nl_sock, cb);

	nl_cb_put(cb);

	return wait_ev.cmd;
}

int main(int argc, char **argv)
{
	struct nl80211_state nlstate;
	int err;
	const char *argv0;

	/* calculate command size including padding */
	cmd_size = abs((long)&__cmd_NULL_1_CIB_NONE_0
	             - (long)&__cmd_NULL_0_CIB_NONE_0);
	/* strip off self */
	argc--;
	argv0 = *argv++;

	if (argc > 0 && strcmp(*argv, "--debug") == 0) {
		debug = 1;
		argc--;
		argv++;
	}

	if (argc > 0 && strcmp(*argv, "--version") == 0) {
		version();
		return 0;
	}

	if (argc == 0 || strcmp(*argv, "help") == 0) {
		usage(argv0);
		return 0;
	}

	err = nl80211_init(&nlstate);
	if (err)
		return 1;

	if (strcmp(*argv, "event") == 0) {
		if (argc != 1)
			err = 1;
		else
			err = listen_events(&nlstate, 0, NULL);
	} else if (strcmp(*argv, "dev") == 0) {
		argc--;
		argv++;
		err = handle_cmd(&nlstate, II_NETDEV, argc, argv);
	} else if (strncmp(*argv, "phy", 3) == 0) {
		if (strlen(*argv) == 3) {
			argc--;
			argv++;
			err = handle_cmd(&nlstate, II_PHY_NAME, argc, argv);
		} else if (*(*argv + 3) == '#')
			err = handle_cmd(&nlstate, II_PHY_IDX, argc, argv);
		else
			err = 1;
	} else
		err = handle_cmd(&nlstate, II_NONE, argc, argv);

	if (err == 1)
		usage(argv0);
	if (err < 0)
		fprintf(stderr, "command failed: %s (%d)\n", strerror(-err), err);

	nl80211_cleanup(&nlstate);

	return err;
}
Commit	Line	Data
cad53b3f JB	1	/*
	2	* nl80211 userspace tool
	3	*
2a1fced2	4	* Copyright 2007, 2008 Johannes Berg <johannes@sipsolutions.net>
cad53b3f JB	5	*/
	6
	7	#include <errno.h>
	8	#include <stdio.h>
d5ac8ad3	9	#include <string.h>
bd396f2a JB	10	#include <net/if.h>
	11	#include <sys/types.h>
	12	#include <sys/stat.h>
	13	#include <fcntl.h>
	14	#include <unistd.h>
	15
cad53b3f JB	16	#include <netlink/genl/genl.h>
	17	#include <netlink/genl/family.h>
	18	#include <netlink/genl/ctrl.h>
	19	#include <netlink/msg.h>
	20	#include <netlink/attr.h>
cad53b3f	21
f408e01b	22	#include "nl80211.h"
cad53b3f	23	#include "iw.h"
d711f013	24	#include "version.h"
cad53b3f	25
dfd13ee5 PE	26	#ifndef CONFIG_LIBNL20
	27	/* libnl 2.0 compatibility code */
	28
	29	static inline struct nl_handle *nl_socket_alloc(void)
	30	{
	31	return nl_handle_alloc();
	32	}
	33
57077d64	34	static inline void nl_socket_free(struct nl_sock *h)
dfd13ee5 PE	35	{
	36	nl_handle_destroy(h);
	37	}
	38
57077d64	39	static inline int __genl_ctrl_alloc_cache(struct nl_sock h, struct nl_cache *cache)
dfd13ee5 PE	40	{
	41	struct nl_cache *tmp = genl_ctrl_alloc_cache(h);
	42	if (!tmp)
	43	return -ENOMEM;
	44	*cache = tmp;
	45	return 0;
	46	}
	47	#define genl_ctrl_alloc_cache __genl_ctrl_alloc_cache
	48	#endif /* CONFIG_LIBNL20 */
	49
656aa246	50	static int debug = 0;
cad53b3f JB	51
	52	static int nl80211_init(struct nl80211_state *state)
	53	{
	54	int err;
	55
57077d64 PE	56	state->nl_sock = nl_socket_alloc();
	57	if (!state->nl_sock) {
	58	fprintf(stderr, "Failed to allocate netlink socket.\n");
cad53b3f JB	59	return -ENOMEM;
	60	}
	61
57077d64	62	if (genl_connect(state->nl_sock)) {
cad53b3f JB	63	fprintf(stderr, "Failed to connect to generic netlink.\n");
	64	err = -ENOLINK;
	65	goto out_handle_destroy;
	66	}
	67
57077d64	68	if (genl_ctrl_alloc_cache(state->nl_sock, &state->nl_cache)) {
cad53b3f JB	69	fprintf(stderr, "Failed to allocate generic netlink cache.\n");
	70	err = -ENOMEM;
	71	goto out_handle_destroy;
	72	}
	73
	74	state->nl80211 = genl_ctrl_search_by_name(state->nl_cache, "nl80211");
	75	if (!state->nl80211) {
	76	fprintf(stderr, "nl80211 not found.\n");
	77	err = -ENOENT;
	78	goto out_cache_free;
	79	}
	80
	81	return 0;
	82
	83	out_cache_free:
	84	nl_cache_free(state->nl_cache);
	85	out_handle_destroy:
57077d64	86	nl_socket_free(state->nl_sock);
cad53b3f JB	87	return err;
	88	}
	89
	90	static void nl80211_cleanup(struct nl80211_state *state)
	91	{
	92	genl_family_put(state->nl80211);
	93	nl_cache_free(state->nl_cache);
57077d64	94	nl_socket_free(state->nl_sock);
cad53b3f JB	95	}
cad53b3f JB	96
ce5af55c JB	97	__COMMAND(NULL, NULL, NULL, 0, 0, 0, CIB_NONE, NULL);
ce5af55c JB	98	__COMMAND(NULL, NULL, NULL, 1, 0, 0, CIB_NONE, NULL);
403b9c83 JB	99
	100	static int cmd_size;
	101
bd396f2a JB	102	static void usage(const char *argv0)
	103	{
	104	struct cmd *cmd;
	105
59c49f09 JB	106	fprintf(stderr, "Usage:\t%s [options] command\n", argv0);
59c49f09 JB	107	fprintf(stderr, "Options:\n");
d711f013 JB	108	fprintf(stderr, "\t--debug\t\tenable netlink debugging\n");
d711f013 JB	109	fprintf(stderr, "\t--version\tshow version\n");
59c49f09	110	fprintf(stderr, "Commands:\n");
2c61ba61 JB	111	fprintf(stderr, "\thelp\n");
2c61ba61 JB	112	fprintf(stderr, "\tevent\n");
403b9c83 JB	113	for (cmd = &__start___cmd; cmd < &__stop___cmd;
403b9c83 JB	114	cmd = (struct cmd )((char )cmd + cmd_size)) {
ce5af55c	115	if (!cmd->handler \|\| cmd->hidden)
403b9c83	116	continue;
bd396f2a JB	117	switch (cmd->idby) {
bd396f2a JB	118	case CIB_NONE:
59c49f09	119	fprintf(stderr, "\t");
f83a81d0	120	break;
bd396f2a	121	case CIB_PHY:
f83a81d0 JB	122	fprintf(stderr, "\tphy <phyname> ");
f83a81d0 JB	123	break;
bd396f2a	124	case CIB_NETDEV:
f83a81d0	125	fprintf(stderr, "\tdev <devname> ");
bd396f2a JB	126	break;
bd396f2a JB	127	}
f83a81d0 JB	128	if (cmd->section)
	129	fprintf(stderr, "%s ", cmd->section);
	130	fprintf(stderr, "%s", cmd->name);
	131	if (cmd->args)
	132	fprintf(stderr, " %s", cmd->args);
	133	fprintf(stderr, "\n");
bd396f2a JB	134	}
	135	}
	136
d711f013 JB	137	static void version(void)
d711f013 JB	138	{
2dc285b7	139	printf("iw version " IW_VERSION "\n");
d711f013 JB	140	}
d711f013 JB	141
bd396f2a JB	142	static int phy_lookup(char *name)
	143	{
	144	char buf[200];
	145	int fd, pos;
	146
	147	snprintf(buf, sizeof(buf), "/sys/class/ieee80211/%s/index", name);
	148
	149	fd = open(buf, O_RDONLY);
989e97c2 JB	150	if (fd < 0)
989e97c2 JB	151	return -1;
bd396f2a JB	152	pos = read(fd, buf, sizeof(buf) - 1);
	153	if (pos < 0)
	154	return -1;
	155	buf[pos] = '\0';
	156	return atoi(buf);
	157	}
	158
70391ccf JB	159	static int error_handler(struct sockaddr_nl nla, struct nlmsgerr err,
	160	void *arg)
	161	{
	162	int *ret = arg;
	163	*ret = err->error;
	164	return NL_STOP;
	165	}
	166
561c5b7e JB	167	static int finish_handler(struct nl_msg msg, void arg)
561c5b7e JB	168	{
59c418c0 JB	169	int *ret = arg;
59c418c0 JB	170	*ret = 0;
561c5b7e JB	171	return NL_SKIP;
	172	}
	173
	174	static int ack_handler(struct nl_msg msg, void arg)
70391ccf JB	175	{
	176	int *ret = arg;
	177	*ret = 0;
	178	return NL_STOP;
	179	}
	180
7c37a24d JB	181	int handle_cmd(struct nl80211_state *state, enum id_input idby,
7c37a24d JB	182	int argc, char **argv)
45c7212c	183	{
bb60b4ae	184	struct cmd cmd, match = NULL;
7c37a24d	185	struct nl_cb *cb;
bd396f2a JB	186	struct nl_msg *msg;
bd396f2a JB	187	int devidx = 0;
bb60b4ae	188	int err, o_argc;
bd396f2a	189	const char command, section;
bb60b4ae	190	char tmp, *o_argv;
9927363c	191	enum command_identify_by command_idby = CIB_NONE;
45c7212c	192
9927363c	193	if (argc <= 1 && idby != II_NONE)
5e75fd04	194	return 1;
45c7212c	195
bb60b4ae JB	196	o_argc = argc;
	197	o_argv = argv;
	198
bd396f2a	199	switch (idby) {
9927363c JB	200	case II_PHY_IDX:
	201	command_idby = CIB_PHY;
	202	devidx = strtoul(*argv + 4, &tmp, 0);
	203	if (*tmp != '\0')
	204	return 1;
	205	argc--;
	206	argv++;
	207	break;
	208	case II_PHY_NAME:
	209	command_idby = CIB_PHY;
bd396f2a JB	210	devidx = phy_lookup(*argv);
	211	argc--;
	212	argv++;
	213	break;
9927363c JB	214	case II_NETDEV:
9927363c JB	215	command_idby = CIB_NETDEV;
bd396f2a	216	devidx = if_nametoindex(*argv);
989e97c2 JB	217	if (devidx == 0)
989e97c2 JB	218	devidx = -1;
bd396f2a JB	219	argc--;
	220	argv++;
	221	break;
	222	default:
	223	break;
	224	}
	225
989e97c2 JB	226	if (devidx < 0)
	227	return -errno;
	228
bd396f2a JB	229	section = command = *argv;
	230	argc--;
	231	argv++;
	232
403b9c83 JB	233	for (cmd = &__start___cmd; cmd < &__stop___cmd;
	234	cmd = (struct cmd )((char )cmd + cmd_size)) {
	235	if (!cmd->handler)
	236	continue;
9927363c	237	if (cmd->idby != command_idby)
bd396f2a JB	238	continue;
	239	if (cmd->section) {
	240	if (strcmp(cmd->section, section))
	241	continue;
	242	/* this is a bit icky ... */
	243	if (command == section) {
bb60b4ae JB	244	if (argc <= 0) {
	245	if (match)
	246	break;
5e75fd04	247	return 1;
bb60b4ae	248	}
bd396f2a JB	249	command = *argv;
	250	argc--;
	251	argv++;
	252	}
	253	} else if (section != command)
	254	continue;
	255	if (strcmp(cmd->name, command))
	256	continue;
	257	if (argc && !cmd->args)
	258	continue;
bb60b4ae JB	259
bb60b4ae JB	260	match = cmd;
bd396f2a	261	}
45c7212c	262
bb60b4ae JB	263	cmd = match;
	264
	265	if (!cmd)
5e75fd04	266	return 1;
45c7212c	267
bb60b4ae JB	268	if (!cmd->cmd) {
	269	argc = o_argc;
	270	argv = o_argv;
	271	return cmd->handler(state, NULL, NULL, argc, argv);
	272	}
	273
bd396f2a JB	274	msg = nlmsg_alloc();
bd396f2a JB	275	if (!msg) {
70391ccf JB	276	fprintf(stderr, "failed to allocate netlink message\n");
	277	return 2;
	278	}
	279
59c49f09	280	cb = nl_cb_alloc(debug ? NL_CB_DEBUG : NL_CB_DEFAULT);
70391ccf JB	281	if (!cb) {
	282	fprintf(stderr, "failed to allocate netlink callbacks\n");
	283	err = 2;
	284	goto out_free_msg;
bd396f2a	285	}
45c7212c	286
bd396f2a JB	287	genlmsg_put(msg, 0, 0, genl_family_get_id(state->nl80211), 0,
	288	cmd->nl_msg_flags, cmd->cmd, 0);
	289
9927363c	290	switch (command_idby) {
bd396f2a JB	291	case CIB_PHY:
	292	NLA_PUT_U32(msg, NL80211_ATTR_WIPHY, devidx);
	293	break;
	294	case CIB_NETDEV:
	295	NLA_PUT_U32(msg, NL80211_ATTR_IFINDEX, devidx);
	296	break;
	297	default:
	298	break;
	299	}
	300
7c37a24d	301	err = cmd->handler(state, cb, msg, argc, argv);
70391ccf JB	302	if (err)
	303	goto out;
	304
57077d64	305	err = nl_send_auto_complete(state->nl_sock, msg);
70391ccf JB	306	if (err < 0)
	307	goto out;
	308
c5c4471a JB	309	err = 1;
c5c4471a JB	310
70391ccf	311	nl_cb_err(cb, NL_CB_CUSTOM, error_handler, &err);
59c418c0	312	nl_cb_set(cb, NL_CB_FINISH, NL_CB_CUSTOM, finish_handler, &err);
561c5b7e	313	nl_cb_set(cb, NL_CB_ACK, NL_CB_CUSTOM, ack_handler, &err);
70391ccf	314
c5c4471a	315	while (err > 0)
57077d64	316	nl_recvmsgs(state->nl_sock, cb);
70391ccf JB	317	out:
	318	nl_cb_put(cb);
	319	out_free_msg:
	320	nlmsg_free(msg);
	321	return err;
bd396f2a JB	322	nla_put_failure:
bd396f2a JB	323	fprintf(stderr, "building message failed\n");
70391ccf	324	return 2;
45c7212c JB	325	}
45c7212c JB	326
2c61ba61 JB	327	static int no_seq_check(struct nl_msg msg, void arg)
	328	{
	329	return NL_OK;
	330	}
	331
	332	static int print_event(struct nl_msg msg, void arg)
	333	{
	334	struct genlmsghdr *gnlh = nlmsg_data(nlmsg_hdr(msg));
	335	struct nlattr *tb[NL80211_ATTR_MAX + 1];
99f46802	336	char ifname[100];
601c6ab2	337	__u8 reg_type;
2c61ba61 JB	338
	339	nla_parse(tb, NL80211_ATTR_MAX, genlmsg_attrdata(gnlh, 0),
	340	genlmsg_attrlen(gnlh, 0), NULL);
	341
	342	switch (gnlh->cmd) {
03109dcb	343	case NL80211_CMD_NEW_WIPHY:
2c61ba61 JB	344	printf("wiphy rename: phy #%d to %s\n",
	345	nla_get_u32(tb[NL80211_ATTR_WIPHY]),
	346	nla_get_string(tb[NL80211_ATTR_WIPHY_NAME]));
	347	break;
99f46802 JB	348	case NL80211_CMD_NEW_SCAN_RESULTS:
	349	if_indextoname(nla_get_u32(tb[NL80211_ATTR_IFINDEX]), ifname);
	350	printf("scan finished on %s (phy #%d)\n",
	351	ifname, nla_get_u32(tb[NL80211_ATTR_WIPHY]));
	352	break;
	353	case NL80211_CMD_SCAN_ABORTED:
	354	if_indextoname(nla_get_u32(tb[NL80211_ATTR_IFINDEX]), ifname);
	355	printf("scan aborted on %s (phy #%d)\n",
	356	ifname, nla_get_u32(tb[NL80211_ATTR_WIPHY]));
	357	break;
601c6ab2 LR	358	case NL80211_CMD_REG_CHANGE:
	359
	360	printf("regulatory domain change: ");
	361
	362	reg_type = nla_get_u8(tb[NL80211_ATTR_REG_TYPE]);
	363
	364	switch (reg_type) {
	365	case NL80211_REGDOM_TYPE_COUNTRY:
	366	printf("set to %s by %s request",
	367	nla_get_string(tb[NL80211_ATTR_REG_ALPHA2]),
	368	reg_initiator_to_string(nla_get_u8(tb[NL80211_ATTR_REG_INITIATOR])));
	369	if (tb[NL80211_ATTR_WIPHY])
	370	printf(" on phy%d", nla_get_u32(tb[NL80211_ATTR_WIPHY]));
	371	break;
	372	case NL80211_REGDOM_TYPE_WORLD:
	373	printf("set to world roaming by %s request",
	374	reg_initiator_to_string(nla_get_u8(tb[NL80211_ATTR_REG_INITIATOR])));
	375	break;
	376	case NL80211_REGDOM_TYPE_CUSTOM_WORLD:
	377	printf("custom world roaming rules in place on phy%d by %s request",
	378	nla_get_u32(tb[NL80211_ATTR_WIPHY]),
	379	reg_initiator_to_string(nla_get_u32(tb[NL80211_ATTR_REG_INITIATOR])));
	380	break;
	381	case NL80211_REGDOM_TYPE_INTERSECTION:
	382	printf("intersection used due to a request made by %s",
	383	reg_initiator_to_string(nla_get_u32(tb[NL80211_ATTR_REG_INITIATOR])));
	384	if (tb[NL80211_ATTR_WIPHY])
	385	printf(" on phy%d", nla_get_u32(tb[NL80211_ATTR_WIPHY]));
	386	break;
	387	default:
	388	printf("unknown source (upgrade this utility)");
	389	break;
	390	}
	391
	392	printf("\n");
	393	break;
03109dcb JB	394	default:
	395	printf("unknown event: %d\n", gnlh->cmd);
	396	break;
2c61ba61 JB	397	}
	398
	399	return NL_SKIP;
	400	}
	401
72041aa0 JB	402	struct wait_event {
	403	int n_cmds;
	404	const __u32 *cmds;
	405	__u32 cmd;
	406	};
	407
	408	static int wait_event(struct nl_msg msg, void arg)
	409	{
	410	struct wait_event *wait = arg;
	411	struct genlmsghdr *gnlh = nlmsg_data(nlmsg_hdr(msg));
	412	int i;
	413
	414	for (i = 0; i < wait->n_cmds; i++) {
	415	if (gnlh->cmd == wait->cmds[i]) {
	416	wait->cmd = gnlh->cmd;
	417	}
	418	}
	419
	420	return NL_SKIP;
	421	}
	422
	423	__u32 listen_events(struct nl80211_state *state,
	424	const int n_waits, const __u32 *waits)
2c61ba61 JB	425	{
	426	int mcid, ret;
	427	struct nl_cb *cb = nl_cb_alloc(debug ? NL_CB_DEBUG : NL_CB_DEFAULT);
72041aa0	428	struct wait_event wait_ev;
2c61ba61 JB	429
	430	if (!cb) {
	431	fprintf(stderr, "failed to allocate netlink callbacks\n");
	432	return -ENOMEM;
	433	}
	434
601c6ab2	435	/* Configuration multicast group */
57077d64	436	mcid = nl_get_multicast_id(state->nl_sock, "nl80211", "config");
2c61ba61 JB	437	if (mcid < 0)
	438	return mcid;
	439
57077d64	440	ret = nl_socket_add_membership(state->nl_sock, mcid);
2c61ba61 JB	441	if (ret)
2c61ba61 JB	442	return ret;
99f46802	443
601c6ab2	444	/* Scan multicast group */
99f46802	445	mcid = nl_get_multicast_id(state->nl_sock, "nl80211", "scan");
5406d9e4 JB	446	if (mcid >= 0) {
	447	ret = nl_socket_add_membership(state->nl_sock, mcid);
	448	if (ret)
	449	return ret;
	450	}
99f46802	451
601c6ab2 LR	452	/* Regulatory multicast group */
	453	mcid = nl_get_multicast_id(state->nl_sock, "nl80211", "regulatory");
	454	if (mcid >= 0) {
	455	ret = nl_socket_add_membership(state->nl_sock, mcid);
	456	if (ret)
	457	return ret;
	458	}
	459
2c61ba61 JB	460	/* no sequence checking for multicast messages */
2c61ba61 JB	461	nl_cb_set(cb, NL_CB_SEQ_CHECK, NL_CB_CUSTOM, no_seq_check, NULL);
2c61ba61	462
72041aa0 JB	463	if (n_waits && waits) {
	464	wait_ev.cmds = waits;
	465	wait_ev.n_cmds = n_waits;
	466	nl_cb_set(cb, NL_CB_VALID, NL_CB_CUSTOM, wait_event, &wait_ev);
	467	} else {
	468	nl_cb_set(cb, NL_CB_VALID, NL_CB_CUSTOM, print_event, NULL);
	469	}
	470
	471	wait_ev.cmd = 0;
	472
	473	while (!wait_ev.cmd)
57077d64	474	nl_recvmsgs(state->nl_sock, cb);
2c61ba61 JB	475
	476	nl_cb_put(cb);
	477
72041aa0	478	return wait_ev.cmd;
2c61ba61 JB	479	}
2c61ba61 JB	480
cad53b3f JB	481	int main(int argc, char **argv)
	482	{
	483	struct nl80211_state nlstate;
bd396f2a JB	484	int err;
bd396f2a JB	485	const char *argv0;
cad53b3f	486
f408e01b	487	/* calculate command size including padding */
ce5af55c JB	488	cmd_size = abs((long)&__cmd_NULL_1_CIB_NONE_0
ce5af55c JB	489	- (long)&__cmd_NULL_0_CIB_NONE_0);
45c7212c JB	490	/* strip off self */
45c7212c JB	491	argc--;
1cdd9016 MK	492	argv0 = *argv++;
1cdd9016 MK	493
59c49f09 JB	494	if (argc > 0 && strcmp(*argv, "--debug") == 0) {
	495	debug = 1;
	496	argc--;
	497	argv++;
	498	}
	499
d711f013 JB	500	if (argc > 0 && strcmp(*argv, "--version") == 0) {
	501	version();
	502	return 0;
	503	}
	504
bd396f2a	505	if (argc == 0 \|\| strcmp(*argv, "help") == 0) {
1cdd9016	506	usage(argv0);
4a972f80	507	return 0;
1cdd9016	508	}
45c7212c	509
2bdb6bd1 JB	510	err = nl80211_init(&nlstate);
	511	if (err)
	512	return 1;
	513
2c61ba61	514	if (strcmp(*argv, "event") == 0) {
72041aa0 JB	515	if (argc != 1)
	516	err = 1;
	517	else
	518	err = listen_events(&nlstate, 0, NULL);
2c61ba61	519	} else if (strcmp(*argv, "dev") == 0) {
14a0380d LR	520	argc--;
14a0380d LR	521	argv++;
9927363c JB	522	err = handle_cmd(&nlstate, II_NETDEV, argc, argv);
	523	} else if (strncmp(*argv, "phy", 3) == 0) {
	524	if (strlen(*argv) == 3) {
	525	argc--;
	526	argv++;
	527	err = handle_cmd(&nlstate, II_PHY_NAME, argc, argv);
	528	} else if ((argv + 3) == '#')
	529	err = handle_cmd(&nlstate, II_PHY_IDX, argc, argv);
	530	else
	531	err = 1;
bd396f2a	532	} else
9927363c	533	err = handle_cmd(&nlstate, II_NONE, argc, argv);
45c7212c	534
5e75fd04	535	if (err == 1)
bd396f2a	536	usage(argv0);
5e75fd04	537	if (err < 0)
b49be3e1	538	fprintf(stderr, "command failed: %s (%d)\n", strerror(-err), err);
cad53b3f JB	539
	540	nl80211_cleanup(&nlstate);
	541
45c7212c	542	return err;
cad53b3f	543	}