drivers/crypto/geode-aes.c

   1  /* Copyright (C) 2004-2006, Advanced Micro Devices, Inc.
   2  *
   3  * This program is free software; you can redistribute it and/or modify
   4  * it under the terms of the GNU General Public License as published by
   5  * the Free Software Foundation; either version 2 of the License, or
   6  * (at your option) any later version.
   7  */
   8
   9 #include <linux/module.h>
  10 #include <linux/kernel.h>
  11 #include <linux/pci.h>
  12 #include <linux/pci_ids.h>
  13 #include <linux/crypto.h>
  14 #include <linux/spinlock.h>
  15 #include <crypto/algapi.h>
  16 #include <crypto/aes.h>
  17
  18 #include <asm/io.h>
  19 #include <asm/delay.h>
  20
  21 #include "geode-aes.h"
  22
  23 /* Static structures */
  24
  25 static void __iomem * _iobase;
  26 static spinlock_t lock;
  27
  28 /* Write a 128 bit field (either a writable key or IV) */
  29 static inline void
  30 _writefield(u32 offset, void *value)
  31 {
  32         int i;
  33         for(i = 0; i < 4; i++)
  34                 iowrite32(((u32 *) value)[i], _iobase + offset + (i * 4));
  35 }
  36
  37 /* Read a 128 bit field (either a writable key or IV) */
  38 static inline void
  39 _readfield(u32 offset, void *value)
  40 {
  41         int i;
  42         for(i = 0; i < 4; i++)
  43                 ((u32 *) value)[i] = ioread32(_iobase + offset + (i * 4));
  44 }
  45
  46 static int
  47 do_crypt(void *src, void *dst, int len, u32 flags)
  48 {
  49         u32 status;
  50         u32 counter = AES_OP_TIMEOUT;
  51
  52         iowrite32(virt_to_phys(src), _iobase + AES_SOURCEA_REG);
  53         iowrite32(virt_to_phys(dst), _iobase + AES_DSTA_REG);
  54         iowrite32(len,  _iobase + AES_LENA_REG);
  55
  56         /* Start the operation */
  57         iowrite32(AES_CTRL_START | flags, _iobase + AES_CTRLA_REG);
  58
  59         do {
  60                 status = ioread32(_iobase + AES_INTR_REG);
  61                 cpu_relax();
  62         } while(!(status & AES_INTRA_PENDING) && --counter);
  63
  64         /* Clear the event */
  65         iowrite32((status & 0xFF) | AES_INTRA_PENDING, _iobase + AES_INTR_REG);
  66         return counter ? 0 : 1;
  67 }
  68
  69 static unsigned int
  70 geode_aes_crypt(struct geode_aes_op *op)
  71 {
  72         u32 flags = 0;
  73         unsigned long iflags;
  74         int ret;
  75
  76         if (op->len == 0)
  77                 return 0;
  78
  79         /* If the source and destination is the same, then
  80          * we need to turn on the coherent flags, otherwise
  81          * we don't need to worry
  82          */
  83
  84         flags |= (AES_CTRL_DCA | AES_CTRL_SCA);
  85
  86         if (op->dir == AES_DIR_ENCRYPT)
  87                 flags |= AES_CTRL_ENCRYPT;
  88
  89         /* Start the critical section */
  90
  91         spin_lock_irqsave(&lock, iflags);
  92
  93         if (op->mode == AES_MODE_CBC) {
  94                 flags |= AES_CTRL_CBC;
  95                 _writefield(AES_WRITEIV0_REG, op->iv);
  96         }
  97
  98         if (!(op->flags & AES_FLAGS_HIDDENKEY)) {
  99                 flags |= AES_CTRL_WRKEY;
 100                 _writefield(AES_WRITEKEY0_REG, op->key);
 101         }
 102
 103         ret = do_crypt(op->src, op->dst, op->len, flags);
 104         BUG_ON(ret);
 105
 106         if (op->mode == AES_MODE_CBC)
 107                 _readfield(AES_WRITEIV0_REG, op->iv);
 108
 109         spin_unlock_irqrestore(&lock, iflags);
 110
 111         return op->len;
 112 }
 113
 114 /* CRYPTO-API Functions */
 115
 116 static int geode_setkey_cip(struct crypto_tfm *tfm, const u8 *key,
 117                 unsigned int len)
 118 {
 119         struct geode_aes_op *op = crypto_tfm_ctx(tfm);
 120         unsigned int ret;
 121
 122         op->keylen = len;
 123
 124         if (len == AES_KEYSIZE_128) {
 125                 memcpy(op->key, key, len);
 126                 return 0;
 127         }
 128
 129         if (len != AES_KEYSIZE_192 && len != AES_KEYSIZE_256) {
 130                 /* not supported at all */
 131                 tfm->crt_flags |= CRYPTO_TFM_RES_BAD_KEY_LEN;
 132                 return -EINVAL;
 133         }
 134
 135         /*
 136          * The requested key size is not supported by HW, do a fallback
 137          */
 138         op->fallback.blk->base.crt_flags &= ~CRYPTO_TFM_REQ_MASK;
 139         op->fallback.blk->base.crt_flags |= (tfm->crt_flags & CRYPTO_TFM_REQ_MASK);
 140
 141         ret = crypto_cipher_setkey(op->fallback.cip, key, len);
 142         if (ret) {
 143                 tfm->crt_flags &= ~CRYPTO_TFM_RES_MASK;
 144                 tfm->crt_flags |= (op->fallback.blk->base.crt_flags & CRYPTO_TFM_RES_MASK);
 145         }
 146         return ret;
 147 }
 148
 149 static int geode_setkey_blk(struct crypto_tfm *tfm, const u8 *key,
 150                 unsigned int len)
 151 {
 152         struct geode_aes_op *op = crypto_tfm_ctx(tfm);
 153         unsigned int ret;
 154
 155         op->keylen = len;
 156
 157         if (len == AES_KEYSIZE_128) {
 158                 memcpy(op->key, key, len);
 159                 return 0;
 160         }
 161
 162         if (len != AES_KEYSIZE_192 && len != AES_KEYSIZE_256) {
 163                 /* not supported at all */
 164                 tfm->crt_flags |= CRYPTO_TFM_RES_BAD_KEY_LEN;
 165                 return -EINVAL;
 166         }
 167
 168         /*
 169          * The requested key size is not supported by HW, do a fallback
 170          */
 171         op->fallback.blk->base.crt_flags &= ~CRYPTO_TFM_REQ_MASK;
 172         op->fallback.blk->base.crt_flags |= (tfm->crt_flags & CRYPTO_TFM_REQ_MASK);
 173
 174         ret = crypto_blkcipher_setkey(op->fallback.blk, key, len);
 175         if (ret) {
 176                 tfm->crt_flags &= ~CRYPTO_TFM_RES_MASK;
 177                 tfm->crt_flags |= (op->fallback.blk->base.crt_flags & CRYPTO_TFM_RES_MASK);
 178         }
 179         return ret;
 180 }
 181
 182 static int fallback_blk_dec(struct blkcipher_desc *desc,
 183                 struct scatterlist *dst, struct scatterlist *src,
 184                 unsigned int nbytes)
 185 {
 186         unsigned int ret;
 187         struct crypto_blkcipher *tfm;
 188         struct geode_aes_op *op = crypto_blkcipher_ctx(desc->tfm);
 189
 190         tfm = desc->tfm;
 191         desc->tfm = op->fallback.blk;
 192
 193         ret = crypto_blkcipher_decrypt_iv(desc, dst, src, nbytes);
 194
 195         desc->tfm = tfm;
 196         return ret;
 197 }
 198 static int fallback_blk_enc(struct blkcipher_desc *desc,
 199                 struct scatterlist *dst, struct scatterlist *src,
 200                 unsigned int nbytes)
 201 {
 202         unsigned int ret;
 203         struct crypto_blkcipher *tfm;
 204         struct geode_aes_op *op = crypto_blkcipher_ctx(desc->tfm);
 205
 206         tfm = desc->tfm;
 207         desc->tfm = op->fallback.blk;
 208
 209         ret = crypto_blkcipher_encrypt_iv(desc, dst, src, nbytes);
 210
 211         desc->tfm = tfm;
 212         return ret;
 213 }
 214
 215 static void
 216 geode_encrypt(struct crypto_tfm *tfm, u8 *out, const u8 *in)
 217 {
 218         struct geode_aes_op *op = crypto_tfm_ctx(tfm);
 219
 220         if (unlikely(op->keylen != AES_KEYSIZE_128)) {
 221                 crypto_cipher_encrypt_one(op->fallback.cip, out, in);
 222                 return;
 223         }
 224
 225         op->src = (void *) in;
 226         op->dst = (void *) out;
 227         op->mode = AES_MODE_ECB;
 228         op->flags = 0;
 229         op->len = AES_MIN_BLOCK_SIZE;
 230         op->dir = AES_DIR_ENCRYPT;
 231
 232         geode_aes_crypt(op);
 233 }
 234
 235
 236 static void
 237 geode_decrypt(struct crypto_tfm *tfm, u8 *out, const u8 *in)
 238 {
 239         struct geode_aes_op *op = crypto_tfm_ctx(tfm);
 240
 241         if (unlikely(op->keylen != AES_KEYSIZE_128)) {
 242                 crypto_cipher_decrypt_one(op->fallback.cip, out, in);
 243                 return;
 244         }
 245
 246         op->src = (void *) in;
 247         op->dst = (void *) out;
 248         op->mode = AES_MODE_ECB;
 249         op->flags = 0;
 250         op->len = AES_MIN_BLOCK_SIZE;
 251         op->dir = AES_DIR_DECRYPT;
 252
 253         geode_aes_crypt(op);
 254 }
 255
 256 static int fallback_init_cip(struct crypto_tfm *tfm)
 257 {
 258         const char *name = tfm->__crt_alg->cra_name;
 259         struct geode_aes_op *op = crypto_tfm_ctx(tfm);
 260
 261         op->fallback.cip = crypto_alloc_cipher(name, 0,
 262                                 CRYPTO_ALG_ASYNC | CRYPTO_ALG_NEED_FALLBACK);
 263
 264         if (IS_ERR(op->fallback.cip)) {
 265                 printk(KERN_ERR "Error allocating fallback algo %s\n", name);
 266                 return PTR_ERR(op->fallback.blk);
 267         }
 268
 269         return 0;
 270 }
 271
 272 static void fallback_exit_cip(struct crypto_tfm *tfm)
 273 {
 274         struct geode_aes_op *op = crypto_tfm_ctx(tfm);
 275
 276         crypto_free_cipher(op->fallback.cip);
 277         op->fallback.cip = NULL;
 278 }
 279
 280 static struct crypto_alg geode_alg = {
 281         .cra_name                       =       "aes",
 282         .cra_driver_name        =       "geode-aes",
 283         .cra_priority           =       300,
 284         .cra_alignmask          =       15,
 285         .cra_flags                      =       CRYPTO_ALG_TYPE_CIPHER |
 286                                                         CRYPTO_ALG_NEED_FALLBACK,
 287         .cra_init                       =       fallback_init_cip,
 288         .cra_exit                       =       fallback_exit_cip,
 289         .cra_blocksize          =       AES_MIN_BLOCK_SIZE,
 290         .cra_ctxsize            =       sizeof(struct geode_aes_op),
 291         .cra_module                     =       THIS_MODULE,
 292         .cra_list                       =       LIST_HEAD_INIT(geode_alg.cra_list),
 293         .cra_u                          =       {
 294                 .cipher =       {
 295                         .cia_min_keysize        =       AES_MIN_KEY_SIZE,
 296                         .cia_max_keysize        =       AES_MAX_KEY_SIZE,
 297                         .cia_setkey                     =       geode_setkey_cip,
 298                         .cia_encrypt            =       geode_encrypt,
 299                         .cia_decrypt            =       geode_decrypt
 300                 }
 301         }
 302 };
 303
 304 static int
 305 geode_cbc_decrypt(struct blkcipher_desc *desc,
 306                   struct scatterlist *dst, struct scatterlist *src,
 307                   unsigned int nbytes)
 308 {
 309         struct geode_aes_op *op = crypto_blkcipher_ctx(desc->tfm);
 310         struct blkcipher_walk walk;
 311         int err, ret;
 312
 313         if (unlikely(op->keylen != AES_KEYSIZE_128))
 314                 return fallback_blk_dec(desc, dst, src, nbytes);
 315
 316         blkcipher_walk_init(&walk, dst, src, nbytes);
 317         err = blkcipher_walk_virt(desc, &walk);
 318         op->iv = walk.iv;
 319
 320         while((nbytes = walk.nbytes)) {
 321                 op->src = walk.src.virt.addr,
 322                 op->dst = walk.dst.virt.addr;
 323                 op->mode = AES_MODE_CBC;
 324                 op->len = nbytes - (nbytes % AES_MIN_BLOCK_SIZE);
 325                 op->dir = AES_DIR_DECRYPT;
 326
 327                 ret = geode_aes_crypt(op);
 328
 329                 nbytes -= ret;
 330                 err = blkcipher_walk_done(desc, &walk, nbytes);
 331         }
 332
 333         return err;
 334 }
 335
 336 static int
 337 geode_cbc_encrypt(struct blkcipher_desc *desc,
 338                   struct scatterlist *dst, struct scatterlist *src,
 339                   unsigned int nbytes)
 340 {
 341         struct geode_aes_op *op = crypto_blkcipher_ctx(desc->tfm);
 342         struct blkcipher_walk walk;
 343         int err, ret;
 344
 345         if (unlikely(op->keylen != AES_KEYSIZE_128))
 346                 return fallback_blk_enc(desc, dst, src, nbytes);
 347
 348         blkcipher_walk_init(&walk, dst, src, nbytes);
 349         err = blkcipher_walk_virt(desc, &walk);
 350         op->iv = walk.iv;
 351
 352         while((nbytes = walk.nbytes)) {
 353                 op->src = walk.src.virt.addr,
 354                 op->dst = walk.dst.virt.addr;
 355                 op->mode = AES_MODE_CBC;
 356                 op->len = nbytes - (nbytes % AES_MIN_BLOCK_SIZE);
 357                 op->dir = AES_DIR_ENCRYPT;
 358
 359                 ret = geode_aes_crypt(op);
 360                 nbytes -= ret;
 361                 err = blkcipher_walk_done(desc, &walk, nbytes);
 362         }
 363
 364         return err;
 365 }
 366
 367 static int fallback_init_blk(struct crypto_tfm *tfm)
 368 {
 369         const char *name = tfm->__crt_alg->cra_name;
 370         struct geode_aes_op *op = crypto_tfm_ctx(tfm);
 371
 372         op->fallback.blk = crypto_alloc_blkcipher(name, 0,
 373                         CRYPTO_ALG_ASYNC | CRYPTO_ALG_NEED_FALLBACK);
 374
 375         if (IS_ERR(op->fallback.blk)) {
 376                 printk(KERN_ERR "Error allocating fallback algo %s\n", name);
 377                 return PTR_ERR(op->fallback.blk);
 378         }
 379
 380         return 0;
 381 }
 382
 383 static void fallback_exit_blk(struct crypto_tfm *tfm)
 384 {
 385         struct geode_aes_op *op = crypto_tfm_ctx(tfm);
 386
 387         crypto_free_blkcipher(op->fallback.blk);
 388         op->fallback.blk = NULL;
 389 }
 390
 391 static struct crypto_alg geode_cbc_alg = {
 392         .cra_name               =       "cbc(aes)",
 393         .cra_driver_name        =       "cbc-aes-geode",
 394         .cra_priority           =       400,
 395         .cra_flags                      =       CRYPTO_ALG_TYPE_BLKCIPHER |
 396                                                         CRYPTO_ALG_NEED_FALLBACK,
 397         .cra_init                       =       fallback_init_blk,
 398         .cra_exit                       =       fallback_exit_blk,
 399         .cra_blocksize          =       AES_MIN_BLOCK_SIZE,
 400         .cra_ctxsize            =       sizeof(struct geode_aes_op),
 401         .cra_alignmask          =       15,
 402         .cra_type                       =       &crypto_blkcipher_type,
 403         .cra_module                     =       THIS_MODULE,
 404         .cra_list                       =       LIST_HEAD_INIT(geode_cbc_alg.cra_list),
 405         .cra_u                          =       {
 406                 .blkcipher      =       {
 407                         .min_keysize    =       AES_MIN_KEY_SIZE,
 408                         .max_keysize    =       AES_MAX_KEY_SIZE,
 409                         .setkey                 =       geode_setkey_blk,
 410                         .encrypt                =       geode_cbc_encrypt,
 411                         .decrypt                =       geode_cbc_decrypt,
 412                         .ivsize                 =       AES_IV_LENGTH,
 413                 }
 414         }
 415 };
 416
 417 static int
 418 geode_ecb_decrypt(struct blkcipher_desc *desc,
 419                   struct scatterlist *dst, struct scatterlist *src,
 420                   unsigned int nbytes)
 421 {
 422         struct geode_aes_op *op = crypto_blkcipher_ctx(desc->tfm);
 423         struct blkcipher_walk walk;
 424         int err, ret;
 425
 426         if (unlikely(op->keylen != AES_KEYSIZE_128))
 427                 return fallback_blk_dec(desc, dst, src, nbytes);
 428
 429         blkcipher_walk_init(&walk, dst, src, nbytes);
 430         err = blkcipher_walk_virt(desc, &walk);
 431
 432         while((nbytes = walk.nbytes)) {
 433                 op->src = walk.src.virt.addr,
 434                 op->dst = walk.dst.virt.addr;
 435                 op->mode = AES_MODE_ECB;
 436                 op->len = nbytes - (nbytes % AES_MIN_BLOCK_SIZE);
 437                 op->dir = AES_DIR_DECRYPT;
 438
 439                 ret = geode_aes_crypt(op);
 440                 nbytes -= ret;
 441                 err = blkcipher_walk_done(desc, &walk, nbytes);
 442         }
 443
 444         return err;
 445 }
 446
 447 static int
 448 geode_ecb_encrypt(struct blkcipher_desc *desc,
 449                   struct scatterlist *dst, struct scatterlist *src,
 450                   unsigned int nbytes)
 451 {
 452         struct geode_aes_op *op = crypto_blkcipher_ctx(desc->tfm);
 453         struct blkcipher_walk walk;
 454         int err, ret;
 455
 456         if (unlikely(op->keylen != AES_KEYSIZE_128))
 457                 return fallback_blk_enc(desc, dst, src, nbytes);
 458
 459         blkcipher_walk_init(&walk, dst, src, nbytes);
 460         err = blkcipher_walk_virt(desc, &walk);
 461
 462         while((nbytes = walk.nbytes)) {
 463                 op->src = walk.src.virt.addr,
 464                 op->dst = walk.dst.virt.addr;
 465                 op->mode = AES_MODE_ECB;
 466                 op->len = nbytes - (nbytes % AES_MIN_BLOCK_SIZE);
 467                 op->dir = AES_DIR_ENCRYPT;
 468
 469                 ret = geode_aes_crypt(op);
 470                 nbytes -= ret;
 471                 ret =  blkcipher_walk_done(desc, &walk, nbytes);
 472         }
 473
 474         return err;
 475 }
 476
 477 static struct crypto_alg geode_ecb_alg = {
 478         .cra_name                       =       "ecb(aes)",
 479         .cra_driver_name        =       "ecb-aes-geode",
 480         .cra_priority           =       400,
 481         .cra_flags                      =       CRYPTO_ALG_TYPE_BLKCIPHER |
 482                                                         CRYPTO_ALG_NEED_FALLBACK,
 483         .cra_init                       =       fallback_init_blk,
 484         .cra_exit                       =       fallback_exit_blk,
 485         .cra_blocksize          =       AES_MIN_BLOCK_SIZE,
 486         .cra_ctxsize            =       sizeof(struct geode_aes_op),
 487         .cra_alignmask          =       15,
 488         .cra_type                       =       &crypto_blkcipher_type,
 489         .cra_module                     =       THIS_MODULE,
 490         .cra_list                       =       LIST_HEAD_INIT(geode_ecb_alg.cra_list),
 491         .cra_u                          =       {
 492                 .blkcipher      =       {
 493                         .min_keysize    =       AES_MIN_KEY_SIZE,
 494                         .max_keysize    =       AES_MAX_KEY_SIZE,
 495                         .setkey                 =       geode_setkey_blk,
 496                         .encrypt                =       geode_ecb_encrypt,
 497                         .decrypt                =       geode_ecb_decrypt,
 498                 }
 499         }
 500 };
 501
 502 static void __devexit
 503 geode_aes_remove(struct pci_dev *dev)
 504 {
 505         crypto_unregister_alg(&geode_alg);
 506         crypto_unregister_alg(&geode_ecb_alg);
 507         crypto_unregister_alg(&geode_cbc_alg);
 508
 509         pci_iounmap(dev, _iobase);
 510         _iobase = NULL;
 511
 512         pci_release_regions(dev);
 513         pci_disable_device(dev);
 514 }
 515
 516
 517 static int __devinit
 518 geode_aes_probe(struct pci_dev *dev, const struct pci_device_id *id)
 519 {
 520         int ret;
 521
 522         if ((ret = pci_enable_device(dev)))
 523                 return ret;
 524
 525         if ((ret = pci_request_regions(dev, "geode-aes")))
 526                 goto eenable;
 527
 528         _iobase = pci_iomap(dev, 0, 0);
 529
 530         if (_iobase == NULL) {
 531                 ret = -ENOMEM;
 532                 goto erequest;
 533         }
 534
 535         spin_lock_init(&lock);
 536
 537         /* Clear any pending activity */
 538         iowrite32(AES_INTR_PENDING | AES_INTR_MASK, _iobase + AES_INTR_REG);
 539
 540         if ((ret = crypto_register_alg(&geode_alg)))
 541                 goto eiomap;
 542
 543         if ((ret = crypto_register_alg(&geode_ecb_alg)))
 544                 goto ealg;
 545
 546         if ((ret = crypto_register_alg(&geode_cbc_alg)))
 547                 goto eecb;
 548
 549         printk(KERN_NOTICE "geode-aes: GEODE AES engine enabled.\n");
 550         return 0;
 551
 552  eecb:
 553         crypto_unregister_alg(&geode_ecb_alg);
 554
 555  ealg:
 556         crypto_unregister_alg(&geode_alg);
 557
 558  eiomap:
 559         pci_iounmap(dev, _iobase);
 560
 561  erequest:
 562         pci_release_regions(dev);
 563
 564  eenable:
 565         pci_disable_device(dev);
 566
 567         printk(KERN_ERR "geode-aes:  GEODE AES initialization failed.\n");
 568         return ret;
 569 }
 570
 571 static struct pci_device_id geode_aes_tbl[] = {
 572         { PCI_VENDOR_ID_AMD, PCI_DEVICE_ID_AMD_LX_AES, PCI_ANY_ID, PCI_ANY_ID} ,
 573         { 0, }
 574 };
 575
 576 MODULE_DEVICE_TABLE(pci, geode_aes_tbl);
 577
 578 static struct pci_driver geode_aes_driver = {
 579         .name = "Geode LX AES",
 580         .id_table = geode_aes_tbl,
 581         .probe = geode_aes_probe,
 582         .remove = __devexit_p(geode_aes_remove)
 583 };
 584
 585 static int __init
 586 geode_aes_init(void)
 587 {
 588         return pci_register_driver(&geode_aes_driver);
 589 }
 590
 591 static void __exit
 592 geode_aes_exit(void)
 593 {
 594         pci_unregister_driver(&geode_aes_driver);
 595 }
 596
 597 MODULE_AUTHOR("Advanced Micro Devices, Inc.");
 598 MODULE_DESCRIPTION("Geode LX Hardware AES driver");
 599 MODULE_LICENSE("GPL");
 600
 601 module_init(geode_aes_init);
 602 module_exit(geode_aes_exit);