sbin/ifconfig/ifieee80211.c

   1 /*
   2  * Copyright 2001 The Aerospace Corporation.  All rights reserved.
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  * 1. Redistributions of source code must retain the above copyright
   8  *    notice, this list of conditions and the following disclaimer.
   9  * 2. Redistributions in binary form must reproduce the above copyright
  10  *    notice, this list of conditions and the following disclaimer in the
  11  *    documentation and/or other materials provided with the distribution.
  12  *
  13  * THIS SOFTWARE IS PROVIDED BY THE AEROSPACE CORPORATION ``AS IS'' AND
  14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  16  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AEROSPACE CORPORATION BE LIABLE
  17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  23  * SUCH DAMAGE.
  24  *
  25  * $FreeBSD: src/sbin/ifconfig/ifieee80211.c,v 1.1.2.3 2002/02/07 15:12:37 ambrisko Exp $
  26  * $DragonFly: src/sbin/ifconfig/ifieee80211.c,v 1.2 2003/06/17 04:27:33 dillon Exp $
  27  */
  28
  29 /*-
  30  * Copyright (c) 1997, 1998, 2000 The NetBSD Foundation, Inc.
  31  * All rights reserved.
  32  *
  33  * This code is derived from software contributed to The NetBSD Foundation
  34  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
  35  * NASA Ames Research Center.
  36  *
  37  * Redistribution and use in source and binary forms, with or without
  38  * modification, are permitted provided that the following conditions
  39  * are met:
  40  * 1. Redistributions of source code must retain the above copyright
  41  *    notice, this list of conditions and the following disclaimer.
  42  * 2. Redistributions in binary form must reproduce the above copyright
  43  *    notice, this list of conditions and the following disclaimer in the
  44  *    documentation and/or other materials provided with the distribution.
  45  * 3. All advertising materials mentioning features or use of this software
  46  *    must display the following acknowledgement:
  47  *      This product includes software developed by the NetBSD
  48  *      Foundation, Inc. and its contributors.
  49  * 4. Neither the name of The NetBSD Foundation nor the names of its
  50  *    contributors may be used to endorse or promote products derived
  51  *    from this software without specific prior written permission.
  52  *
  53  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  54  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  55  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  56  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  57  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  58  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  59  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  60  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  61  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  62  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  63  * POSSIBILITY OF SUCH DAMAGE.
  64  */
  65
  66 #include <sys/param.h>
  67 #include <sys/ioctl.h>
  68 #include <sys/socket.h>
  69 #include <sys/sysctl.h>
  70 #include <sys/time.h>
  71
  72 #include <net/ethernet.h>
  73 #include <net/if.h>
  74 #include <net/if_dl.h>
  75 #include <net/if_types.h>
  76 #include <net/route.h>
  77 #include <net/if_ieee80211.h>
  78
  79 #include <ctype.h>
  80 #include <err.h>
  81 #include <errno.h>
  82 #include <fcntl.h>
  83 #include <stdio.h>
  84 #include <stdlib.h>
  85 #include <string.h>
  86 #include <unistd.h>
  87
  88 #include "ifconfig.h"
  89
  90 static void set80211(int s, int type, int val, int len, u_int8_t *data);
  91 static const char *get_string(const char *val, const char *sep,
  92     u_int8_t *buf, int *lenp);
  93 static void print_string(const u_int8_t *buf, int len);
  94
  95 void
  96 set80211ssid(const char *val, int d, int s, const struct afswtch *rafp)
  97 {
  98         int             ssid;
  99         int             len;
 100         u_int8_t        data[33];
 101
 102         ssid = 0;
 103         len = sizeof(val);
 104         if (len > 2 && isdigit(val[0]) && val[1] == ':') {
 105                 ssid = atoi(val)-1;
 106                 val += 2;
 107         }
 108
 109         bzero(data, sizeof(data));
 110         len = sizeof(data);
 111         get_string(val, NULL, data, &len);
 112
 113         set80211(s, IEEE80211_IOC_SSID, ssid, len, data);
 114 }
 115
 116 void
 117 set80211stationname(const char *val, int d, int s, const struct afswtch *rafp)
 118 {
 119         int                     len;
 120         u_int8_t                data[33];
 121
 122         bzero(data, sizeof(data));
 123         len = sizeof(data);
 124         get_string(val, NULL, data, &len);
 125
 126         set80211(s, IEEE80211_IOC_STATIONNAME, 0, len, data);
 127 }
 128
 129 void
 130 set80211channel(const char *val, int d, int s, const struct afswtch *rafp)
 131 {
 132         set80211(s, IEEE80211_IOC_CHANNEL, atoi(val), 0, NULL);
 133 }
 134
 135 void
 136 set80211authmode(const char *val, int d, int s, const struct afswtch *rafp)
 137 {
 138         int     mode;
 139
 140         if(strcasecmp(val, "none") == 0) {
 141                 mode = IEEE80211_AUTH_NONE;
 142         } else if(strcasecmp(val, "open") == 0) {
 143                 mode = IEEE80211_AUTH_OPEN;
 144         } else if(strcasecmp(val, "shared") == 0) {
 145                 mode = IEEE80211_AUTH_SHARED;
 146         } else {
 147                 err(1, "unknown authmode");
 148         }
 149
 150         set80211(s, IEEE80211_IOC_AUTHMODE, mode, 0, NULL);
 151 }
 152
 153 void
 154 set80211powersavemode(const char *val, int d, int s, const struct afswtch *rafp)
 155 {
 156         int     mode;
 157
 158         if(strcasecmp(val, "off") == 0) {
 159                 mode = IEEE80211_POWERSAVE_OFF;
 160         } else if(strcasecmp(val, "on") == 0) {
 161                 mode = IEEE80211_POWERSAVE_ON;
 162         } else if(strcasecmp(val, "cam") == 0) {
 163                 mode = IEEE80211_POWERSAVE_CAM;
 164         } else if(strcasecmp(val, "psp") == 0) {
 165                 mode = IEEE80211_POWERSAVE_PSP;
 166         } else if(strcasecmp(val, "psp-cam") == 0) {
 167                 mode = IEEE80211_POWERSAVE_PSP_CAM;
 168         } else {
 169                 err(1, "unknown powersavemode");
 170         }
 171
 172         set80211(s, IEEE80211_IOC_POWERSAVE, mode, 0, NULL);
 173 }
 174
 175 void
 176 set80211powersave(const char *val, int d, int s, const struct afswtch *rafp)
 177 {
 178         if (d == 0)
 179                 set80211(s, IEEE80211_IOC_POWERSAVE, IEEE80211_POWERSAVE_OFF,
 180                     0, NULL);
 181         else
 182                 set80211(s, IEEE80211_IOC_POWERSAVE, IEEE80211_POWERSAVE_ON,
 183                     0, NULL);
 184 }
 185
 186 void
 187 set80211powersavesleep(const char *val, int d, int s, const struct afswtch *rafp)
 188 {
 189         set80211(s, IEEE80211_IOC_POWERSAVESLEEP, atoi(val), 0, NULL);
 190 }
 191
 192 void
 193 set80211wepmode(const char *val, int d, int s, const struct afswtch *rafp)
 194 {
 195         int     mode;
 196
 197         if(strcasecmp(val, "off") == 0) {
 198                 mode = IEEE80211_WEP_OFF;
 199         } else if(strcasecmp(val, "on") == 0) {
 200                 mode = IEEE80211_WEP_ON;
 201         } else if(strcasecmp(val, "mixed") == 0) {
 202                 mode = IEEE80211_WEP_MIXED;
 203         } else {
 204                 err(1, "unknown wep mode");
 205         }
 206
 207         set80211(s, IEEE80211_IOC_WEP, mode, 0, NULL);
 208 }
 209
 210 void
 211 set80211wep(const char *val, int d, int s, const struct afswtch *rafp)
 212 {
 213         set80211(s, IEEE80211_IOC_WEP, d, 0, NULL);
 214 }
 215
 216 void
 217 set80211weptxkey(const char *val, int d, int s, const struct afswtch *rafp)
 218 {
 219         set80211(s, IEEE80211_IOC_WEPTXKEY, atoi(val)-1, 0, NULL);
 220 }
 221
 222 void
 223 set80211wepkey(const char *val, int d, int s, const struct afswtch *rafp)
 224 {
 225         int             key = 0;
 226         int             len;
 227         u_int8_t        data[14];
 228
 229         if(isdigit(val[0]) && val[1] == ':') {
 230                 key = atoi(val)-1;
 231                 val += 2;
 232         }
 233
 234         bzero(data, sizeof(data));
 235         len = sizeof(data);
 236         get_string(val, NULL, data, &len);
 237
 238         set80211(s, IEEE80211_IOC_WEPKEY, key, len, data);
 239 }
 240
 241 /*
 242  * This function is purly a NetBSD compatability interface.  The NetBSD
 243  * iterface is too inflexable, but it's there so we'll support it since
 244  * it's not all that hard.
 245  */
 246 void
 247 set80211nwkey(const char *val, int d, int s, const struct afswtch *rafp)
 248 {
 249         int             txkey;
 250         int             i, len;
 251         u_int8_t        data[14];
 252
 253         set80211(s, IEEE80211_IOC_WEP, IEEE80211_WEP_ON, 0, NULL);
 254
 255         if(isdigit(val[0]) && val[1] == ':') {
 256                 txkey = val[0]-'0'-1;
 257                 val += 2;
 258
 259                 for(i = 0; i < 4; i++) {
 260                         bzero(data, sizeof(data));
 261                         len = sizeof(data);
 262                         val = get_string(val, ",", data, &len);
 263
 264                         set80211(s, IEEE80211_IOC_WEPKEY, i, len, data);
 265                 }
 266         } else {
 267                 bzero(data, sizeof(data));
 268                 len = sizeof(data);
 269                 get_string(val, NULL, data, &len);
 270                 txkey = 0;
 271
 272                 set80211(s, IEEE80211_IOC_WEPKEY, 0, len, data);
 273
 274                 bzero(data, sizeof(data));
 275                 for(i = 1; i < 4; i++)
 276                         set80211(s, IEEE80211_IOC_WEPKEY, i, 0, data);
 277         }
 278
 279         set80211(s, IEEE80211_IOC_WEPTXKEY, txkey, 0, NULL);
 280 }
 281
 282 void
 283 ieee80211_status (s, info)
 284         int s;
 285         struct rt_addrinfo *info __unused;
 286 {
 287         int                     i;
 288         int                     num;
 289         struct ieee80211req     ireq;
 290         u_int8_t                data[32];
 291         char                    spacer;
 292
 293         (void) memset(&ireq, 0, sizeof(ireq));
 294         (void) strncpy(ireq.i_name, name, sizeof(ireq.i_name));
 295         ireq.i_data = &data;
 296
 297         ireq.i_type = IEEE80211_IOC_SSID;
 298         ireq.i_val = -1;
 299         if (ioctl(s, SIOCG80211, &ireq) < 0) {
 300                 /* If we can't get the SSID, the this isn't an 802.11 device. */
 301                 return;
 302         }
 303         printf("\tssid ");
 304         print_string(data, ireq.i_len);
 305         num = 0;
 306         ireq.i_type = IEEE80211_IOC_NUMSSIDS;
 307         if (ioctl(s, SIOCG80211, &ireq) >= 0) {
 308                 num = ireq.i_val;
 309         }
 310         ireq.i_type = IEEE80211_IOC_SSID;
 311         for (ireq.i_val = 0; ireq.i_val < num; ireq.i_val++) {
 312                 if (ioctl(s, SIOCG80211, &ireq) >= 0 && ireq.i_len > 0) {
 313                         printf(" %d:", ireq.i_val + 1);
 314                         print_string(data, ireq.i_len);
 315                 }
 316         }
 317         printf("\n");
 318
 319         ireq.i_type = IEEE80211_IOC_STATIONNAME;
 320         if (ioctl(s, SIOCG80211, &ireq) != -1) {
 321                 printf("\tstationname ");
 322                 print_string(data, ireq.i_len);
 323                 printf("\n");
 324         }
 325
 326         ireq.i_type = IEEE80211_IOC_CHANNEL;
 327         if (ioctl(s, SIOCG80211, &ireq) < 0) {
 328                 goto end;
 329         }
 330         printf("\tchannel %d", ireq.i_val);
 331
 332         ireq.i_type = IEEE80211_IOC_AUTHMODE;
 333         if (ioctl(s, SIOCG80211, &ireq) != -1) {
 334                 printf(" authmode");
 335                 switch (ireq.i_val) {
 336                         case IEEE80211_AUTH_NONE:
 337                                 printf(" NONE");
 338                                 break;
 339                         case IEEE80211_AUTH_OPEN:
 340                                 printf(" OPEN");
 341                                 break;
 342                         case IEEE80211_AUTH_SHARED:
 343                                 printf(" SHARED");
 344                                 break;
 345                         default:
 346                                 printf(" UNKNOWN");
 347                                 break;
 348                 }
 349         }
 350
 351         ireq.i_type = IEEE80211_IOC_POWERSAVE;
 352         if (ioctl(s, SIOCG80211, &ireq) != -1 &&
 353             ireq.i_val != IEEE80211_POWERSAVE_NOSUP ) {
 354                 printf(" powersavemode");
 355                 switch (ireq.i_val) {
 356                         case IEEE80211_POWERSAVE_OFF:
 357                                 printf(" OFF");
 358                                 break;
 359                         case IEEE80211_POWERSAVE_CAM:
 360                                 printf(" CAM");
 361                                 break;
 362                         case IEEE80211_POWERSAVE_PSP:
 363                                 printf(" PSP");
 364                                 break;
 365                         case IEEE80211_POWERSAVE_PSP_CAM:
 366                                 printf(" PSP-CAM");
 367                                 break;
 368                 }
 369
 370                 ireq.i_type = IEEE80211_IOC_POWERSAVESLEEP;
 371                 if (ioctl(s, SIOCG80211, &ireq) != -1) {
 372                         if(ireq.i_val)
 373                                 printf(" powersavesleep %d", ireq.i_val);
 374                 }
 375         }
 376
 377         printf("\n");
 378
 379         ireq.i_type = IEEE80211_IOC_WEP;
 380         if (ioctl(s, SIOCG80211, &ireq) != -1 &&
 381             ireq.i_val != IEEE80211_WEP_NOSUP) {
 382                 printf("\twepmode");
 383                 switch (ireq.i_val) {
 384                         case IEEE80211_WEP_OFF:
 385                                 printf(" OFF");
 386                                 break;
 387                         case IEEE80211_WEP_ON:
 388                                 printf(" ON");
 389                                 break;
 390                         case IEEE80211_WEP_MIXED:
 391                                 printf(" MIXED");
 392                                 break;
 393                         default:
 394                                 printf(" UNKNOWN");
 395                                 break;
 396                 }
 397
 398                 /*
 399                  * If we get here then we've got WEP support so we need
 400                  * to print WEP status.
 401                  */
 402
 403                 ireq.i_type = IEEE80211_IOC_WEPTXKEY;
 404                 if (ioctl(s, SIOCG80211, &ireq) < 0) {
 405                         warn("WEP support, but no tx key!");
 406                         goto end;
 407                 }
 408                 printf(" weptxkey %d", ireq.i_val+1);
 409
 410                 ireq.i_type = IEEE80211_IOC_NUMWEPKEYS;
 411                 if (ioctl(s, SIOCG80211, &ireq) < 0) {
 412                         warn("WEP support, but no NUMWEPKEYS support!");
 413                         goto end;
 414                 }
 415                 num = ireq.i_val;
 416
 417                 printf("\n");
 418
 419                 ireq.i_type = IEEE80211_IOC_WEPKEY;
 420                 spacer = '\t';
 421                 for(i = 0; i < num; i++) {
 422                         ireq.i_val = i;
 423                         if (ioctl(s, SIOCG80211, &ireq) < 0) {
 424                                 warn("WEP support, but can get keys!");
 425                                 goto end;
 426                         }
 427                         if(ireq.i_len == 0 || ireq.i_len > 13)
 428                                 continue;
 429                         printf("%cwepkey %d:%s", spacer, i+1,
 430                             ireq.i_len <= 5 ? "64-bit" : "128-bit");
 431                         if(spacer == '\t')
 432                                 spacer = ' ';
 433                 }
 434                 if (spacer == ' ')
 435                         printf("\n");
 436         }
 437
 438 end:
 439         return;
 440 }
 441
 442 static void
 443 set80211(int s, int type, int val, int len, u_int8_t *data)
 444 {
 445         struct ieee80211req     ireq;
 446
 447         (void) memset(&ireq, 0, sizeof(ireq));
 448         (void) strncpy(ireq.i_name, name, sizeof(ireq.i_name));
 449         ireq.i_type = type;
 450         ireq.i_val = val;
 451         ireq.i_len = len;
 452         ireq.i_data = data;
 453         if(ioctl(s, SIOCS80211, &ireq) < 0)
 454                 err(1, "SIOCS80211");
 455 }
 456
 457 static const char *
 458 get_string(const char *val, const char *sep, u_int8_t *buf, int *lenp)
 459 {
 460         int len;
 461         int hexstr;
 462         u_int8_t *p;
 463
 464         len = *lenp;
 465         p = buf;
 466         hexstr = (val[0] == '0' && tolower((u_char)val[1]) == 'x');
 467         if (hexstr)
 468                 val += 2;
 469         for (;;) {
 470                 if (*val == '\0')
 471                         break;
 472                 if (sep != NULL && strchr(sep, *val) != NULL) {
 473                         val++;
 474                         break;
 475                 }
 476                 if (hexstr) {
 477                         if (!isxdigit((u_char)val[0]) ||
 478                             !isxdigit((u_char)val[1])) {
 479                                 warnx("bad hexadecimal digits");
 480                                 return NULL;
 481                         }
 482                 }
 483                 if (p > buf + len) {
 484                         if (hexstr)
 485                                 warnx("hexadecimal digits too long");
 486                         else
 487                                 warnx("strings too long");
 488                         return NULL;
 489                 }
 490                 if (hexstr) {
 491 #define tohex(x)        (isdigit(x) ? (x) - '0' : tolower(x) - 'a' + 10)
 492                         *p++ = (tohex((u_char)val[0]) << 4) |
 493                             tohex((u_char)val[1]);
 494 #undef tohex
 495                         val += 2;
 496                 } else
 497                         *p++ = *val++;
 498         }
 499         len = p - buf;
 500         /* The string "-" is treated as the empty string. */
 501         if (!hexstr && len == 1 && buf[0] == '-')
 502                 len = 0;
 503         if (len < *lenp)
 504                 memset(p, 0, *lenp - len);
 505         *lenp = len;
 506         return val;
 507 }
 508
 509 static void
 510 print_string(const u_int8_t *buf, int len)
 511 {
 512         int i;
 513         int hasspc;
 514
 515         i = 0;
 516         hasspc = 0;
 517         for(; i < len; i++) {
 518                 if (!isprint(buf[i]) && buf[i] != '\0')
 519                         break;
 520                 if (isspace(buf[i]))
 521                         hasspc++;
 522         }
 523         if (i == len) {
 524                 if (hasspc || len == 0 || buf[0] == '\0')
 525                         printf("\"%.*s\"", len, buf);
 526                 else
 527                         printf("%.*s", len, buf);
 528         } else {
 529                 printf("0x");
 530                 for (i = 0; i < len; i++)
 531                         printf("%02x", buf[i]);
 532         }
 533 }
 534