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