1 /*- 2 * Copyright (c) 2005-2006 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(__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 int padlock_process(device_t, struct cryptop *crp, int hint __unused); 69 70 MALLOC_DEFINE(M_PADLOCK, "padlock_data", "PadLock Data"); 71 72 static void 73 padlock_identify(device_t *dev, device_t parent) 74 { 75 /* NB: order 10 is so we get attached after h/w devices */ 76 if (device_find_child(parent, "padlock", -1) == NULL && 77 BUS_ADD_CHILD(parent, 10, "padlock", -1) == 0) 78 panic("padlock: could not attach"); 79 } 80 81 static int 82 padlock_probe(device_t dev) 83 { 84 char capp[256]; 85 86 #if defined(__i386__) && !defined(PC98) 87 /* If there is no AES support, we has nothing to do here. */ 88 if (!(via_feature_xcrypt & VIA_HAS_AES)) { 89 device_printf(dev, "No ACE support.\n"); 90 return (EINVAL); 91 } 92 strlcpy(capp, "AES-CBC", sizeof(capp)); 93 #if 0 94 strlcat(capp, ",AES-EBC", sizeof(capp)); 95 strlcat(capp, ",AES-CFB", sizeof(capp)); 96 strlcat(capp, ",AES-OFB", sizeof(capp)); 97 #endif 98 if (via_feature_xcrypt & VIA_HAS_SHA) { 99 strlcat(capp, ",SHA1", sizeof(capp)); 100 strlcat(capp, ",SHA256", sizeof(capp)); 101 } 102 #if 0 103 if (via_feature_xcrypt & VIA_HAS_AESCTR) 104 strlcat(capp, ",AES-CTR", sizeof(capp)); 105 if (via_feature_xcrypt & VIA_HAS_MM) 106 strlcat(capp, ",RSA", sizeof(capp)); 107 #endif 108 device_set_desc_copy(dev, capp); 109 return (0); 110 #else 111 return (EINVAL); 112 #endif 113 } 114 115 static int 116 padlock_attach(device_t dev) 117 { 118 struct padlock_softc *sc = device_get_softc(dev); 119 120 TAILQ_INIT(&sc->sc_sessions); 121 sc->sc_sid = 1; 122 123 sc->sc_cid = crypto_get_driverid(dev, CRYPTOCAP_F_HARDWARE); 124 if (sc->sc_cid < 0) { 125 device_printf(dev, "Could not get crypto driver id.\n"); 126 return (ENOMEM); 127 } 128 129 rw_init(&sc->sc_sessions_lock, "padlock_lock"); 130 crypto_register(sc->sc_cid, CRYPTO_AES_CBC, 0, 0); 131 crypto_register(sc->sc_cid, CRYPTO_MD5_HMAC, 0, 0); 132 crypto_register(sc->sc_cid, CRYPTO_SHA1_HMAC, 0, 0); 133 crypto_register(sc->sc_cid, CRYPTO_RIPEMD160_HMAC, 0, 0); 134 crypto_register(sc->sc_cid, CRYPTO_SHA2_256_HMAC, 0, 0); 135 crypto_register(sc->sc_cid, CRYPTO_SHA2_384_HMAC, 0, 0); 136 crypto_register(sc->sc_cid, CRYPTO_SHA2_512_HMAC, 0, 0); 137 return (0); 138 } 139 140 static int 141 padlock_detach(device_t dev) 142 { 143 struct padlock_softc *sc = device_get_softc(dev); 144 struct padlock_session *ses; 145 146 rw_wlock(&sc->sc_sessions_lock); 147 TAILQ_FOREACH(ses, &sc->sc_sessions, ses_next) { 148 if (ses->ses_used) { 149 rw_wunlock(&sc->sc_sessions_lock); 150 device_printf(dev, 151 "Cannot detach, sessions still active.\n"); 152 return (EBUSY); 153 } 154 } 155 for (ses = TAILQ_FIRST(&sc->sc_sessions); ses != NULL; 156 ses = TAILQ_FIRST(&sc->sc_sessions)) { 157 TAILQ_REMOVE(&sc->sc_sessions, ses, ses_next); 158 free(ses, M_PADLOCK); 159 } 160 rw_destroy(&sc->sc_sessions_lock); 161 crypto_unregister_all(sc->sc_cid); 162 return (0); 163 } 164 165 static int 166 padlock_newsession(device_t dev, uint32_t *sidp, struct cryptoini *cri) 167 { 168 struct padlock_softc *sc = device_get_softc(dev); 169 struct padlock_session *ses = NULL; 170 struct cryptoini *encini, *macini; 171 int error; 172 173 if (sidp == NULL || cri == NULL) 174 return (EINVAL); 175 176 encini = macini = NULL; 177 for (; cri != NULL; cri = cri->cri_next) { 178 switch (cri->cri_alg) { 179 case CRYPTO_NULL_HMAC: 180 case CRYPTO_MD5_HMAC: 181 case CRYPTO_SHA1_HMAC: 182 case CRYPTO_RIPEMD160_HMAC: 183 case CRYPTO_SHA2_256_HMAC: 184 case CRYPTO_SHA2_384_HMAC: 185 case CRYPTO_SHA2_512_HMAC: 186 if (macini != NULL) 187 return (EINVAL); 188 macini = cri; 189 break; 190 case CRYPTO_AES_CBC: 191 if (encini != NULL) 192 return (EINVAL); 193 encini = cri; 194 break; 195 default: 196 return (EINVAL); 197 } 198 } 199 200 /* 201 * We only support HMAC algorithms to be able to work with 202 * ipsec(4), so if we are asked only for authentication without 203 * encryption, don't pretend we can accellerate it. 204 */ 205 if (encini == NULL) 206 return (EINVAL); 207 208 /* 209 * Let's look for a free session structure. 210 */ 211 rw_wlock(&sc->sc_sessions_lock); 212 /* 213 * Free sessions goes first, so if first session is used, we need to 214 * allocate one. 215 */ 216 ses = TAILQ_FIRST(&sc->sc_sessions); 217 if (ses == NULL || ses->ses_used) 218 ses = NULL; 219 else { 220 TAILQ_REMOVE(&sc->sc_sessions, ses, ses_next); 221 ses->ses_used = 1; 222 TAILQ_INSERT_TAIL(&sc->sc_sessions, ses, ses_next); 223 } 224 if (ses == NULL) { 225 ses = malloc(sizeof(*ses), M_PADLOCK, M_NOWAIT | M_ZERO); 226 if (ses == NULL) { 227 rw_wunlock(&sc->sc_sessions_lock); 228 return (ENOMEM); 229 } 230 ses->ses_used = 1; 231 ses->ses_id = sc->sc_sid++; 232 TAILQ_INSERT_TAIL(&sc->sc_sessions, ses, ses_next); 233 } 234 rw_wunlock(&sc->sc_sessions_lock); 235 236 error = padlock_cipher_setup(ses, encini); 237 if (error != 0) { 238 padlock_freesession(NULL, ses->ses_id); 239 return (error); 240 } 241 242 if (macini != NULL) { 243 error = padlock_hash_setup(ses, macini); 244 if (error != 0) { 245 padlock_freesession(NULL, ses->ses_id); 246 return (error); 247 } 248 } 249 250 *sidp = ses->ses_id; 251 return (0); 252 } 253 254 static int 255 padlock_freesession(device_t dev, uint64_t tid) 256 { 257 struct padlock_softc *sc = device_get_softc(dev); 258 struct padlock_session *ses; 259 uint32_t sid = ((uint32_t)tid) & 0xffffffff; 260 261 rw_wlock(&sc->sc_sessions_lock); 262 TAILQ_FOREACH_REVERSE(ses, &sc->sc_sessions, padlock_sessions_head, 263 ses_next) { 264 if (ses->ses_id == sid) 265 break; 266 } 267 if (ses == NULL) { 268 rw_wunlock(&sc->sc_sessions_lock); 269 return (EINVAL); 270 } 271 TAILQ_REMOVE(&sc->sc_sessions, ses, ses_next); 272 padlock_hash_free(ses); 273 bzero(ses, sizeof(*ses)); 274 ses->ses_used = 0; 275 ses->ses_id = sid; 276 TAILQ_INSERT_HEAD(&sc->sc_sessions, ses, ses_next); 277 rw_wunlock(&sc->sc_sessions_lock); 278 return (0); 279 } 280 281 static int 282 padlock_process(device_t dev, struct cryptop *crp, int hint __unused) 283 { 284 struct padlock_softc *sc = device_get_softc(dev); 285 struct padlock_session *ses = NULL; 286 struct cryptodesc *crd, *enccrd, *maccrd; 287 int error = 0; 288 289 enccrd = maccrd = NULL; 290 291 if (crp == NULL || crp->crp_callback == NULL || crp->crp_desc == NULL) { 292 error = EINVAL; 293 goto out; 294 } 295 296 for (crd = crp->crp_desc; crd != NULL; crd = crd->crd_next) { 297 switch (crd->crd_alg) { 298 case CRYPTO_NULL_HMAC: 299 case CRYPTO_MD5_HMAC: 300 case CRYPTO_SHA1_HMAC: 301 case CRYPTO_RIPEMD160_HMAC: 302 case CRYPTO_SHA2_256_HMAC: 303 case CRYPTO_SHA2_384_HMAC: 304 case CRYPTO_SHA2_512_HMAC: 305 if (maccrd != NULL) { 306 error = EINVAL; 307 goto out; 308 } 309 maccrd = crd; 310 break; 311 case CRYPTO_AES_CBC: 312 if (enccrd != NULL) { 313 error = EINVAL; 314 goto out; 315 } 316 enccrd = crd; 317 break; 318 default: 319 return (EINVAL); 320 } 321 } 322 if (enccrd == NULL || (enccrd->crd_len % AES_BLOCK_LEN) != 0) { 323 error = EINVAL; 324 goto out; 325 } 326 327 rw_rlock(&sc->sc_sessions_lock); 328 TAILQ_FOREACH_REVERSE(ses, &sc->sc_sessions, padlock_sessions_head, 329 ses_next) { 330 if (ses->ses_id == (crp->crp_sid & 0xffffffff)) 331 break; 332 } 333 rw_runlock(&sc->sc_sessions_lock); 334 if (ses == NULL) { 335 error = EINVAL; 336 goto out; 337 } 338 339 /* Perform data authentication if requested before encryption. */ 340 if (maccrd != NULL && maccrd->crd_next == enccrd) { 341 error = padlock_hash_process(ses, maccrd, crp); 342 if (error != 0) 343 goto out; 344 } 345 346 error = padlock_cipher_process(ses, enccrd, crp); 347 if (error != 0) 348 goto out; 349 350 /* Perform data authentication if requested after encryption. */ 351 if (maccrd != NULL && enccrd->crd_next == maccrd) { 352 error = padlock_hash_process(ses, maccrd, crp); 353 if (error != 0) 354 goto out; 355 } 356 357 out: 358 #if 0 359 /* 360 * This code is not necessary, because contexts will be freed on next 361 * padlock_setup_mackey() call or at padlock_freesession() call. 362 */ 363 if (ses != NULL && maccrd != NULL && 364 (maccrd->crd_flags & CRD_F_KEY_EXPLICIT) != 0) { 365 padlock_free_ctx(ses->ses_axf, ses->ses_ictx); 366 padlock_free_ctx(ses->ses_axf, ses->ses_octx); 367 } 368 #endif 369 crp->crp_etype = error; 370 crypto_done(crp); 371 return (error); 372 } 373 374 static device_method_t padlock_methods[] = { 375 DEVMETHOD(device_identify, padlock_identify), 376 DEVMETHOD(device_probe, padlock_probe), 377 DEVMETHOD(device_attach, padlock_attach), 378 DEVMETHOD(device_detach, padlock_detach), 379 380 DEVMETHOD(cryptodev_newsession, padlock_newsession), 381 DEVMETHOD(cryptodev_freesession,padlock_freesession), 382 DEVMETHOD(cryptodev_process, padlock_process), 383 384 {0, 0}, 385 }; 386 387 static driver_t padlock_driver = { 388 "padlock", 389 padlock_methods, 390 sizeof(struct padlock_softc), 391 }; 392 static devclass_t padlock_devclass; 393 394 /* XXX where to attach */ 395 DRIVER_MODULE(padlock, nexus, padlock_driver, padlock_devclass, 0, 0); 396 MODULE_VERSION(padlock, 1); 397 MODULE_DEPEND(padlock, crypto, 1, 1, 1); 398