1 /*- 2 * Copyright (c) 2005-2008 Pawel Jakub Dawidek <pjd@FreeBSD.org> 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 */ 26 27 #include <sys/cdefs.h> 28 __FBSDID("$FreeBSD$"); 29 30 #include <sys/param.h> 31 #include <sys/systm.h> 32 #include <sys/kernel.h> 33 #include <sys/module.h> 34 #include <sys/lock.h> 35 #include <sys/rwlock.h> 36 #include <sys/malloc.h> 37 #include <sys/libkern.h> 38 #if defined(__amd64__) || (defined(__i386__) && !defined(PC98)) 39 #include <machine/cpufunc.h> 40 #include <machine/cputypes.h> 41 #include <machine/md_var.h> 42 #include <machine/specialreg.h> 43 #endif 44 45 #include <opencrypto/cryptodev.h> 46 47 #include <crypto/via/padlock.h> 48 49 #include <sys/kobj.h> 50 #include <sys/bus.h> 51 #include "cryptodev_if.h" 52 53 /* 54 * Technical documentation about the PadLock engine can be found here: 55 * 56 * http://www.via.com.tw/en/downloads/whitepapers/initiatives/padlock/programming_guide.pdf 57 */ 58 59 struct padlock_softc { 60 int32_t sc_cid; 61 uint32_t sc_sid; 62 TAILQ_HEAD(padlock_sessions_head, padlock_session) sc_sessions; 63 struct rwlock sc_sessions_lock; 64 }; 65 66 static int padlock_newsession(device_t, uint32_t *sidp, struct cryptoini *cri); 67 static int padlock_freesession(device_t, uint64_t tid); 68 static void padlock_freesession_one(struct padlock_softc *sc, 69 struct padlock_session *ses, int locked); 70 static int padlock_process(device_t, struct cryptop *crp, int hint __unused); 71 72 MALLOC_DEFINE(M_PADLOCK, "padlock_data", "PadLock Data"); 73 74 static void 75 padlock_identify(driver_t *drv, device_t parent) 76 { 77 /* NB: order 10 is so we get attached after h/w devices */ 78 if (device_find_child(parent, "padlock", -1) == NULL && 79 BUS_ADD_CHILD(parent, 10, "padlock", -1) == 0) 80 panic("padlock: could not attach"); 81 } 82 83 static int 84 padlock_probe(device_t dev) 85 { 86 char capp[256]; 87 88 #if defined(__amd64__) || (defined(__i386__) && !defined(PC98)) 89 /* If there is no AES support, we has nothing to do here. */ 90 if (!(via_feature_xcrypt & VIA_HAS_AES)) { 91 device_printf(dev, "No ACE support.\n"); 92 return (EINVAL); 93 } 94 strlcpy(capp, "AES-CBC", sizeof(capp)); 95 #if 0 96 strlcat(capp, ",AES-EBC", sizeof(capp)); 97 strlcat(capp, ",AES-CFB", sizeof(capp)); 98 strlcat(capp, ",AES-OFB", sizeof(capp)); 99 #endif 100 if (via_feature_xcrypt & VIA_HAS_SHA) { 101 strlcat(capp, ",SHA1", sizeof(capp)); 102 strlcat(capp, ",SHA256", sizeof(capp)); 103 } 104 #if 0 105 if (via_feature_xcrypt & VIA_HAS_AESCTR) 106 strlcat(capp, ",AES-CTR", sizeof(capp)); 107 if (via_feature_xcrypt & VIA_HAS_MM) 108 strlcat(capp, ",RSA", sizeof(capp)); 109 #endif 110 device_set_desc_copy(dev, capp); 111 return (0); 112 #else 113 return (EINVAL); 114 #endif 115 } 116 117 static int 118 padlock_attach(device_t dev) 119 { 120 struct padlock_softc *sc = device_get_softc(dev); 121 122 TAILQ_INIT(&sc->sc_sessions); 123 sc->sc_sid = 1; 124 125 sc->sc_cid = crypto_get_driverid(dev, CRYPTOCAP_F_HARDWARE); 126 if (sc->sc_cid < 0) { 127 device_printf(dev, "Could not get crypto driver id.\n"); 128 return (ENOMEM); 129 } 130 131 rw_init(&sc->sc_sessions_lock, "padlock_lock"); 132 crypto_register(sc->sc_cid, CRYPTO_AES_CBC, 0, 0); 133 crypto_register(sc->sc_cid, CRYPTO_MD5_HMAC, 0, 0); 134 crypto_register(sc->sc_cid, CRYPTO_SHA1_HMAC, 0, 0); 135 crypto_register(sc->sc_cid, CRYPTO_RIPEMD160_HMAC, 0, 0); 136 crypto_register(sc->sc_cid, CRYPTO_SHA2_256_HMAC, 0, 0); 137 crypto_register(sc->sc_cid, CRYPTO_SHA2_384_HMAC, 0, 0); 138 crypto_register(sc->sc_cid, CRYPTO_SHA2_512_HMAC, 0, 0); 139 return (0); 140 } 141 142 static int 143 padlock_detach(device_t dev) 144 { 145 struct padlock_softc *sc = device_get_softc(dev); 146 struct padlock_session *ses; 147 148 rw_wlock(&sc->sc_sessions_lock); 149 TAILQ_FOREACH(ses, &sc->sc_sessions, ses_next) { 150 if (ses->ses_used) { 151 rw_wunlock(&sc->sc_sessions_lock); 152 device_printf(dev, 153 "Cannot detach, sessions still active.\n"); 154 return (EBUSY); 155 } 156 } 157 while ((ses = TAILQ_FIRST(&sc->sc_sessions)) != NULL) { 158 TAILQ_REMOVE(&sc->sc_sessions, ses, ses_next); 159 fpu_kern_free_ctx(ses->ses_fpu_ctx); 160 free(ses, M_PADLOCK); 161 } 162 rw_destroy(&sc->sc_sessions_lock); 163 crypto_unregister_all(sc->sc_cid); 164 return (0); 165 } 166 167 static int 168 padlock_newsession(device_t dev, uint32_t *sidp, struct cryptoini *cri) 169 { 170 struct padlock_softc *sc = device_get_softc(dev); 171 struct padlock_session *ses = NULL; 172 struct cryptoini *encini, *macini; 173 struct thread *td; 174 int error, saved_ctx; 175 176 if (sidp == NULL || cri == NULL) 177 return (EINVAL); 178 179 encini = macini = NULL; 180 for (; cri != NULL; cri = cri->cri_next) { 181 switch (cri->cri_alg) { 182 case CRYPTO_NULL_HMAC: 183 case CRYPTO_MD5_HMAC: 184 case CRYPTO_SHA1_HMAC: 185 case CRYPTO_RIPEMD160_HMAC: 186 case CRYPTO_SHA2_256_HMAC: 187 case CRYPTO_SHA2_384_HMAC: 188 case CRYPTO_SHA2_512_HMAC: 189 if (macini != NULL) 190 return (EINVAL); 191 macini = cri; 192 break; 193 case CRYPTO_AES_CBC: 194 if (encini != NULL) 195 return (EINVAL); 196 encini = cri; 197 break; 198 default: 199 return (EINVAL); 200 } 201 } 202 203 /* 204 * We only support HMAC algorithms to be able to work with 205 * ipsec(4), so if we are asked only for authentication without 206 * encryption, don't pretend we can accellerate it. 207 */ 208 if (encini == NULL) 209 return (EINVAL); 210 211 /* 212 * Let's look for a free session structure. 213 */ 214 rw_wlock(&sc->sc_sessions_lock); 215 /* 216 * Free sessions goes first, so if first session is used, we need to 217 * allocate one. 218 */ 219 ses = TAILQ_FIRST(&sc->sc_sessions); 220 if (ses == NULL || ses->ses_used) { 221 ses = malloc(sizeof(*ses), M_PADLOCK, M_NOWAIT | M_ZERO); 222 if (ses == NULL) { 223 rw_wunlock(&sc->sc_sessions_lock); 224 return (ENOMEM); 225 } 226 ses->ses_fpu_ctx = fpu_kern_alloc_ctx(FPU_KERN_NORMAL | 227 FPU_KERN_NOWAIT); 228 if (ses->ses_fpu_ctx == NULL) { 229 free(ses, M_PADLOCK); 230 rw_wunlock(&sc->sc_sessions_lock); 231 return (ENOMEM); 232 } 233 ses->ses_id = sc->sc_sid++; 234 } else { 235 TAILQ_REMOVE(&sc->sc_sessions, ses, ses_next); 236 } 237 ses->ses_used = 1; 238 TAILQ_INSERT_TAIL(&sc->sc_sessions, ses, ses_next); 239 rw_wunlock(&sc->sc_sessions_lock); 240 241 error = padlock_cipher_setup(ses, encini); 242 if (error != 0) { 243 padlock_freesession_one(sc, ses, 0); 244 return (error); 245 } 246 247 if (macini != NULL) { 248 td = curthread; 249 if (!is_fpu_kern_thread(0)) { 250 error = fpu_kern_enter(td, ses->ses_fpu_ctx, 251 FPU_KERN_NORMAL); 252 saved_ctx = 1; 253 } else { 254 error = 0; 255 saved_ctx = 0; 256 } 257 if (error == 0) { 258 error = padlock_hash_setup(ses, macini); 259 if (saved_ctx) 260 fpu_kern_leave(td, ses->ses_fpu_ctx); 261 } 262 if (error != 0) { 263 padlock_freesession_one(sc, ses, 0); 264 return (error); 265 } 266 } 267 268 *sidp = ses->ses_id; 269 return (0); 270 } 271 272 static void 273 padlock_freesession_one(struct padlock_softc *sc, struct padlock_session *ses, 274 int locked) 275 { 276 struct fpu_kern_ctx *ctx; 277 uint32_t sid = ses->ses_id; 278 279 if (!locked) 280 rw_wlock(&sc->sc_sessions_lock); 281 TAILQ_REMOVE(&sc->sc_sessions, ses, ses_next); 282 padlock_hash_free(ses); 283 ctx = ses->ses_fpu_ctx; 284 bzero(ses, sizeof(*ses)); 285 ses->ses_used = 0; 286 ses->ses_id = sid; 287 ses->ses_fpu_ctx = ctx; 288 TAILQ_INSERT_HEAD(&sc->sc_sessions, ses, ses_next); 289 if (!locked) 290 rw_wunlock(&sc->sc_sessions_lock); 291 } 292 293 static int 294 padlock_freesession(device_t dev, uint64_t tid) 295 { 296 struct padlock_softc *sc = device_get_softc(dev); 297 struct padlock_session *ses; 298 uint32_t sid = ((uint32_t)tid) & 0xffffffff; 299 300 rw_wlock(&sc->sc_sessions_lock); 301 TAILQ_FOREACH_REVERSE(ses, &sc->sc_sessions, padlock_sessions_head, 302 ses_next) { 303 if (ses->ses_id == sid) 304 break; 305 } 306 if (ses == NULL) { 307 rw_wunlock(&sc->sc_sessions_lock); 308 return (EINVAL); 309 } 310 padlock_freesession_one(sc, ses, 1); 311 rw_wunlock(&sc->sc_sessions_lock); 312 return (0); 313 } 314 315 static int 316 padlock_process(device_t dev, struct cryptop *crp, int hint __unused) 317 { 318 struct padlock_softc *sc = device_get_softc(dev); 319 struct padlock_session *ses = NULL; 320 struct cryptodesc *crd, *enccrd, *maccrd; 321 int error = 0; 322 323 enccrd = maccrd = NULL; 324 325 /* Sanity check. */ 326 if (crp == NULL) 327 return (EINVAL); 328 329 if (crp->crp_callback == NULL || crp->crp_desc == NULL) { 330 error = EINVAL; 331 goto out; 332 } 333 334 for (crd = crp->crp_desc; crd != NULL; crd = crd->crd_next) { 335 switch (crd->crd_alg) { 336 case CRYPTO_NULL_HMAC: 337 case CRYPTO_MD5_HMAC: 338 case CRYPTO_SHA1_HMAC: 339 case CRYPTO_RIPEMD160_HMAC: 340 case CRYPTO_SHA2_256_HMAC: 341 case CRYPTO_SHA2_384_HMAC: 342 case CRYPTO_SHA2_512_HMAC: 343 if (maccrd != NULL) { 344 error = EINVAL; 345 goto out; 346 } 347 maccrd = crd; 348 break; 349 case CRYPTO_AES_CBC: 350 if (enccrd != NULL) { 351 error = EINVAL; 352 goto out; 353 } 354 enccrd = crd; 355 break; 356 default: 357 return (EINVAL); 358 } 359 } 360 if (enccrd == NULL || (enccrd->crd_len % AES_BLOCK_LEN) != 0) { 361 error = EINVAL; 362 goto out; 363 } 364 365 rw_rlock(&sc->sc_sessions_lock); 366 TAILQ_FOREACH_REVERSE(ses, &sc->sc_sessions, padlock_sessions_head, 367 ses_next) { 368 if (ses->ses_id == (crp->crp_sid & 0xffffffff)) 369 break; 370 } 371 rw_runlock(&sc->sc_sessions_lock); 372 if (ses == NULL) { 373 error = EINVAL; 374 goto out; 375 } 376 377 /* Perform data authentication if requested before encryption. */ 378 if (maccrd != NULL && maccrd->crd_next == enccrd) { 379 error = padlock_hash_process(ses, maccrd, crp); 380 if (error != 0) 381 goto out; 382 } 383 384 error = padlock_cipher_process(ses, enccrd, crp); 385 if (error != 0) 386 goto out; 387 388 /* Perform data authentication if requested after encryption. */ 389 if (maccrd != NULL && enccrd->crd_next == maccrd) { 390 error = padlock_hash_process(ses, maccrd, crp); 391 if (error != 0) 392 goto out; 393 } 394 395 out: 396 #if 0 397 /* 398 * This code is not necessary, because contexts will be freed on next 399 * padlock_setup_mackey() call or at padlock_freesession() call. 400 */ 401 if (ses != NULL && maccrd != NULL && 402 (maccrd->crd_flags & CRD_F_KEY_EXPLICIT) != 0) { 403 padlock_free_ctx(ses->ses_axf, ses->ses_ictx); 404 padlock_free_ctx(ses->ses_axf, ses->ses_octx); 405 } 406 #endif 407 crp->crp_etype = error; 408 crypto_done(crp); 409 return (error); 410 } 411 412 static device_method_t padlock_methods[] = { 413 DEVMETHOD(device_identify, padlock_identify), 414 DEVMETHOD(device_probe, padlock_probe), 415 DEVMETHOD(device_attach, padlock_attach), 416 DEVMETHOD(device_detach, padlock_detach), 417 418 DEVMETHOD(cryptodev_newsession, padlock_newsession), 419 DEVMETHOD(cryptodev_freesession,padlock_freesession), 420 DEVMETHOD(cryptodev_process, padlock_process), 421 422 {0, 0}, 423 }; 424 425 static driver_t padlock_driver = { 426 "padlock", 427 padlock_methods, 428 sizeof(struct padlock_softc), 429 }; 430 static devclass_t padlock_devclass; 431 432 /* XXX where to attach */ 433 DRIVER_MODULE(padlock, nexus, padlock_driver, padlock_devclass, 0, 0); 434 MODULE_VERSION(padlock, 1); 435 MODULE_DEPEND(padlock, crypto, 1, 1, 1); 436