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