[dragonfly.git] / usr.sbin / wlconfig / wlconfig.c

/*
 * Copyright (C) 1996
 *      Michael Smith.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY Michael Smith AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL Michael Smith OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 * $FreeBSD: src/usr.sbin/wlconfig/wlconfig.c,v 1.8.2.2 2001/07/19 05:24:10 kris Exp $
 * $DragonFly: src/usr.sbin/wlconfig/wlconfig.c,v 1.3 2005/12/05 01:23:23 swildner Exp $
 */

/*
 * wlconfig.c
 * 
 * utility to read out and change various WAVELAN parameters.
 * Currently supports NWID and IRQ values.
 *
 * The NWID is used by 2 or more wavelan controllers to determine
 * if packets should be received or not.  It is a filter that
 * is roughly analogous to the "channel" setting with a garage
 * door controller.  Two companies side by side with wavelan devices
 * that could actually hear each other can use different NWIDs
 * and ignore packets.  In truth however, the air space is shared, 
 * and the NWID is a virtual filter.
 *
 * In the current set of wavelan drivers, ioctls changed only
 * the runtime radio modem registers which act in a manner analogous
 * to an ethernet transceiver.  The ioctls do not change the 
 * stored nvram PSA (or parameter storage area).  At boot, the PSA
 * values are stored in the radio modem.   Thus when the
 * system reboots it will restore the wavelan NWID to the value
 * stored in the PSA.  The NCR/ATT dos utilities must be used to
 * change the initial NWID values in the PSA.  The wlconfig utility
 * may be used to set a different NWID at runtime; this is only
 * permitted while the interface is up and running.
 *
 * By contrast, the IRQ value can only be changed while the 
 * Wavelan card is down and unconfigured, and it will remain
 * disabled after an IRQ change until reboot.
 *
 */

#include <sys/param.h>
#include <sys/socket.h>
#include <sys/ioctl.h>
#include <sys/time.h>
#include <machine/if_wl_wavelan.h>

#include <net/if.h>
#include <netinet/in.h>
#include <netinet/if_ether.h>

#include <err.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <limits.h>

/* translate IRQ bit to number */
/* array for maping irq numbers to values for the irq parameter register */
static int irqvals[16] = { 
    0, 0, 0, 0x01, 0x02, 0x04, 0, 0x08, 0, 0, 0x10, 0x20, 0x40, 0, 0, 0x80 
};

/* cache */
static int w_sigitems;	/* count of valid items */
static struct w_sigcache wsc[MAXCACHEITEMS];

int
wlirq(int irqval)
{
    int irq;
    
    for(irq = 0; irq < 16; irq++)
	if(irqvals[irq] == irqval)
	    return(irq);
    return 0;
}

char *compat_type[] = {
    "PC-AT 915MHz",
    "PC-MC 915MHz",
    "PC-AT 2.4GHz",
    "PC-MC 2.4GHz",
    "PCCARD or 1/2 size AT, 915MHz or 2.4GHz"
};

char *subband[] = {
    "915MHz/see WaveModem",
    "2425MHz",
    "2460MHz",
    "2484MHz",
    "2430.5MHz"
};


/*
** print_psa
**
** Given a pointer to a PSA structure, print it out
*/
void
print_psa(u_char *psa, int currnwid)
{
    int		nwid;
    
    /*
    ** Work out what sort of board we have
    */
    if (psa[0] == 0x14) {
	printf("Board type            : Microchannel\n");
    } else {
	if (psa[1] == 0) {
	    printf("Board type            : PCCARD\n");
	} else {
	    printf("Board type            : ISA");
	    if ((psa[4] == 0) &&
		(psa[5] == 0) &&
		(psa[6] == 0))
		printf(" (DEC OEM)");
	    printf("\n");
	    printf("Base address options  : 0x300, 0x%02x0, 0x%02x0, 0x%02x0\n",
		   (int)psa[1], (int)psa[2], (int)psa[3]);
	    printf("Waitstates            : %d\n",psa[7] & 0xf);
	    printf("Bus mode              : %s\n",(psa[7] & 0x10) ? "EISA" : "ISA");
	    printf("IRQ                   : %d\n",wlirq(psa[8]));
	}
    }
    printf("Default MAC address   : %02x:%02x:%02x:%02x:%02x:%02x\n",
	   psa[0x10],psa[0x11],psa[0x12],psa[0x13],psa[0x14],psa[0x15]);
    printf("Soft MAC address      : %02x:%02x:%02x:%02x:%02x:%02x\n",
	   psa[0x16],psa[0x17],psa[0x18],psa[0x19],psa[0x1a],psa[0x1b]);
    printf("Current MAC address   : %s\n",(psa[0x1c] & 0x1) ? "Soft" : "Default");
    printf("Adapter compatibility : ");
    if (psa[0x1d] < 5) {
	printf("%s\n",compat_type[psa[0x1d]]);
    } else {
	printf("unknown\n");
    }
    printf("Threshold preset      : %d\n",psa[0x1e]);
    printf("Call code required    : %s\n",(psa[0x1f] & 0x1) ? "YES" : "NO");
    if (psa[0x1f] & 0x1)
	printf("Call code             : 0x%02x%02x%02x%02x%02x%02x%02x%02x\n",
	       psa[0x30],psa[0x31],psa[0x32],psa[0x33],psa[0x34],psa[0x35],psa[0x36],psa[0x37]);
    printf("Subband               : %s\n",subband[psa[0x20] & 0xf]);
    printf("Quality threshold     : %d\n",psa[0x21]);
    printf("Hardware version      : %d (%s)\n",psa[0x22],psa[0x22] ? "Rel3" : "Rel1/Rel2");
    printf("Network ID enable     : %s\n",(psa[0x25] & 0x1) ? "YES" : "NO");
    if (psa[0x25] & 0x1) {
	nwid = (psa[0x23] << 8) + psa[0x24];
	printf("NWID                  : 0x%04x\n",nwid);
	if (nwid != currnwid) {
	    printf("Current NWID          : 0x%04x\n",currnwid);
	}
    }
    printf("Datalink security     : %s\n",(psa[0x26] & 0x1) ? "YES" : "NO");
    if (psa[0x26] & 0x1) {
	printf("Encryption key        : ");
	if (psa[0x27] == 0) {
	    printf("DENIED\n");
	} else {
	    printf("0x%02x%02x%02x%02x%02x%02x%02x%02x\n",
		   psa[0x27],psa[0x28],psa[0x29],psa[0x2a],psa[0x2b],psa[0x2c],psa[0x2d],psa[0x2e]);
	}
    }
    printf("Databus width         : %d (%s)\n",
	   (psa[0x2f] & 0x1) ? 16 : 8, (psa[0x2f] & 0x80) ? "fixed" : "variable");
    printf("Configuration state   : %sconfigured\n",(psa[0x38] & 0x1) ? "" : "un");
    printf("CRC-16                : 0x%02x%02x\n",psa[0x3e],psa[0x3d]);
    printf("CRC status            : ");
    switch(psa[0x3f]) {
    case 0xaa:
	printf("OK\n");
	break;
    case 0x55:
	printf("BAD\n");
	break;
    default:
	printf("Error\n");
	break;
    }
}


static void
usage(void)
{
    fprintf(stderr,"usage: wlconfig ifname [param value ...]\n");
    exit(1);
}


void
get_cache(int sd, struct ifreq *ifr) 
{
    /* get the cache count */
    if (ioctl(sd, SIOCGWLCITEM, (caddr_t)ifr))
	err(1, "SIOCGWLCITEM - get cache count");
    w_sigitems = (int) ifr->ifr_data;

    ifr->ifr_data = (caddr_t) &wsc;
    /* get the cache */
    if (ioctl(sd, SIOCGWLCACHE, (caddr_t)ifr))
	err(1, "SIOCGWLCACHE - get cache count");
}

static int
scale_value(int value, int max)
{
	double dmax = (double) max;
	if (value > max)
		return(100);
	return((value/dmax) * 100);
}

static void
dump_cache(int rawFlag)
{
	int i;
	int signal, silence, quality; 

	if (rawFlag)
		printf("signal range 0..63: silence 0..63: quality 0..15\n");
	else
		printf("signal range 0..100: silence 0..100: quality 0..100\n");

	/* after you read it, loop through structure,i.e. wsc
         * print each item:
	 */
	for(i = 0; i < w_sigitems; i++) {
		printf("[%d:%d]>\n", i+1, w_sigitems);
        	printf("\tip: %d.%d.%d.%d,",((wsc[i].ipsrc >> 0) & 0xff),
				        ((wsc[i].ipsrc >> 8) & 0xff),
				        ((wsc[i].ipsrc >> 16) & 0xff),
				        ((wsc[i].ipsrc >> 24) & 0xff));
		printf(" mac: %02x:%02x:%02x:%02x:%02x:%02x\n",
		  		    	wsc[i].macsrc[0]&0xff,
		  		    	wsc[i].macsrc[1]&0xff,
		   		    	wsc[i].macsrc[2]&0xff,
		   			wsc[i].macsrc[3]&0xff,
		   			wsc[i].macsrc[4]&0xff,
		   			wsc[i].macsrc[5]&0xff);
		if (rawFlag) {
			signal = wsc[i].signal;
			silence = wsc[i].silence;
			quality = wsc[i].quality;
		}
		else {
			signal = scale_value(wsc[i].signal, 63);
			silence = scale_value(wsc[i].silence, 63);
			quality = scale_value(wsc[i].quality, 15);
		}
		printf("\tsignal: %d, silence: %d, quality: %d, ",
		   			signal,
		   			silence,
		   			quality);
		printf("snr: %d\n", signal - silence);
	}
}

#define raw_cache()	dump_cache(1)
#define scale_cache()	dump_cache(0)

int
main(int argc, char *argv[])
{
    int 		sd;
    struct ifreq	ifr; 
    u_char		psabuf[0x40];
    int			val, argind, i;
    char		*cp, *param, *value;
    struct ether_addr	*ea;
    int			work = 0;
    int			currnwid;

    if ((argc < 2) || (argc % 2))
	usage();

    /* get a socket */
    sd = socket(AF_INET, SOCK_DGRAM, 0);
    if (sd < 0)
	err(1,"socket");
    strncpy(ifr.ifr_name, argv[1], sizeof(ifr.ifr_name));
    ifr.ifr_addr.sa_family = AF_INET;

    /* get the PSA */
    ifr.ifr_data = (caddr_t)psabuf;
    if (ioctl(sd, SIOCGWLPSA, (caddr_t)&ifr))
	err(1,"get PSA");

    /* get the current NWID */
    if (ioctl(sd, SIOCGWLCNWID, (caddr_t)&ifr))
	err(1,"get NWID");
    currnwid = (int)ifr.ifr_data;

    /* just dump and exit? */
    if (argc == 2) {
	print_psa(psabuf, currnwid);
	exit(0);
    }

    /* loop reading arg pairs */
    for (argind = 2; argind < argc; argind += 2) {

	param = argv[argind];
	value = argv[argind+1];

	/* What to do? */
	
	if (!strcasecmp(param,"currnwid")) {		/* set current NWID */
	    val = strtol(value,&cp,0);
	    if ((val < 0) || (val > 0xffff) || (cp == value))
		errx(1,"bad NWID '%s'",value);
	    
	    ifr.ifr_data = (caddr_t)val;
	    if (ioctl(sd, SIOCSWLCNWID, (caddr_t)&ifr))
		err(1,"set NWID (interface not up?)");
	    continue ;
	}

	if (!strcasecmp(param,"irq")) {
	    val = strtol(value,&cp,0);
	    val = irqvals[val];
	    if ((val == 0) || (cp == value))
		errx(1,"bad IRQ '%s'",value);
	    psabuf[WLPSA_IRQNO] = (u_char)val;
	    work = 1;
	    continue;
	}
	
	if (!strcasecmp(param,"mac")) {
	    if ((ea = ether_aton(value)) == NULL)
		errx(1,"bad ethernet address '%s'",value);
	    for (i = 0; i < 6; i++)
		psabuf[WLPSA_LOCALMAC + i] = ea->octet[i];
	    work = 1;
	    continue;
	}

	if (!strcasecmp(param,"macsel")) {
	    if (!strcasecmp(value,"local")) {
		psabuf[WLPSA_MACSEL] |= 0x1;
		work = 1;
		continue;
	    }
	    if (!strcasecmp(value,"universal")) {
		psabuf[WLPSA_MACSEL] &= ~0x1;
		work = 1;
		continue;
	    }
	    errx(1,"bad macsel value '%s'",value);
	}
	
	if (!strcasecmp(param,"nwid")) {
	    val = strtol(value,&cp,0);
	    if ((val < 0) || (val > 0xffff) || (cp == value))
		errx(1,"bad NWID '%s'",value);
	    psabuf[WLPSA_NWID] = (val >> 8) & 0xff;
	    psabuf[WLPSA_NWID+1] = val & 0xff;
	    work = 1;	
	    continue;
	}
	if (!strcasecmp(param,"cache")) {

            /* raw cache dump
	    */
	    if (!strcasecmp(value,"raw")) {
	    	get_cache(sd, &ifr);
		raw_cache();
		continue;
	    }
            /* scaled cache dump
	    */
	    else if (!strcasecmp(value,"scale")) {
	    	get_cache(sd, &ifr);
		scale_cache();
		continue;
	    }
	    /* zero out cache
	    */
	    else if (!strcasecmp(value,"zero")) {
		if (ioctl(sd, SIOCDWLCACHE, (caddr_t)&ifr))
		    err(1,"zero cache");
		continue;
	    }
	    errx(1,"unknown value '%s'", value);
 	}
	errx(1,"unknown parameter '%s'",param);
    }
    if (work) {
	ifr.ifr_data = (caddr_t)psabuf;
	if (ioctl(sd, SIOCSWLPSA, (caddr_t)&ifr))
	    err(1,"set PSA");
    }
    return(0);
}
Commit	Line	Data
984263bc MD	1	/*
	2	* Copyright (C) 1996
	3	* Michael Smith. All rights reserved.
	4	*
	5	* Redistribution and use in source and binary forms, with or without
	6	* modification, are permitted provided that the following conditions
	7	* are met:
	8	* 1. Redistributions of source code must retain the above copyright
	9	* notice, this list of conditions and the following disclaimer.
	10	* 2. Redistributions in binary form must reproduce the above copyright
	11	* notice, this list of conditions and the following disclaimer in the
	12	* documentation and/or other materials provided with the distribution.
	13	*
	14	* THIS SOFTWARE IS PROVIDED BY Michael Smith AND CONTRIBUTORS ``AS IS'' AND
	15	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	16	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	17	* ARE DISCLAIMED. IN NO EVENT SHALL Michael Smith OR CONTRIBUTORS BE LIABLE
	18	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	19	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	20	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	21	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	22	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	23	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	24	* SUCH DAMAGE.
1de703da MD	25	*
1de703da MD	26	* $FreeBSD: src/usr.sbin/wlconfig/wlconfig.c,v 1.8.2.2 2001/07/19 05:24:10 kris Exp $
44d05a04	27	* $DragonFly: src/usr.sbin/wlconfig/wlconfig.c,v 1.3 2005/12/05 01:23:23 swildner Exp $
984263bc MD	28	*/
984263bc MD	29
984263bc MD	30	/*
	31	* wlconfig.c
	32	*
	33	* utility to read out and change various WAVELAN parameters.
	34	* Currently supports NWID and IRQ values.
	35	*
	36	* The NWID is used by 2 or more wavelan controllers to determine
	37	* if packets should be received or not. It is a filter that
	38	* is roughly analogous to the "channel" setting with a garage
	39	* door controller. Two companies side by side with wavelan devices
	40	* that could actually hear each other can use different NWIDs
	41	* and ignore packets. In truth however, the air space is shared,
	42	* and the NWID is a virtual filter.
	43	*
	44	* In the current set of wavelan drivers, ioctls changed only
	45	* the runtime radio modem registers which act in a manner analogous
	46	* to an ethernet transceiver. The ioctls do not change the
	47	* stored nvram PSA (or parameter storage area). At boot, the PSA
	48	* values are stored in the radio modem. Thus when the
	49	* system reboots it will restore the wavelan NWID to the value
	50	* stored in the PSA. The NCR/ATT dos utilities must be used to
	51	* change the initial NWID values in the PSA. The wlconfig utility
	52	* may be used to set a different NWID at runtime; this is only
	53	* permitted while the interface is up and running.
	54	*
	55	* By contrast, the IRQ value can only be changed while the
	56	* Wavelan card is down and unconfigured, and it will remain
	57	* disabled after an IRQ change until reboot.
	58	*
	59	*/
	60
	61	#include <sys/param.h>
	62	#include <sys/socket.h>
	63	#include <sys/ioctl.h>
	64	#include <sys/time.h>
	65	#include <machine/if_wl_wavelan.h>
	66
	67	#include <net/if.h>
	68	#include <netinet/in.h>
	69	#include <netinet/if_ether.h>
	70
	71	#include <err.h>
	72	#include <stdio.h>
	73	#include <stdlib.h>
	74	#include <string.h>
	75	#include <unistd.h>
	76	#include <limits.h>
	77
	78	/* translate IRQ bit to number */
	79	/* array for maping irq numbers to values for the irq parameter register */
	80	static int irqvals[16] = {
	81	0, 0, 0, 0x01, 0x02, 0x04, 0, 0x08, 0, 0, 0x10, 0x20, 0x40, 0, 0, 0x80
	82	};
	83
	84	/* cache */
	85	static int w_sigitems; /* count of valid items */
	86	static struct w_sigcache wsc[MAXCACHEITEMS];
	87
	88	int
	89	wlirq(int irqval)
	90	{
	91	int irq;
	92
	93	for(irq = 0; irq < 16; irq++)
94	if(irqvals[irq] == irqval)
95	return(irq);
96	return 0;
97	}
98
99	char *compat_type[] = {
100	"PC-AT 915MHz",
101	"PC-MC 915MHz",
102	"PC-AT 2.4GHz",
103	"PC-MC 2.4GHz",
104	"PCCARD or 1/2 size AT, 915MHz or 2.4GHz"
105	};
106
107	char *subband[] = {
108	"915MHz/see WaveModem",
109	"2425MHz",
110	"2460MHz",
111	"2484MHz",
112	"2430.5MHz"
113	};
114
115
116	/*
117	** print_psa
118	**
119	** Given a pointer to a PSA structure, print it out
120	*/
121	void
122	print_psa(u_char *psa, int currnwid)
123	{
124	int nwid;
125
126	/*
127	** Work out what sort of board we have
128	*/
129	if (psa[0] == 0x14) {
130	printf("Board type : Microchannel\n");
131	} else {
132	if (psa[1] == 0) {
133	printf("Board type : PCCARD\n");
134	} else {
135	printf("Board type : ISA");
136	if ((psa[4] == 0) &&
137	(psa[5] == 0) &&
138	(psa[6] == 0))
139	printf(" (DEC OEM)");
140	printf("\n");
141	printf("Base address options : 0x300, 0x%02x0, 0x%02x0, 0x%02x0\n",
142	(int)psa[1], (int)psa[2], (int)psa[3]);
143	printf("Waitstates : %d\n",psa[7] & 0xf);
144	printf("Bus mode : %s\n",(psa[7] & 0x10) ? "EISA" : "ISA");
145	printf("IRQ : %d\n",wlirq(psa[8]));
146	}
147	}
148	printf("Default MAC address : %02x:%02x:%02x:%02x:%02x:%02x\n",
149	psa[0x10],psa[0x11],psa[0x12],psa[0x13],psa[0x14],psa[0x15]);
150	printf("Soft MAC address : %02x:%02x:%02x:%02x:%02x:%02x\n",
151	psa[0x16],psa[0x17],psa[0x18],psa[0x19],psa[0x1a],psa[0x1b]);
152	printf("Current MAC address : %s\n",(psa[0x1c] & 0x1) ? "Soft" : "Default");
153	printf("Adapter compatibility : ");
154	if (psa[0x1d] < 5) {
155	printf("%s\n",compat_type[psa[0x1d]]);
156	} else {
157	printf("unknown\n");
158	}
159	printf("Threshold preset : %d\n",psa[0x1e]);
160	printf("Call code required : %s\n",(psa[0x1f] & 0x1) ? "YES" : "NO");
161	if (psa[0x1f] & 0x1)
162	printf("Call code : 0x%02x%02x%02x%02x%02x%02x%02x%02x\n",
163	psa[0x30],psa[0x31],psa[0x32],psa[0x33],psa[0x34],psa[0x35],psa[0x36],psa[0x37]);
164	printf("Subband : %s\n",subband[psa[0x20] & 0xf]);
165	printf("Quality threshold : %d\n",psa[0x21]);
166	printf("Hardware version : %d (%s)\n",psa[0x22],psa[0x22] ? "Rel3" : "Rel1/Rel2");
167	printf("Network ID enable : %s\n",(psa[0x25] & 0x1) ? "YES" : "NO");
168	if (psa[0x25] & 0x1) {
169	nwid = (psa[0x23] << 8) + psa[0x24];
170	printf("NWID : 0x%04x\n",nwid);
171	if (nwid != currnwid) {
172	printf("Current NWID : 0x%04x\n",currnwid);
173	}
174	}
175	printf("Datalink security : %s\n",(psa[0x26] & 0x1) ? "YES" : "NO");
176	if (psa[0x26] & 0x1) {
177	printf("Encryption key : ");
178	if (psa[0x27] == 0) {
179	printf("DENIED\n");
180	} else {
181	printf("0x%02x%02x%02x%02x%02x%02x%02x%02x\n",
182	psa[0x27],psa[0x28],psa[0x29],psa[0x2a],psa[0x2b],psa[0x2c],psa[0x2d],psa[0x2e]);
183	}
184	}
185	printf("Databus width : %d (%s)\n",
186	(psa[0x2f] & 0x1) ? 16 : 8, (psa[0x2f] & 0x80) ? "fixed" : "variable");
187	printf("Configuration state : %sconfigured\n",(psa[0x38] & 0x1) ? "" : "un");
188	printf("CRC-16 : 0x%02x%02x\n",psa[0x3e],psa[0x3d]);
189	printf("CRC status : ");
190	switch(psa[0x3f]) {
191	case 0xaa:
192	printf("OK\n");
193	break;
194	case 0x55:
195	printf("BAD\n");
196	break;
197	default:
198	printf("Error\n");
199	break;
200	}
201	}
202
203
204	static void
44d05a04	205	usage(void)
984263bc MD	206	{
	207	fprintf(stderr,"usage: wlconfig ifname [param value ...]\n");
	208	exit(1);
	209	}
	210
	211
	212	void
	213	get_cache(int sd, struct ifreq *ifr)
	214	{
	215	/* get the cache count */
	216	if (ioctl(sd, SIOCGWLCITEM, (caddr_t)ifr))
	217	err(1, "SIOCGWLCITEM - get cache count");
	218	w_sigitems = (int) ifr->ifr_data;
	219
	220	ifr->ifr_data = (caddr_t) &wsc;
	221	/* get the cache */
	222	if (ioctl(sd, SIOCGWLCACHE, (caddr_t)ifr))
	223	err(1, "SIOCGWLCACHE - get cache count");
	224	}
	225
	226	static int
	227	scale_value(int value, int max)
	228	{
	229	double dmax = (double) max;
	230	if (value > max)
	231	return(100);
	232	return((value/dmax) * 100);
	233	}
	234
	235	static void
	236	dump_cache(int rawFlag)
	237	{
	238	int i;
	239	int signal, silence, quality;
	240
	241	if (rawFlag)
	242	printf("signal range 0..63: silence 0..63: quality 0..15\n");
	243	else
	244	printf("signal range 0..100: silence 0..100: quality 0..100\n");
	245
	246	/* after you read it, loop through structure,i.e. wsc
	247	* print each item:
	248	*/
	249	for(i = 0; i < w_sigitems; i++) {
	250	printf("[%d:%d]>\n", i+1, w_sigitems);
	251	printf("\tip: %d.%d.%d.%d,",((wsc[i].ipsrc >> 0) & 0xff),
	252	((wsc[i].ipsrc >> 8) & 0xff),
	253	((wsc[i].ipsrc >> 16) & 0xff),
	254	((wsc[i].ipsrc >> 24) & 0xff));
	255	printf(" mac: %02x:%02x:%02x:%02x:%02x:%02x\n",
	256	wsc[i].macsrc[0]&0xff,
	257	wsc[i].macsrc[1]&0xff,
	258	wsc[i].macsrc[2]&0xff,
	259	wsc[i].macsrc[3]&0xff,
	260	wsc[i].macsrc[4]&0xff,
	261	wsc[i].macsrc[5]&0xff);
	262	if (rawFlag) {
	263	signal = wsc[i].signal;
	264	silence = wsc[i].silence;
	265	quality = wsc[i].quality;
	266	}
	267	else {
	268	signal = scale_value(wsc[i].signal, 63);
	269	silence = scale_value(wsc[i].silence, 63);
270	quality = scale_value(wsc[i].quality, 15);
271	}
272	printf("\tsignal: %d, silence: %d, quality: %d, ",
273	signal,
274	silence,
275	quality);
276	printf("snr: %d\n", signal - silence);
277	}
278	}
279
280	#define raw_cache() dump_cache(1)
281	#define scale_cache() dump_cache(0)
282
283	int
284	main(int argc, char *argv[])
285	{
286	int sd;
287	struct ifreq ifr;
288	u_char psabuf[0x40];
289	int val, argind, i;
290	char cp, param, *value;
291	struct ether_addr *ea;
292	int work = 0;
293	int currnwid;
294
295	if ((argc < 2) \|\| (argc % 2))
296	usage();
297
298	/* get a socket */
299	sd = socket(AF_INET, SOCK_DGRAM, 0);
300	if (sd < 0)
301	err(1,"socket");
302	strncpy(ifr.ifr_name, argv[1], sizeof(ifr.ifr_name));
303	ifr.ifr_addr.sa_family = AF_INET;
304
305	/* get the PSA */
306	ifr.ifr_data = (caddr_t)psabuf;
307	if (ioctl(sd, SIOCGWLPSA, (caddr_t)&ifr))
308	err(1,"get PSA");
309
310	/* get the current NWID */
311	if (ioctl(sd, SIOCGWLCNWID, (caddr_t)&ifr))
312	err(1,"get NWID");
313	currnwid = (int)ifr.ifr_data;
314
315	/* just dump and exit? */
316	if (argc == 2) {
317	print_psa(psabuf, currnwid);
318	exit(0);
319	}
320
321	/* loop reading arg pairs */
322	for (argind = 2; argind < argc; argind += 2) {
323
324	param = argv[argind];
325	value = argv[argind+1];
326
327	/* What to do? */
328
329	if (!strcasecmp(param,"currnwid")) { /* set current NWID */
330	val = strtol(value,&cp,0);
331	if ((val < 0) \|\| (val > 0xffff) \|\| (cp == value))
332	errx(1,"bad NWID '%s'",value);
333
334	ifr.ifr_data = (caddr_t)val;
335	if (ioctl(sd, SIOCSWLCNWID, (caddr_t)&ifr))
336	err(1,"set NWID (interface not up?)");
337	continue ;
338	}
339
340	if (!strcasecmp(param,"irq")) {
341	val = strtol(value,&cp,0);
342	val = irqvals[val];
343	if ((val == 0) \|\| (cp == value))
344	errx(1,"bad IRQ '%s'",value);
345	psabuf[WLPSA_IRQNO] = (u_char)val;
346	work = 1;
347	continue;
348	}
349
350	if (!strcasecmp(param,"mac")) {
351	if ((ea = ether_aton(value)) == NULL)
352	errx(1,"bad ethernet address '%s'",value);
353	for (i = 0; i < 6; i++)
354	psabuf[WLPSA_LOCALMAC + i] = ea->octet[i];
355	work = 1;
356	continue;
357	}
358
359	if (!strcasecmp(param,"macsel")) {
360	if (!strcasecmp(value,"local")) {
361	psabuf[WLPSA_MACSEL] \|= 0x1;
362	work = 1;
363	continue;
364	}
365	if (!strcasecmp(value,"universal")) {
366	psabuf[WLPSA_MACSEL] &= ~0x1;
367	work = 1;
368	continue;
369	}
370	errx(1,"bad macsel value '%s'",value);
371	}
372
373	if (!strcasecmp(param,"nwid")) {
374	val = strtol(value,&cp,0);
375	if ((val < 0) \|\| (val > 0xffff) \|\| (cp == value))
376	errx(1,"bad NWID '%s'",value);
377	psabuf[WLPSA_NWID] = (val >> 8) & 0xff;
378	psabuf[WLPSA_NWID+1] = val & 0xff;
379	work = 1;
380	continue;
381	}
382	if (!strcasecmp(param,"cache")) {
383
384	/* raw cache dump
385	*/
386	if (!strcasecmp(value,"raw")) {
387	get_cache(sd, &ifr);
388	raw_cache();
389	continue;
390	}
391	/* scaled cache dump
392	*/
393	else if (!strcasecmp(value,"scale")) {
394	get_cache(sd, &ifr);
395	scale_cache();
396	continue;
397	}
398	/* zero out cache
399	*/
400	else if (!strcasecmp(value,"zero")) {
401	if (ioctl(sd, SIOCDWLCACHE, (caddr_t)&ifr))
402	err(1,"zero cache");
403	continue;
404	}
405	errx(1,"unknown value '%s'", value);
406	}
407	errx(1,"unknown parameter '%s'",param);
408	}
409	if (work) {
410	ifr.ifr_data = (caddr_t)psabuf;
411	if (ioctl(sd, SIOCSWLPSA, (caddr_t)&ifr))
412	err(1,"set PSA");
413	}
414	return(0);
415	}