net/mac802154/llsec.c

   1 /*
   2  * Copyright (C) 2014 Fraunhofer ITWM
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License version 2
   6  * as published by the Free Software Foundation.
   7  *
   8  * This program is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11  * GNU General Public License for more details.
  12  *
  13  * Written by:
  14  * Phoebe Buckheister <phoebe.buckheister@itwm.fraunhofer.de>
  15  */
  16
  17 #include <linux/err.h>
  18 #include <linux/bug.h>
  19 #include <linux/completion.h>
  20 #include <linux/ieee802154.h>
  21 #include <linux/rculist.h>
  22
  23 #include <crypto/aead.h>
  24 #include <crypto/skcipher.h>
  25
  26 #include "ieee802154_i.h"
  27 #include "llsec.h"
  28
  29 static void llsec_key_put(struct mac802154_llsec_key *key);
  30 static bool llsec_key_id_equal(const struct ieee802154_llsec_key_id *a,
  31                                const struct ieee802154_llsec_key_id *b);
  32
  33 static void llsec_dev_free(struct mac802154_llsec_device *dev);
  34
  35 void mac802154_llsec_init(struct mac802154_llsec *sec)
  36 {
  37         memset(sec, 0, sizeof(*sec));
  38
  39         memset(&sec->params.default_key_source, 0xFF, IEEE802154_ADDR_LEN);
  40
  41         INIT_LIST_HEAD(&sec->table.security_levels);
  42         INIT_LIST_HEAD(&sec->table.devices);
  43         INIT_LIST_HEAD(&sec->table.keys);
  44         hash_init(sec->devices_short);
  45         hash_init(sec->devices_hw);
  46         rwlock_init(&sec->lock);
  47 }
  48
  49 void mac802154_llsec_destroy(struct mac802154_llsec *sec)
  50 {
  51         struct ieee802154_llsec_seclevel *sl, *sn;
  52         struct ieee802154_llsec_device *dev, *dn;
  53         struct ieee802154_llsec_key_entry *key, *kn;
  54
  55         list_for_each_entry_safe(sl, sn, &sec->table.security_levels, list) {
  56                 struct mac802154_llsec_seclevel *msl;
  57
  58                 msl = container_of(sl, struct mac802154_llsec_seclevel, level);
  59                 list_del(&sl->list);
  60                 kzfree(msl);
  61         }
  62
  63         list_for_each_entry_safe(dev, dn, &sec->table.devices, list) {
  64                 struct mac802154_llsec_device *mdev;
  65
  66                 mdev = container_of(dev, struct mac802154_llsec_device, dev);
  67                 list_del(&dev->list);
  68                 llsec_dev_free(mdev);
  69         }
  70
  71         list_for_each_entry_safe(key, kn, &sec->table.keys, list) {
  72                 struct mac802154_llsec_key *mkey;
  73
  74                 mkey = container_of(key->key, struct mac802154_llsec_key, key);
  75                 list_del(&key->list);
  76                 llsec_key_put(mkey);
  77                 kzfree(key);
  78         }
  79 }
  80
  81 int mac802154_llsec_get_params(struct mac802154_llsec *sec,
  82                                struct ieee802154_llsec_params *params)
  83 {
  84         read_lock_bh(&sec->lock);
  85         *params = sec->params;
  86         read_unlock_bh(&sec->lock);
  87
  88         return 0;
  89 }
  90
  91 int mac802154_llsec_set_params(struct mac802154_llsec *sec,
  92                                const struct ieee802154_llsec_params *params,
  93                                int changed)
  94 {
  95         write_lock_bh(&sec->lock);
  96
  97         if (changed & IEEE802154_LLSEC_PARAM_ENABLED)
  98                 sec->params.enabled = params->enabled;
  99         if (changed & IEEE802154_LLSEC_PARAM_FRAME_COUNTER)
 100                 sec->params.frame_counter = params->frame_counter;
 101         if (changed & IEEE802154_LLSEC_PARAM_OUT_LEVEL)
 102                 sec->params.out_level = params->out_level;
 103         if (changed & IEEE802154_LLSEC_PARAM_OUT_KEY)
 104                 sec->params.out_key = params->out_key;
 105         if (changed & IEEE802154_LLSEC_PARAM_KEY_SOURCE)
 106                 sec->params.default_key_source = params->default_key_source;
 107         if (changed & IEEE802154_LLSEC_PARAM_PAN_ID)
 108                 sec->params.pan_id = params->pan_id;
 109         if (changed & IEEE802154_LLSEC_PARAM_HWADDR)
 110                 sec->params.hwaddr = params->hwaddr;
 111         if (changed & IEEE802154_LLSEC_PARAM_COORD_HWADDR)
 112                 sec->params.coord_hwaddr = params->coord_hwaddr;
 113         if (changed & IEEE802154_LLSEC_PARAM_COORD_SHORTADDR)
 114                 sec->params.coord_shortaddr = params->coord_shortaddr;
 115
 116         write_unlock_bh(&sec->lock);
 117
 118         return 0;
 119 }
 120
 121 static struct mac802154_llsec_key*
 122 llsec_key_alloc(const struct ieee802154_llsec_key *template)
 123 {
 124         const int authsizes[3] = { 4, 8, 16 };
 125         struct mac802154_llsec_key *key;
 126         int i;
 127
 128         key = kzalloc(sizeof(*key), GFP_KERNEL);
 129         if (!key)
 130                 return NULL;
 131
 132         kref_init(&key->ref);
 133         key->key = *template;
 134
 135         BUILD_BUG_ON(ARRAY_SIZE(authsizes) != ARRAY_SIZE(key->tfm));
 136
 137         for (i = 0; i < ARRAY_SIZE(key->tfm); i++) {
 138                 key->tfm[i] = crypto_alloc_aead("ccm(aes)", 0,
 139                                                 CRYPTO_ALG_ASYNC);
 140                 if (IS_ERR(key->tfm[i]))
 141                         goto err_tfm;
 142                 if (crypto_aead_setkey(key->tfm[i], template->key,
 143                                        IEEE802154_LLSEC_KEY_SIZE))
 144                         goto err_tfm;
 145                 if (crypto_aead_setauthsize(key->tfm[i], authsizes[i]))
 146                         goto err_tfm;
 147         }
 148
 149         key->tfm0 = crypto_alloc_skcipher("ctr(aes)", 0, CRYPTO_ALG_ASYNC);
 150         if (IS_ERR(key->tfm0))
 151                 goto err_tfm;
 152
 153         if (crypto_skcipher_setkey(key->tfm0, template->key,
 154                                    IEEE802154_LLSEC_KEY_SIZE))
 155                 goto err_tfm0;
 156
 157         return key;
 158
 159 err_tfm0:
 160         crypto_free_skcipher(key->tfm0);
 161 err_tfm:
 162         for (i = 0; i < ARRAY_SIZE(key->tfm); i++)
 163                 if (key->tfm[i])
 164                         crypto_free_aead(key->tfm[i]);
 165
 166         kzfree(key);
 167         return NULL;
 168 }
 169
 170 static void llsec_key_release(struct kref *ref)
 171 {
 172         struct mac802154_llsec_key *key;
 173         int i;
 174
 175         key = container_of(ref, struct mac802154_llsec_key, ref);
 176
 177         for (i = 0; i < ARRAY_SIZE(key->tfm); i++)
 178                 crypto_free_aead(key->tfm[i]);
 179
 180         crypto_free_skcipher(key->tfm0);
 181         kzfree(key);
 182 }
 183
 184 static struct mac802154_llsec_key*
 185 llsec_key_get(struct mac802154_llsec_key *key)
 186 {
 187         kref_get(&key->ref);
 188         return key;
 189 }
 190
 191 static void llsec_key_put(struct mac802154_llsec_key *key)
 192 {
 193         kref_put(&key->ref, llsec_key_release);
 194 }
 195
 196 static bool llsec_key_id_equal(const struct ieee802154_llsec_key_id *a,
 197                                const struct ieee802154_llsec_key_id *b)
 198 {
 199         if (a->mode != b->mode)
 200                 return false;
 201
 202         if (a->mode == IEEE802154_SCF_KEY_IMPLICIT)
 203                 return ieee802154_addr_equal(&a->device_addr, &b->device_addr);
 204
 205         if (a->id != b->id)
 206                 return false;
 207
 208         switch (a->mode) {
 209         case IEEE802154_SCF_KEY_INDEX:
 210                 return true;
 211         case IEEE802154_SCF_KEY_SHORT_INDEX:
 212                 return a->short_source == b->short_source;
 213         case IEEE802154_SCF_KEY_HW_INDEX:
 214                 return a->extended_source == b->extended_source;
 215         }
 216
 217         return false;
 218 }
 219
 220 int mac802154_llsec_key_add(struct mac802154_llsec *sec,
 221                             const struct ieee802154_llsec_key_id *id,
 222                             const struct ieee802154_llsec_key *key)
 223 {
 224         struct mac802154_llsec_key *mkey = NULL;
 225         struct ieee802154_llsec_key_entry *pos, *new;
 226
 227         if (!(key->frame_types & (1 << IEEE802154_FC_TYPE_MAC_CMD)) &&
 228             key->cmd_frame_ids)
 229                 return -EINVAL;
 230
 231         list_for_each_entry(pos, &sec->table.keys, list) {
 232                 if (llsec_key_id_equal(&pos->id, id))
 233                         return -EEXIST;
 234
 235                 if (memcmp(pos->key->key, key->key,
 236                            IEEE802154_LLSEC_KEY_SIZE))
 237                         continue;
 238
 239                 mkey = container_of(pos->key, struct mac802154_llsec_key, key);
 240
 241                 /* Don't allow multiple instances of the same AES key to have
 242                  * different allowed frame types/command frame ids, as this is
 243                  * not possible in the 802.15.4 PIB.
 244                  */
 245                 if (pos->key->frame_types != key->frame_types ||
 246                     pos->key->cmd_frame_ids != key->cmd_frame_ids)
 247                         return -EEXIST;
 248
 249                 break;
 250         }
 251
 252         new = kzalloc(sizeof(*new), GFP_KERNEL);
 253         if (!new)
 254                 return -ENOMEM;
 255
 256         if (!mkey)
 257                 mkey = llsec_key_alloc(key);
 258         else
 259                 mkey = llsec_key_get(mkey);
 260
 261         if (!mkey)
 262                 goto fail;
 263
 264         new->id = *id;
 265         new->key = &mkey->key;
 266
 267         list_add_rcu(&new->list, &sec->table.keys);
 268
 269         return 0;
 270
 271 fail:
 272         kzfree(new);
 273         return -ENOMEM;
 274 }
 275
 276 int mac802154_llsec_key_del(struct mac802154_llsec *sec,
 277                             const struct ieee802154_llsec_key_id *key)
 278 {
 279         struct ieee802154_llsec_key_entry *pos;
 280
 281         list_for_each_entry(pos, &sec->table.keys, list) {
 282                 struct mac802154_llsec_key *mkey;
 283
 284                 mkey = container_of(pos->key, struct mac802154_llsec_key, key);
 285
 286                 if (llsec_key_id_equal(&pos->id, key)) {
 287                         list_del_rcu(&pos->list);
 288                         llsec_key_put(mkey);
 289                         return 0;
 290                 }
 291         }
 292
 293         return -ENOENT;
 294 }
 295
 296 static bool llsec_dev_use_shortaddr(__le16 short_addr)
 297 {
 298         return short_addr != cpu_to_le16(IEEE802154_ADDR_UNDEF) &&
 299                 short_addr != cpu_to_le16(0xffff);
 300 }
 301
 302 static u32 llsec_dev_hash_short(__le16 short_addr, __le16 pan_id)
 303 {
 304         return ((__force u16)short_addr) << 16 | (__force u16)pan_id;
 305 }
 306
 307 static u64 llsec_dev_hash_long(__le64 hwaddr)
 308 {
 309         return (__force u64)hwaddr;
 310 }
 311
 312 static struct mac802154_llsec_device*
 313 llsec_dev_find_short(struct mac802154_llsec *sec, __le16 short_addr,
 314                      __le16 pan_id)
 315 {
 316         struct mac802154_llsec_device *dev;
 317         u32 key = llsec_dev_hash_short(short_addr, pan_id);
 318
 319         hash_for_each_possible_rcu(sec->devices_short, dev, bucket_s, key) {
 320                 if (dev->dev.short_addr == short_addr &&
 321                     dev->dev.pan_id == pan_id)
 322                         return dev;
 323         }
 324
 325         return NULL;
 326 }
 327
 328 static struct mac802154_llsec_device*
 329 llsec_dev_find_long(struct mac802154_llsec *sec, __le64 hwaddr)
 330 {
 331         struct mac802154_llsec_device *dev;
 332         u64 key = llsec_dev_hash_long(hwaddr);
 333
 334         hash_for_each_possible_rcu(sec->devices_hw, dev, bucket_hw, key) {
 335                 if (dev->dev.hwaddr == hwaddr)
 336                         return dev;
 337         }
 338
 339         return NULL;
 340 }
 341
 342 static void llsec_dev_free(struct mac802154_llsec_device *dev)
 343 {
 344         struct ieee802154_llsec_device_key *pos, *pn;
 345         struct mac802154_llsec_device_key *devkey;
 346
 347         list_for_each_entry_safe(pos, pn, &dev->dev.keys, list) {
 348                 devkey = container_of(pos, struct mac802154_llsec_device_key,
 349                                       devkey);
 350
 351                 list_del(&pos->list);
 352                 kzfree(devkey);
 353         }
 354
 355         kzfree(dev);
 356 }
 357
 358 int mac802154_llsec_dev_add(struct mac802154_llsec *sec,
 359                             const struct ieee802154_llsec_device *dev)
 360 {
 361         struct mac802154_llsec_device *entry;
 362         u32 skey = llsec_dev_hash_short(dev->short_addr, dev->pan_id);
 363         u64 hwkey = llsec_dev_hash_long(dev->hwaddr);
 364
 365         BUILD_BUG_ON(sizeof(hwkey) != IEEE802154_ADDR_LEN);
 366
 367         if ((llsec_dev_use_shortaddr(dev->short_addr) &&
 368              llsec_dev_find_short(sec, dev->short_addr, dev->pan_id)) ||
 369              llsec_dev_find_long(sec, dev->hwaddr))
 370                 return -EEXIST;
 371
 372         entry = kmalloc(sizeof(*entry), GFP_KERNEL);
 373         if (!entry)
 374                 return -ENOMEM;
 375
 376         entry->dev = *dev;
 377         spin_lock_init(&entry->lock);
 378         INIT_LIST_HEAD(&entry->dev.keys);
 379
 380         if (llsec_dev_use_shortaddr(dev->short_addr))
 381                 hash_add_rcu(sec->devices_short, &entry->bucket_s, skey);
 382         else
 383                 INIT_HLIST_NODE(&entry->bucket_s);
 384
 385         hash_add_rcu(sec->devices_hw, &entry->bucket_hw, hwkey);
 386         list_add_tail_rcu(&entry->dev.list, &sec->table.devices);
 387
 388         return 0;
 389 }
 390
 391 static void llsec_dev_free_rcu(struct rcu_head *rcu)
 392 {
 393         llsec_dev_free(container_of(rcu, struct mac802154_llsec_device, rcu));
 394 }
 395
 396 int mac802154_llsec_dev_del(struct mac802154_llsec *sec, __le64 device_addr)
 397 {
 398         struct mac802154_llsec_device *pos;
 399
 400         pos = llsec_dev_find_long(sec, device_addr);
 401         if (!pos)
 402                 return -ENOENT;
 403
 404         hash_del_rcu(&pos->bucket_s);
 405         hash_del_rcu(&pos->bucket_hw);
 406         list_del_rcu(&pos->dev.list);
 407         call_rcu(&pos->rcu, llsec_dev_free_rcu);
 408
 409         return 0;
 410 }
 411
 412 static struct mac802154_llsec_device_key*
 413 llsec_devkey_find(struct mac802154_llsec_device *dev,
 414                   const struct ieee802154_llsec_key_id *key)
 415 {
 416         struct ieee802154_llsec_device_key *devkey;
 417
 418         list_for_each_entry_rcu(devkey, &dev->dev.keys, list) {
 419                 if (!llsec_key_id_equal(key, &devkey->key_id))
 420                         continue;
 421
 422                 return container_of(devkey, struct mac802154_llsec_device_key,
 423                                     devkey);
 424         }
 425
 426         return NULL;
 427 }
 428
 429 int mac802154_llsec_devkey_add(struct mac802154_llsec *sec,
 430                                __le64 dev_addr,
 431                                const struct ieee802154_llsec_device_key *key)
 432 {
 433         struct mac802154_llsec_device *dev;
 434         struct mac802154_llsec_device_key *devkey;
 435
 436         dev = llsec_dev_find_long(sec, dev_addr);
 437
 438         if (!dev)
 439                 return -ENOENT;
 440
 441         if (llsec_devkey_find(dev, &key->key_id))
 442                 return -EEXIST;
 443
 444         devkey = kmalloc(sizeof(*devkey), GFP_KERNEL);
 445         if (!devkey)
 446                 return -ENOMEM;
 447
 448         devkey->devkey = *key;
 449         list_add_tail_rcu(&devkey->devkey.list, &dev->dev.keys);
 450         return 0;
 451 }
 452
 453 int mac802154_llsec_devkey_del(struct mac802154_llsec *sec,
 454                                __le64 dev_addr,
 455                                const struct ieee802154_llsec_device_key *key)
 456 {
 457         struct mac802154_llsec_device *dev;
 458         struct mac802154_llsec_device_key *devkey;
 459
 460         dev = llsec_dev_find_long(sec, dev_addr);
 461
 462         if (!dev)
 463                 return -ENOENT;
 464
 465         devkey = llsec_devkey_find(dev, &key->key_id);
 466         if (!devkey)
 467                 return -ENOENT;
 468
 469         list_del_rcu(&devkey->devkey.list);
 470         kfree_rcu(devkey, rcu);
 471         return 0;
 472 }
 473
 474 static struct mac802154_llsec_seclevel*
 475 llsec_find_seclevel(const struct mac802154_llsec *sec,
 476                     const struct ieee802154_llsec_seclevel *sl)
 477 {
 478         struct ieee802154_llsec_seclevel *pos;
 479
 480         list_for_each_entry(pos, &sec->table.security_levels, list) {
 481                 if (pos->frame_type != sl->frame_type ||
 482                     (pos->frame_type == IEEE802154_FC_TYPE_MAC_CMD &&
 483                      pos->cmd_frame_id != sl->cmd_frame_id) ||
 484                     pos->device_override != sl->device_override ||
 485                     pos->sec_levels != sl->sec_levels)
 486                         continue;
 487
 488                 return container_of(pos, struct mac802154_llsec_seclevel,
 489                                     level);
 490         }
 491
 492         return NULL;
 493 }
 494
 495 int mac802154_llsec_seclevel_add(struct mac802154_llsec *sec,
 496                                  const struct ieee802154_llsec_seclevel *sl)
 497 {
 498         struct mac802154_llsec_seclevel *entry;
 499
 500         if (llsec_find_seclevel(sec, sl))
 501                 return -EEXIST;
 502
 503         entry = kmalloc(sizeof(*entry), GFP_KERNEL);
 504         if (!entry)
 505                 return -ENOMEM;
 506
 507         entry->level = *sl;
 508
 509         list_add_tail_rcu(&entry->level.list, &sec->table.security_levels);
 510
 511         return 0;
 512 }
 513
 514 int mac802154_llsec_seclevel_del(struct mac802154_llsec *sec,
 515                                  const struct ieee802154_llsec_seclevel *sl)
 516 {
 517         struct mac802154_llsec_seclevel *pos;
 518
 519         pos = llsec_find_seclevel(sec, sl);
 520         if (!pos)
 521                 return -ENOENT;
 522
 523         list_del_rcu(&pos->level.list);
 524         kfree_rcu(pos, rcu);
 525
 526         return 0;
 527 }
 528
 529 static int llsec_recover_addr(struct mac802154_llsec *sec,
 530                               struct ieee802154_addr *addr)
 531 {
 532         __le16 caddr = sec->params.coord_shortaddr;
 533
 534         addr->pan_id = sec->params.pan_id;
 535
 536         if (caddr == cpu_to_le16(IEEE802154_ADDR_BROADCAST)) {
 537                 return -EINVAL;
 538         } else if (caddr == cpu_to_le16(IEEE802154_ADDR_UNDEF)) {
 539                 addr->extended_addr = sec->params.coord_hwaddr;
 540                 addr->mode = IEEE802154_ADDR_LONG;
 541         } else {
 542                 addr->short_addr = sec->params.coord_shortaddr;
 543                 addr->mode = IEEE802154_ADDR_SHORT;
 544         }
 545
 546         return 0;
 547 }
 548
 549 static struct mac802154_llsec_key*
 550 llsec_lookup_key(struct mac802154_llsec *sec,
 551                  const struct ieee802154_hdr *hdr,
 552                  const struct ieee802154_addr *addr,
 553                  struct ieee802154_llsec_key_id *key_id)
 554 {
 555         struct ieee802154_addr devaddr = *addr;
 556         u8 key_id_mode = hdr->sec.key_id_mode;
 557         struct ieee802154_llsec_key_entry *key_entry;
 558         struct mac802154_llsec_key *key;
 559
 560         if (key_id_mode == IEEE802154_SCF_KEY_IMPLICIT &&
 561             devaddr.mode == IEEE802154_ADDR_NONE) {
 562                 if (hdr->fc.type == IEEE802154_FC_TYPE_BEACON) {
 563                         devaddr.extended_addr = sec->params.coord_hwaddr;
 564                         devaddr.mode = IEEE802154_ADDR_LONG;
 565                 } else if (llsec_recover_addr(sec, &devaddr) < 0) {
 566                         return NULL;
 567                 }
 568         }
 569
 570         list_for_each_entry_rcu(key_entry, &sec->table.keys, list) {
 571                 const struct ieee802154_llsec_key_id *id = &key_entry->id;
 572
 573                 if (!(key_entry->key->frame_types & BIT(hdr->fc.type)))
 574                         continue;
 575
 576                 if (id->mode != key_id_mode)
 577                         continue;
 578
 579                 if (key_id_mode == IEEE802154_SCF_KEY_IMPLICIT) {
 580                         if (ieee802154_addr_equal(&devaddr, &id->device_addr))
 581                                 goto found;
 582                 } else {
 583                         if (id->id != hdr->sec.key_id)
 584                                 continue;
 585
 586                         if ((key_id_mode == IEEE802154_SCF_KEY_INDEX) ||
 587                             (key_id_mode == IEEE802154_SCF_KEY_SHORT_INDEX &&
 588                              id->short_source == hdr->sec.short_src) ||
 589                             (key_id_mode == IEEE802154_SCF_KEY_HW_INDEX &&
 590                              id->extended_source == hdr->sec.extended_src))
 591                                 goto found;
 592                 }
 593         }
 594
 595         return NULL;
 596
 597 found:
 598         key = container_of(key_entry->key, struct mac802154_llsec_key, key);
 599         if (key_id)
 600                 *key_id = key_entry->id;
 601         return llsec_key_get(key);
 602 }
 603
 604 static void llsec_geniv(u8 iv[16], __le64 addr,
 605                         const struct ieee802154_sechdr *sec)
 606 {
 607         __be64 addr_bytes = (__force __be64) swab64((__force u64) addr);
 608         __be32 frame_counter = (__force __be32) swab32((__force u32) sec->frame_counter);
 609
 610         iv[0] = 1; /* L' = L - 1 = 1 */
 611         memcpy(iv + 1, &addr_bytes, sizeof(addr_bytes));
 612         memcpy(iv + 9, &frame_counter, sizeof(frame_counter));
 613         iv[13] = sec->level;
 614         iv[14] = 0;
 615         iv[15] = 1;
 616 }
 617
 618 static int
 619 llsec_do_encrypt_unauth(struct sk_buff *skb, const struct mac802154_llsec *sec,
 620                         const struct ieee802154_hdr *hdr,
 621                         struct mac802154_llsec_key *key)
 622 {
 623         u8 iv[16];
 624         struct scatterlist src;
 625         SKCIPHER_REQUEST_ON_STACK(req, key->tfm0);
 626         int err, datalen;
 627         unsigned char *data;
 628
 629         llsec_geniv(iv, sec->params.hwaddr, &hdr->sec);
 630         /* Compute data payload offset and data length */
 631         data = skb_mac_header(skb) + skb->mac_len;
 632         datalen = skb_tail_pointer(skb) - data;
 633         sg_init_one(&src, data, datalen);
 634
 635         skcipher_request_set_tfm(req, key->tfm0);
 636         skcipher_request_set_callback(req, 0, NULL, NULL);
 637         skcipher_request_set_crypt(req, &src, &src, datalen, iv);
 638         err = crypto_skcipher_encrypt(req);
 639         skcipher_request_zero(req);
 640         return err;
 641 }
 642
 643 static struct crypto_aead*
 644 llsec_tfm_by_len(struct mac802154_llsec_key *key, int authlen)
 645 {
 646         int i;
 647
 648         for (i = 0; i < ARRAY_SIZE(key->tfm); i++)
 649                 if (crypto_aead_authsize(key->tfm[i]) == authlen)
 650                         return key->tfm[i];
 651
 652         BUG();
 653 }
 654
 655 static int
 656 llsec_do_encrypt_auth(struct sk_buff *skb, const struct mac802154_llsec *sec,
 657                       const struct ieee802154_hdr *hdr,
 658                       struct mac802154_llsec_key *key)
 659 {
 660         u8 iv[16];
 661         unsigned char *data;
 662         int authlen, assoclen, datalen, rc;
 663         struct scatterlist sg;
 664         struct aead_request *req;
 665
 666         authlen = ieee802154_sechdr_authtag_len(&hdr->sec);
 667         llsec_geniv(iv, sec->params.hwaddr, &hdr->sec);
 668
 669         req = aead_request_alloc(llsec_tfm_by_len(key, authlen), GFP_ATOMIC);
 670         if (!req)
 671                 return -ENOMEM;
 672
 673         assoclen = skb->mac_len;
 674
 675         data = skb_mac_header(skb) + skb->mac_len;
 676         datalen = skb_tail_pointer(skb) - data;
 677
 678         skb_put(skb, authlen);
 679
 680         sg_init_one(&sg, skb_mac_header(skb), assoclen + datalen + authlen);
 681
 682         if (!(hdr->sec.level & IEEE802154_SCF_SECLEVEL_ENC)) {
 683                 assoclen += datalen;
 684                 datalen = 0;
 685         }
 686
 687         aead_request_set_callback(req, 0, NULL, NULL);
 688         aead_request_set_crypt(req, &sg, &sg, datalen, iv);
 689         aead_request_set_ad(req, assoclen);
 690
 691         rc = crypto_aead_encrypt(req);
 692
 693         kzfree(req);
 694
 695         return rc;
 696 }
 697
 698 static int llsec_do_encrypt(struct sk_buff *skb,
 699                             const struct mac802154_llsec *sec,
 700                             const struct ieee802154_hdr *hdr,
 701                             struct mac802154_llsec_key *key)
 702 {
 703         if (hdr->sec.level == IEEE802154_SCF_SECLEVEL_ENC)
 704                 return llsec_do_encrypt_unauth(skb, sec, hdr, key);
 705         else
 706                 return llsec_do_encrypt_auth(skb, sec, hdr, key);
 707 }
 708
 709 int mac802154_llsec_encrypt(struct mac802154_llsec *sec, struct sk_buff *skb)
 710 {
 711         struct ieee802154_hdr hdr;
 712         int rc, authlen, hlen;
 713         struct mac802154_llsec_key *key;
 714         u32 frame_ctr;
 715
 716         hlen = ieee802154_hdr_pull(skb, &hdr);
 717
 718         if (hlen < 0 || hdr.fc.type != IEEE802154_FC_TYPE_DATA)
 719                 return -EINVAL;
 720
 721         if (!hdr.fc.security_enabled ||
 722             (hdr.sec.level == IEEE802154_SCF_SECLEVEL_NONE)) {
 723                 skb_push(skb, hlen);
 724                 return 0;
 725         }
 726
 727         authlen = ieee802154_sechdr_authtag_len(&hdr.sec);
 728
 729         if (skb->len + hlen + authlen + IEEE802154_MFR_SIZE > IEEE802154_MTU)
 730                 return -EMSGSIZE;
 731
 732         rcu_read_lock();
 733
 734         read_lock_bh(&sec->lock);
 735
 736         if (!sec->params.enabled) {
 737                 rc = -EINVAL;
 738                 goto fail_read;
 739         }
 740
 741         key = llsec_lookup_key(sec, &hdr, &hdr.dest, NULL);
 742         if (!key) {
 743                 rc = -ENOKEY;
 744                 goto fail_read;
 745         }
 746
 747         read_unlock_bh(&sec->lock);
 748
 749         write_lock_bh(&sec->lock);
 750
 751         frame_ctr = be32_to_cpu(sec->params.frame_counter);
 752         hdr.sec.frame_counter = cpu_to_le32(frame_ctr);
 753         if (frame_ctr == 0xFFFFFFFF) {
 754                 write_unlock_bh(&sec->lock);
 755                 llsec_key_put(key);
 756                 rc = -EOVERFLOW;
 757                 goto fail;
 758         }
 759
 760         sec->params.frame_counter = cpu_to_be32(frame_ctr + 1);
 761
 762         write_unlock_bh(&sec->lock);
 763
 764         rcu_read_unlock();
 765
 766         skb->mac_len = ieee802154_hdr_push(skb, &hdr);
 767         skb_reset_mac_header(skb);
 768
 769         rc = llsec_do_encrypt(skb, sec, &hdr, key);
 770         llsec_key_put(key);
 771
 772         return rc;
 773
 774 fail_read:
 775         read_unlock_bh(&sec->lock);
 776 fail:
 777         rcu_read_unlock();
 778         return rc;
 779 }
 780
 781 static struct mac802154_llsec_device*
 782 llsec_lookup_dev(struct mac802154_llsec *sec,
 783                  const struct ieee802154_addr *addr)
 784 {
 785         struct ieee802154_addr devaddr = *addr;
 786         struct mac802154_llsec_device *dev = NULL;
 787
 788         if (devaddr.mode == IEEE802154_ADDR_NONE &&
 789             llsec_recover_addr(sec, &devaddr) < 0)
 790                 return NULL;
 791
 792         if (devaddr.mode == IEEE802154_ADDR_SHORT) {
 793                 u32 key = llsec_dev_hash_short(devaddr.short_addr,
 794                                                devaddr.pan_id);
 795
 796                 hash_for_each_possible_rcu(sec->devices_short, dev,
 797                                            bucket_s, key) {
 798                         if (dev->dev.pan_id == devaddr.pan_id &&
 799                             dev->dev.short_addr == devaddr.short_addr)
 800                                 return dev;
 801                 }
 802         } else {
 803                 u64 key = llsec_dev_hash_long(devaddr.extended_addr);
 804
 805                 hash_for_each_possible_rcu(sec->devices_hw, dev,
 806                                            bucket_hw, key) {
 807                         if (dev->dev.hwaddr == devaddr.extended_addr)
 808                                 return dev;
 809                 }
 810         }
 811
 812         return NULL;
 813 }
 814
 815 static int
 816 llsec_lookup_seclevel(const struct mac802154_llsec *sec,
 817                       u8 frame_type, u8 cmd_frame_id,
 818                       struct ieee802154_llsec_seclevel *rlevel)
 819 {
 820         struct ieee802154_llsec_seclevel *level;
 821
 822         list_for_each_entry_rcu(level, &sec->table.security_levels, list) {
 823                 if (level->frame_type == frame_type &&
 824                     (frame_type != IEEE802154_FC_TYPE_MAC_CMD ||
 825                      level->cmd_frame_id == cmd_frame_id)) {
 826                         *rlevel = *level;
 827                         return 0;
 828                 }
 829         }
 830
 831         return -EINVAL;
 832 }
 833
 834 static int
 835 llsec_do_decrypt_unauth(struct sk_buff *skb, const struct mac802154_llsec *sec,
 836                         const struct ieee802154_hdr *hdr,
 837                         struct mac802154_llsec_key *key, __le64 dev_addr)
 838 {
 839         u8 iv[16];
 840         unsigned char *data;
 841         int datalen;
 842         struct scatterlist src;
 843         SKCIPHER_REQUEST_ON_STACK(req, key->tfm0);
 844         int err;
 845
 846         llsec_geniv(iv, dev_addr, &hdr->sec);
 847         data = skb_mac_header(skb) + skb->mac_len;
 848         datalen = skb_tail_pointer(skb) - data;
 849
 850         sg_init_one(&src, data, datalen);
 851
 852         skcipher_request_set_tfm(req, key->tfm0);
 853         skcipher_request_set_callback(req, 0, NULL, NULL);
 854         skcipher_request_set_crypt(req, &src, &src, datalen, iv);
 855
 856         err = crypto_skcipher_decrypt(req);
 857         skcipher_request_zero(req);
 858         return err;
 859 }
 860
 861 static int
 862 llsec_do_decrypt_auth(struct sk_buff *skb, const struct mac802154_llsec *sec,
 863                       const struct ieee802154_hdr *hdr,
 864                       struct mac802154_llsec_key *key, __le64 dev_addr)
 865 {
 866         u8 iv[16];
 867         unsigned char *data;
 868         int authlen, datalen, assoclen, rc;
 869         struct scatterlist sg;
 870         struct aead_request *req;
 871
 872         authlen = ieee802154_sechdr_authtag_len(&hdr->sec);
 873         llsec_geniv(iv, dev_addr, &hdr->sec);
 874
 875         req = aead_request_alloc(llsec_tfm_by_len(key, authlen), GFP_ATOMIC);
 876         if (!req)
 877                 return -ENOMEM;
 878
 879         assoclen = skb->mac_len;
 880
 881         data = skb_mac_header(skb) + skb->mac_len;
 882         datalen = skb_tail_pointer(skb) - data;
 883
 884         sg_init_one(&sg, skb_mac_header(skb), assoclen + datalen);
 885
 886         if (!(hdr->sec.level & IEEE802154_SCF_SECLEVEL_ENC)) {
 887                 assoclen += datalen - authlen;
 888                 datalen = authlen;
 889         }
 890
 891         aead_request_set_callback(req, 0, NULL, NULL);
 892         aead_request_set_crypt(req, &sg, &sg, datalen, iv);
 893         aead_request_set_ad(req, assoclen);
 894
 895         rc = crypto_aead_decrypt(req);
 896
 897         kzfree(req);
 898         skb_trim(skb, skb->len - authlen);
 899
 900         return rc;
 901 }
 902
 903 static int
 904 llsec_do_decrypt(struct sk_buff *skb, const struct mac802154_llsec *sec,
 905                  const struct ieee802154_hdr *hdr,
 906                  struct mac802154_llsec_key *key, __le64 dev_addr)
 907 {
 908         if (hdr->sec.level == IEEE802154_SCF_SECLEVEL_ENC)
 909                 return llsec_do_decrypt_unauth(skb, sec, hdr, key, dev_addr);
 910         else
 911                 return llsec_do_decrypt_auth(skb, sec, hdr, key, dev_addr);
 912 }
 913
 914 static int
 915 llsec_update_devkey_record(struct mac802154_llsec_device *dev,
 916                            const struct ieee802154_llsec_key_id *in_key)
 917 {
 918         struct mac802154_llsec_device_key *devkey;
 919
 920         devkey = llsec_devkey_find(dev, in_key);
 921
 922         if (!devkey) {
 923                 struct mac802154_llsec_device_key *next;
 924
 925                 next = kzalloc(sizeof(*devkey), GFP_ATOMIC);
 926                 if (!next)
 927                         return -ENOMEM;
 928
 929                 next->devkey.key_id = *in_key;
 930
 931                 spin_lock_bh(&dev->lock);
 932
 933                 devkey = llsec_devkey_find(dev, in_key);
 934                 if (!devkey)
 935                         list_add_rcu(&next->devkey.list, &dev->dev.keys);
 936                 else
 937                         kzfree(next);
 938
 939                 spin_unlock_bh(&dev->lock);
 940         }
 941
 942         return 0;
 943 }
 944
 945 static int
 946 llsec_update_devkey_info(struct mac802154_llsec_device *dev,
 947                          const struct ieee802154_llsec_key_id *in_key,
 948                          u32 frame_counter)
 949 {
 950         struct mac802154_llsec_device_key *devkey = NULL;
 951
 952         if (dev->dev.key_mode == IEEE802154_LLSEC_DEVKEY_RESTRICT) {
 953                 devkey = llsec_devkey_find(dev, in_key);
 954                 if (!devkey)
 955                         return -ENOENT;
 956         }
 957
 958         if (dev->dev.key_mode == IEEE802154_LLSEC_DEVKEY_RECORD) {
 959                 int rc = llsec_update_devkey_record(dev, in_key);
 960
 961                 if (rc < 0)
 962                         return rc;
 963         }
 964
 965         spin_lock_bh(&dev->lock);
 966
 967         if ((!devkey && frame_counter < dev->dev.frame_counter) ||
 968             (devkey && frame_counter < devkey->devkey.frame_counter)) {
 969                 spin_unlock_bh(&dev->lock);
 970                 return -EINVAL;
 971         }
 972
 973         if (devkey)
 974                 devkey->devkey.frame_counter = frame_counter + 1;
 975         else
 976                 dev->dev.frame_counter = frame_counter + 1;
 977
 978         spin_unlock_bh(&dev->lock);
 979
 980         return 0;
 981 }
 982
 983 int mac802154_llsec_decrypt(struct mac802154_llsec *sec, struct sk_buff *skb)
 984 {
 985         struct ieee802154_hdr hdr;
 986         struct mac802154_llsec_key *key;
 987         struct ieee802154_llsec_key_id key_id;
 988         struct mac802154_llsec_device *dev;
 989         struct ieee802154_llsec_seclevel seclevel;
 990         int err;
 991         __le64 dev_addr;
 992         u32 frame_ctr;
 993
 994         if (ieee802154_hdr_peek(skb, &hdr) < 0)
 995                 return -EINVAL;
 996         if (!hdr.fc.security_enabled)
 997                 return 0;
 998         if (hdr.fc.version == 0)
 999                 return -EINVAL;
1000
1001         read_lock_bh(&sec->lock);
1002         if (!sec->params.enabled) {
1003                 read_unlock_bh(&sec->lock);
1004                 return -EINVAL;
1005         }
1006         read_unlock_bh(&sec->lock);
1007
1008         rcu_read_lock();
1009
1010         key = llsec_lookup_key(sec, &hdr, &hdr.source, &key_id);
1011         if (!key) {
1012                 err = -ENOKEY;
1013                 goto fail;
1014         }
1015
1016         dev = llsec_lookup_dev(sec, &hdr.source);
1017         if (!dev) {
1018                 err = -EINVAL;
1019                 goto fail_dev;
1020         }
1021
1022         if (llsec_lookup_seclevel(sec, hdr.fc.type, 0, &seclevel) < 0) {
1023                 err = -EINVAL;
1024                 goto fail_dev;
1025         }
1026
1027         if (!(seclevel.sec_levels & BIT(hdr.sec.level)) &&
1028             (hdr.sec.level == 0 && seclevel.device_override &&
1029              !dev->dev.seclevel_exempt)) {
1030                 err = -EINVAL;
1031                 goto fail_dev;
1032         }
1033
1034         frame_ctr = le32_to_cpu(hdr.sec.frame_counter);
1035
1036         if (frame_ctr == 0xffffffff) {
1037                 err = -EOVERFLOW;
1038                 goto fail_dev;
1039         }
1040
1041         err = llsec_update_devkey_info(dev, &key_id, frame_ctr);
1042         if (err)
1043                 goto fail_dev;
1044
1045         dev_addr = dev->dev.hwaddr;
1046
1047         rcu_read_unlock();
1048
1049         err = llsec_do_decrypt(skb, sec, &hdr, key, dev_addr);
1050         llsec_key_put(key);
1051         return err;
1052
1053 fail_dev:
1054         llsec_key_put(key);
1055 fail:
1056         rcu_read_unlock();
1057         return err;
1058 }