crypto/api.c

   1 /*
   2  * Scatterlist Cryptographic API.
   3  *
   4  * Copyright (c) 2002 James Morris <jmorris@intercode.com.au>
   5  * Copyright (c) 2002 David S. Miller (davem@redhat.com)
   6  * Copyright (c) 2005 Herbert Xu <herbert@gondor.apana.org.au>
   7  *
   8  * Portions derived from Cryptoapi, by Alexander Kjeldaas <astor@fast.no>
   9  * and Nettle, by Niels Möller.
  10  *
  11  * This program is free software; you can redistribute it and/or modify it
  12  * under the terms of the GNU General Public License as published by the Free
  13  * Software Foundation; either version 2 of the License, or (at your option)
  14  * any later version.
  15  *
  16  */
  17
  18 #include <linux/compiler.h>
  19 #include <linux/init.h>
  20 #include <linux/crypto.h>
  21 #include <linux/errno.h>
  22 #include <linux/kernel.h>
  23 #include <linux/kmod.h>
  24 #include <linux/rwsem.h>
  25 #include <linux/slab.h>
  26 #include <linux/string.h>
  27 #include "internal.h"
  28
  29 LIST_HEAD(crypto_alg_list);
  30 DECLARE_RWSEM(crypto_alg_sem);
  31
  32 static inline int crypto_alg_get(struct crypto_alg *alg)
  33 {
  34         return try_module_get(alg->cra_module);
  35 }
  36
  37 static inline void crypto_alg_put(struct crypto_alg *alg)
  38 {
  39         module_put(alg->cra_module);
  40 }
  41
  42 static struct crypto_alg *crypto_alg_lookup(const char *name)
  43 {
  44         struct crypto_alg *q, *alg = NULL;
  45         int best = -1;
  46
  47         if (!name)
  48                 return NULL;
  49
  50         down_read(&crypto_alg_sem);
  51
  52         list_for_each_entry(q, &crypto_alg_list, cra_list) {
  53                 int exact, fuzzy;
  54
  55                 exact = !strcmp(q->cra_driver_name, name);
  56                 fuzzy = !strcmp(q->cra_name, name);
  57                 if (!exact && !(fuzzy && q->cra_priority > best))
  58                         continue;
  59
  60                 if (unlikely(!crypto_alg_get(q)))
  61                         continue;
  62
  63                 best = q->cra_priority;
  64                 if (alg)
  65                         crypto_alg_put(alg);
  66                 alg = q;
  67
  68                 if (exact)
  69                         break;
  70         }
  71
  72         up_read(&crypto_alg_sem);
  73         return alg;
  74 }
  75
  76 /* A far more intelligent version of this is planned.  For now, just
  77  * try an exact match on the name of the algorithm. */
  78 static inline struct crypto_alg *crypto_alg_mod_lookup(const char *name)
  79 {
  80         return try_then_request_module(crypto_alg_lookup(name), name);
  81 }
  82
  83 static int crypto_init_flags(struct crypto_tfm *tfm, u32 flags)
  84 {
  85         tfm->crt_flags = flags & CRYPTO_TFM_REQ_MASK;
  86         flags &= ~CRYPTO_TFM_REQ_MASK;
  87
  88         switch (crypto_tfm_alg_type(tfm)) {
  89         case CRYPTO_ALG_TYPE_CIPHER:
  90                 return crypto_init_cipher_flags(tfm, flags);
  91
  92         case CRYPTO_ALG_TYPE_DIGEST:
  93                 return crypto_init_digest_flags(tfm, flags);
  94
  95         case CRYPTO_ALG_TYPE_COMPRESS:
  96                 return crypto_init_compress_flags(tfm, flags);
  97
  98         default:
  99                 break;
 100         }
 101
 102         BUG();
 103         return -EINVAL;
 104 }
 105
 106 static int crypto_init_ops(struct crypto_tfm *tfm)
 107 {
 108         switch (crypto_tfm_alg_type(tfm)) {
 109         case CRYPTO_ALG_TYPE_CIPHER:
 110                 return crypto_init_cipher_ops(tfm);
 111
 112         case CRYPTO_ALG_TYPE_DIGEST:
 113                 return crypto_init_digest_ops(tfm);
 114
 115         case CRYPTO_ALG_TYPE_COMPRESS:
 116                 return crypto_init_compress_ops(tfm);
 117
 118         default:
 119                 break;
 120         }
 121
 122         BUG();
 123         return -EINVAL;
 124 }
 125
 126 static void crypto_exit_ops(struct crypto_tfm *tfm)
 127 {
 128         switch (crypto_tfm_alg_type(tfm)) {
 129         case CRYPTO_ALG_TYPE_CIPHER:
 130                 crypto_exit_cipher_ops(tfm);
 131                 break;
 132
 133         case CRYPTO_ALG_TYPE_DIGEST:
 134                 crypto_exit_digest_ops(tfm);
 135                 break;
 136
 137         case CRYPTO_ALG_TYPE_COMPRESS:
 138                 crypto_exit_compress_ops(tfm);
 139                 break;
 140
 141         default:
 142                 BUG();
 143
 144         }
 145 }
 146
 147 static unsigned int crypto_ctxsize(struct crypto_alg *alg, int flags)
 148 {
 149         unsigned int len;
 150
 151         switch (alg->cra_flags & CRYPTO_ALG_TYPE_MASK) {
 152         default:
 153                 BUG();
 154
 155         case CRYPTO_ALG_TYPE_CIPHER:
 156                 len = crypto_cipher_ctxsize(alg, flags);
 157                 break;
 158
 159         case CRYPTO_ALG_TYPE_DIGEST:
 160                 len = crypto_digest_ctxsize(alg, flags);
 161                 break;
 162
 163         case CRYPTO_ALG_TYPE_COMPRESS:
 164                 len = crypto_compress_ctxsize(alg, flags);
 165                 break;
 166         }
 167
 168         return len + (alg->cra_alignmask & ~(crypto_tfm_ctx_alignment() - 1));
 169 }
 170
 171 struct crypto_tfm *crypto_alloc_tfm2(const char *name, u32 flags,
 172                                      int nomodload)
 173 {
 174         struct crypto_tfm *tfm = NULL;
 175         struct crypto_alg *alg;
 176         unsigned int tfm_size;
 177
 178         if (!nomodload) {
 179                 alg = crypto_alg_mod_lookup(name);
 180         }
 181         else {
 182                 alg = crypto_alg_lookup(name);
 183         }
 184
 185         if (alg == NULL)
 186                 goto out;
 187
 188         tfm_size = sizeof(*tfm) + crypto_ctxsize(alg, flags);
 189         tfm = kzalloc(tfm_size, GFP_KERNEL);
 190         if (tfm == NULL)
 191                 goto out_put;
 192
 193         tfm->__crt_alg = alg;
 194
 195         if (crypto_init_flags(tfm, flags))
 196                 goto out_free_tfm;
 197
 198         if (crypto_init_ops(tfm)) {
 199                 crypto_exit_ops(tfm);
 200                 goto out_free_tfm;
 201         }
 202
 203         goto out;
 204
 205 out_free_tfm:
 206         kfree(tfm);
 207         tfm = NULL;
 208 out_put:
 209         crypto_alg_put(alg);
 210 out:
 211         return tfm;
 212 }
 213
 214 struct crypto_tfm *crypto_alloc_tfm(const char *name, u32 flags)
 215 {
 216         return crypto_alloc_tfm2(name, flags, 0);
 217 }
 218
 219 void crypto_free_tfm(struct crypto_tfm *tfm)
 220 {
 221         struct crypto_alg *alg;
 222         int size;
 223
 224         if (unlikely(!tfm))
 225                 return;
 226
 227         alg = tfm->__crt_alg;
 228         size = sizeof(*tfm) + alg->cra_ctxsize;
 229
 230         crypto_exit_ops(tfm);
 231         crypto_alg_put(alg);
 232         memset(tfm, 0, size);
 233         kfree(tfm);
 234 }
 235
 236 static inline int crypto_set_driver_name(struct crypto_alg *alg)
 237 {
 238         static const char suffix[] = "-generic";
 239         char *driver_name = (char *)alg->cra_driver_name;
 240         int len;
 241
 242         if (*driver_name)
 243                 return 0;
 244
 245         len = strlcpy(driver_name, alg->cra_name, CRYPTO_MAX_ALG_NAME);
 246         if (len + sizeof(suffix) > CRYPTO_MAX_ALG_NAME)
 247                 return -ENAMETOOLONG;
 248
 249         memcpy(driver_name + len, suffix, sizeof(suffix));
 250         return 0;
 251 }
 252
 253 int crypto_register_alg(struct crypto_alg *alg)
 254 {
 255         int ret;
 256         struct crypto_alg *q;
 257
 258         if (alg->cra_alignmask & (alg->cra_alignmask + 1))
 259                 return -EINVAL;
 260
 261         if (alg->cra_alignmask & alg->cra_blocksize)
 262                 return -EINVAL;
 263
 264         if (alg->cra_blocksize > PAGE_SIZE / 8)
 265                 return -EINVAL;
 266
 267         if (alg->cra_priority < 0)
 268                 return -EINVAL;
 269
 270         ret = crypto_set_driver_name(alg);
 271         if (unlikely(ret))
 272                 return ret;
 273
 274         down_write(&crypto_alg_sem);
 275
 276         list_for_each_entry(q, &crypto_alg_list, cra_list) {
 277                 if (!strcmp(q->cra_driver_name, alg->cra_driver_name)) {
 278                         ret = -EEXIST;
 279                         goto out;
 280                 }
 281         }
 282
 283         list_add_tail(&alg->cra_list, &crypto_alg_list);
 284 out:
 285         up_write(&crypto_alg_sem);
 286         return ret;
 287 }
 288
 289 int crypto_unregister_alg(struct crypto_alg *alg)
 290 {
 291         int ret = -ENOENT;
 292         struct crypto_alg *q;
 293
 294         BUG_ON(!alg->cra_module);
 295
 296         down_write(&crypto_alg_sem);
 297         list_for_each_entry(q, &crypto_alg_list, cra_list) {
 298                 if (alg == q) {
 299                         list_del(&alg->cra_list);
 300                         ret = 0;
 301                         goto out;
 302                 }
 303         }
 304 out:
 305         up_write(&crypto_alg_sem);
 306         return ret;
 307 }
 308
 309 int crypto_alg_available(const char *name, u32 flags)
 310 {
 311         int ret = 0;
 312         struct crypto_alg *alg = crypto_alg_mod_lookup(name);
 313
 314         if (alg) {
 315                 crypto_alg_put(alg);
 316                 ret = 1;
 317         }
 318
 319         return ret;
 320 }
 321
 322 static int __init init_crypto(void)
 323 {
 324         printk(KERN_INFO "Initializing Cryptographic API\n");
 325         crypto_init_proc();
 326         return 0;
 327 }
 328
 329 __initcall(init_crypto);
 330
 331 EXPORT_SYMBOL_GPL(crypto_register_alg);
 332 EXPORT_SYMBOL_GPL(crypto_unregister_alg);
 333 EXPORT_SYMBOL_GPL(crypto_alloc_tfm);
 334 EXPORT_SYMBOL_GPL(crypto_free_tfm);
 335 EXPORT_SYMBOL_GPL(crypto_alg_available);