1 /* SPDX-License-Identifier: GPL-2.0 */ 2 /* 3 * CP Assist for Cryptographic Functions (CPACF) 4 * 5 * Copyright IBM Corp. 2003, 2017 6 * Author(s): Thomas Spatzier 7 * Jan Glauber 8 * Harald Freudenberger (freude@de.ibm.com) 9 * Martin Schwidefsky <schwidefsky@de.ibm.com> 10 */ 11 #ifndef _ASM_S390_CPACF_H 12 #define _ASM_S390_CPACF_H 13 14 #include <asm/facility.h> 15 16 /* 17 * Instruction opcodes for the CPACF instructions 18 */ 19 #define CPACF_KMAC 0xb91e /* MSA */ 20 #define CPACF_KM 0xb92e /* MSA */ 21 #define CPACF_KMC 0xb92f /* MSA */ 22 #define CPACF_KIMD 0xb93e /* MSA */ 23 #define CPACF_KLMD 0xb93f /* MSA */ 24 #define CPACF_PCKMO 0xb928 /* MSA3 */ 25 #define CPACF_KMF 0xb92a /* MSA4 */ 26 #define CPACF_KMO 0xb92b /* MSA4 */ 27 #define CPACF_PCC 0xb92c /* MSA4 */ 28 #define CPACF_KMCTR 0xb92d /* MSA4 */ 29 #define CPACF_PRNO 0xb93c /* MSA5 */ 30 #define CPACF_KMA 0xb929 /* MSA8 */ 31 #define CPACF_KDSA 0xb93a /* MSA9 */ 32 33 /* 34 * En/decryption modifier bits 35 */ 36 #define CPACF_ENCRYPT 0x00 37 #define CPACF_DECRYPT 0x80 38 39 /* 40 * Function codes for the KM (CIPHER MESSAGE) instruction 41 */ 42 #define CPACF_KM_QUERY 0x00 43 #define CPACF_KM_DEA 0x01 44 #define CPACF_KM_TDEA_128 0x02 45 #define CPACF_KM_TDEA_192 0x03 46 #define CPACF_KM_AES_128 0x12 47 #define CPACF_KM_AES_192 0x13 48 #define CPACF_KM_AES_256 0x14 49 #define CPACF_KM_PAES_128 0x1a 50 #define CPACF_KM_PAES_192 0x1b 51 #define CPACF_KM_PAES_256 0x1c 52 #define CPACF_KM_XTS_128 0x32 53 #define CPACF_KM_XTS_256 0x34 54 #define CPACF_KM_PXTS_128 0x3a 55 #define CPACF_KM_PXTS_256 0x3c 56 57 /* 58 * Function codes for the KMC (CIPHER MESSAGE WITH CHAINING) 59 * instruction 60 */ 61 #define CPACF_KMC_QUERY 0x00 62 #define CPACF_KMC_DEA 0x01 63 #define CPACF_KMC_TDEA_128 0x02 64 #define CPACF_KMC_TDEA_192 0x03 65 #define CPACF_KMC_AES_128 0x12 66 #define CPACF_KMC_AES_192 0x13 67 #define CPACF_KMC_AES_256 0x14 68 #define CPACF_KMC_PAES_128 0x1a 69 #define CPACF_KMC_PAES_192 0x1b 70 #define CPACF_KMC_PAES_256 0x1c 71 #define CPACF_KMC_PRNG 0x43 72 73 /* 74 * Function codes for the KMCTR (CIPHER MESSAGE WITH COUNTER) 75 * instruction 76 */ 77 #define CPACF_KMCTR_QUERY 0x00 78 #define CPACF_KMCTR_DEA 0x01 79 #define CPACF_KMCTR_TDEA_128 0x02 80 #define CPACF_KMCTR_TDEA_192 0x03 81 #define CPACF_KMCTR_AES_128 0x12 82 #define CPACF_KMCTR_AES_192 0x13 83 #define CPACF_KMCTR_AES_256 0x14 84 #define CPACF_KMCTR_PAES_128 0x1a 85 #define CPACF_KMCTR_PAES_192 0x1b 86 #define CPACF_KMCTR_PAES_256 0x1c 87 88 /* 89 * Function codes for the KIMD (COMPUTE INTERMEDIATE MESSAGE DIGEST) 90 * instruction 91 */ 92 #define CPACF_KIMD_QUERY 0x00 93 #define CPACF_KIMD_SHA_1 0x01 94 #define CPACF_KIMD_SHA_256 0x02 95 #define CPACF_KIMD_SHA_512 0x03 96 #define CPACF_KIMD_SHA3_224 0x20 97 #define CPACF_KIMD_SHA3_256 0x21 98 #define CPACF_KIMD_SHA3_384 0x22 99 #define CPACF_KIMD_SHA3_512 0x23 100 #define CPACF_KIMD_GHASH 0x41 101 102 /* 103 * Function codes for the KLMD (COMPUTE LAST MESSAGE DIGEST) 104 * instruction 105 */ 106 #define CPACF_KLMD_QUERY 0x00 107 #define CPACF_KLMD_SHA_1 0x01 108 #define CPACF_KLMD_SHA_256 0x02 109 #define CPACF_KLMD_SHA_512 0x03 110 #define CPACF_KLMD_SHA3_224 0x20 111 #define CPACF_KLMD_SHA3_256 0x21 112 #define CPACF_KLMD_SHA3_384 0x22 113 #define CPACF_KLMD_SHA3_512 0x23 114 115 /* 116 * function codes for the KMAC (COMPUTE MESSAGE AUTHENTICATION CODE) 117 * instruction 118 */ 119 #define CPACF_KMAC_QUERY 0x00 120 #define CPACF_KMAC_DEA 0x01 121 #define CPACF_KMAC_TDEA_128 0x02 122 #define CPACF_KMAC_TDEA_192 0x03 123 124 /* 125 * Function codes for the PCKMO (PERFORM CRYPTOGRAPHIC KEY MANAGEMENT) 126 * instruction 127 */ 128 #define CPACF_PCKMO_QUERY 0x00 129 #define CPACF_PCKMO_ENC_DES_KEY 0x01 130 #define CPACF_PCKMO_ENC_TDES_128_KEY 0x02 131 #define CPACF_PCKMO_ENC_TDES_192_KEY 0x03 132 #define CPACF_PCKMO_ENC_AES_128_KEY 0x12 133 #define CPACF_PCKMO_ENC_AES_192_KEY 0x13 134 #define CPACF_PCKMO_ENC_AES_256_KEY 0x14 135 136 /* 137 * Function codes for the PRNO (PERFORM RANDOM NUMBER OPERATION) 138 * instruction 139 */ 140 #define CPACF_PRNO_QUERY 0x00 141 #define CPACF_PRNO_SHA512_DRNG_GEN 0x03 142 #define CPACF_PRNO_SHA512_DRNG_SEED 0x83 143 #define CPACF_PRNO_TRNG_Q_R2C_RATIO 0x70 144 #define CPACF_PRNO_TRNG 0x72 145 146 /* 147 * Function codes for the KMA (CIPHER MESSAGE WITH AUTHENTICATION) 148 * instruction 149 */ 150 #define CPACF_KMA_QUERY 0x00 151 #define CPACF_KMA_GCM_AES_128 0x12 152 #define CPACF_KMA_GCM_AES_192 0x13 153 #define CPACF_KMA_GCM_AES_256 0x14 154 155 /* 156 * Flags for the KMA (CIPHER MESSAGE WITH AUTHENTICATION) instruction 157 */ 158 #define CPACF_KMA_LPC 0x100 /* Last-Plaintext/Ciphertext */ 159 #define CPACF_KMA_LAAD 0x200 /* Last-AAD */ 160 #define CPACF_KMA_HS 0x400 /* Hash-subkey Supplied */ 161 162 typedef struct { unsigned char bytes[16]; } cpacf_mask_t; 163 164 /** 165 * cpacf_query() - check if a specific CPACF function is available 166 * @opcode: the opcode of the crypto instruction 167 * @func: the function code to test for 168 * 169 * Executes the query function for the given crypto instruction @opcode 170 * and checks if @func is available 171 * 172 * Returns 1 if @func is available for @opcode, 0 otherwise 173 */ __cpacf_query(unsigned int opcode,cpacf_mask_t * mask)174 static __always_inline void __cpacf_query(unsigned int opcode, cpacf_mask_t *mask) 175 { 176 asm volatile( 177 " lghi 0,0\n" /* query function */ 178 " lgr 1,%[mask]\n" 179 " spm 0\n" /* pckmo doesn't change the cc */ 180 /* Parameter regs are ignored, but must be nonzero and unique */ 181 "0: .insn rrf,%[opc] << 16,2,4,6,0\n" 182 " brc 1,0b\n" /* handle partial completion */ 183 : "=m" (*mask) 184 : [mask] "d" ((unsigned long)mask), [opc] "i" (opcode) 185 : "cc", "0", "1"); 186 } 187 __cpacf_check_opcode(unsigned int opcode)188 static __always_inline int __cpacf_check_opcode(unsigned int opcode) 189 { 190 switch (opcode) { 191 case CPACF_KMAC: 192 case CPACF_KM: 193 case CPACF_KMC: 194 case CPACF_KIMD: 195 case CPACF_KLMD: 196 return test_facility(17); /* check for MSA */ 197 case CPACF_PCKMO: 198 return test_facility(76); /* check for MSA3 */ 199 case CPACF_KMF: 200 case CPACF_KMO: 201 case CPACF_PCC: 202 case CPACF_KMCTR: 203 return test_facility(77); /* check for MSA4 */ 204 case CPACF_PRNO: 205 return test_facility(57); /* check for MSA5 */ 206 case CPACF_KMA: 207 return test_facility(146); /* check for MSA8 */ 208 default: 209 BUG(); 210 } 211 } 212 cpacf_query(unsigned int opcode,cpacf_mask_t * mask)213 static __always_inline int cpacf_query(unsigned int opcode, cpacf_mask_t *mask) 214 { 215 if (__cpacf_check_opcode(opcode)) { 216 __cpacf_query(opcode, mask); 217 return 1; 218 } 219 memset(mask, 0, sizeof(*mask)); 220 return 0; 221 } 222 cpacf_test_func(cpacf_mask_t * mask,unsigned int func)223 static inline int cpacf_test_func(cpacf_mask_t *mask, unsigned int func) 224 { 225 return (mask->bytes[func >> 3] & (0x80 >> (func & 7))) != 0; 226 } 227 cpacf_query_func(unsigned int opcode,unsigned int func)228 static __always_inline int cpacf_query_func(unsigned int opcode, unsigned int func) 229 { 230 cpacf_mask_t mask; 231 232 if (cpacf_query(opcode, &mask)) 233 return cpacf_test_func(&mask, func); 234 return 0; 235 } 236 237 /** 238 * cpacf_km() - executes the KM (CIPHER MESSAGE) instruction 239 * @func: the function code passed to KM; see CPACF_KM_xxx defines 240 * @param: address of parameter block; see POP for details on each func 241 * @dest: address of destination memory area 242 * @src: address of source memory area 243 * @src_len: length of src operand in bytes 244 * 245 * Returns 0 for the query func, number of processed bytes for 246 * encryption/decryption funcs 247 */ cpacf_km(unsigned long func,void * param,u8 * dest,const u8 * src,long src_len)248 static inline int cpacf_km(unsigned long func, void *param, 249 u8 *dest, const u8 *src, long src_len) 250 { 251 union register_pair d, s; 252 253 d.even = (unsigned long)dest; 254 s.even = (unsigned long)src; 255 s.odd = (unsigned long)src_len; 256 asm volatile( 257 " lgr 0,%[fc]\n" 258 " lgr 1,%[pba]\n" 259 "0: .insn rre,%[opc] << 16,%[dst],%[src]\n" 260 " brc 1,0b\n" /* handle partial completion */ 261 : [src] "+&d" (s.pair), [dst] "+&d" (d.pair) 262 : [fc] "d" (func), [pba] "d" ((unsigned long)param), 263 [opc] "i" (CPACF_KM) 264 : "cc", "memory", "0", "1"); 265 266 return src_len - s.odd; 267 } 268 269 /** 270 * cpacf_kmc() - executes the KMC (CIPHER MESSAGE WITH CHAINING) instruction 271 * @func: the function code passed to KM; see CPACF_KMC_xxx defines 272 * @param: address of parameter block; see POP for details on each func 273 * @dest: address of destination memory area 274 * @src: address of source memory area 275 * @src_len: length of src operand in bytes 276 * 277 * Returns 0 for the query func, number of processed bytes for 278 * encryption/decryption funcs 279 */ cpacf_kmc(unsigned long func,void * param,u8 * dest,const u8 * src,long src_len)280 static inline int cpacf_kmc(unsigned long func, void *param, 281 u8 *dest, const u8 *src, long src_len) 282 { 283 union register_pair d, s; 284 285 d.even = (unsigned long)dest; 286 s.even = (unsigned long)src; 287 s.odd = (unsigned long)src_len; 288 asm volatile( 289 " lgr 0,%[fc]\n" 290 " lgr 1,%[pba]\n" 291 "0: .insn rre,%[opc] << 16,%[dst],%[src]\n" 292 " brc 1,0b\n" /* handle partial completion */ 293 : [src] "+&d" (s.pair), [dst] "+&d" (d.pair) 294 : [fc] "d" (func), [pba] "d" ((unsigned long)param), 295 [opc] "i" (CPACF_KMC) 296 : "cc", "memory", "0", "1"); 297 298 return src_len - s.odd; 299 } 300 301 /** 302 * cpacf_kimd() - executes the KIMD (COMPUTE INTERMEDIATE MESSAGE DIGEST) 303 * instruction 304 * @func: the function code passed to KM; see CPACF_KIMD_xxx defines 305 * @param: address of parameter block; see POP for details on each func 306 * @src: address of source memory area 307 * @src_len: length of src operand in bytes 308 */ cpacf_kimd(unsigned long func,void * param,const u8 * src,long src_len)309 static inline void cpacf_kimd(unsigned long func, void *param, 310 const u8 *src, long src_len) 311 { 312 union register_pair s; 313 314 s.even = (unsigned long)src; 315 s.odd = (unsigned long)src_len; 316 asm volatile( 317 " lgr 0,%[fc]\n" 318 " lgr 1,%[pba]\n" 319 "0: .insn rre,%[opc] << 16,0,%[src]\n" 320 " brc 1,0b\n" /* handle partial completion */ 321 : [src] "+&d" (s.pair) 322 : [fc] "d" (func), [pba] "d" ((unsigned long)(param)), 323 [opc] "i" (CPACF_KIMD) 324 : "cc", "memory", "0", "1"); 325 } 326 327 /** 328 * cpacf_klmd() - executes the KLMD (COMPUTE LAST MESSAGE DIGEST) instruction 329 * @func: the function code passed to KM; see CPACF_KLMD_xxx defines 330 * @param: address of parameter block; see POP for details on each func 331 * @src: address of source memory area 332 * @src_len: length of src operand in bytes 333 */ cpacf_klmd(unsigned long func,void * param,const u8 * src,long src_len)334 static inline void cpacf_klmd(unsigned long func, void *param, 335 const u8 *src, long src_len) 336 { 337 union register_pair s; 338 339 s.even = (unsigned long)src; 340 s.odd = (unsigned long)src_len; 341 asm volatile( 342 " lgr 0,%[fc]\n" 343 " lgr 1,%[pba]\n" 344 "0: .insn rre,%[opc] << 16,0,%[src]\n" 345 " brc 1,0b\n" /* handle partial completion */ 346 : [src] "+&d" (s.pair) 347 : [fc] "d" (func), [pba] "d" ((unsigned long)param), 348 [opc] "i" (CPACF_KLMD) 349 : "cc", "memory", "0", "1"); 350 } 351 352 /** 353 * cpacf_kmac() - executes the KMAC (COMPUTE MESSAGE AUTHENTICATION CODE) 354 * instruction 355 * @func: the function code passed to KM; see CPACF_KMAC_xxx defines 356 * @param: address of parameter block; see POP for details on each func 357 * @src: address of source memory area 358 * @src_len: length of src operand in bytes 359 * 360 * Returns 0 for the query func, number of processed bytes for digest funcs 361 */ cpacf_kmac(unsigned long func,void * param,const u8 * src,long src_len)362 static inline int cpacf_kmac(unsigned long func, void *param, 363 const u8 *src, long src_len) 364 { 365 union register_pair s; 366 367 s.even = (unsigned long)src; 368 s.odd = (unsigned long)src_len; 369 asm volatile( 370 " lgr 0,%[fc]\n" 371 " lgr 1,%[pba]\n" 372 "0: .insn rre,%[opc] << 16,0,%[src]\n" 373 " brc 1,0b\n" /* handle partial completion */ 374 : [src] "+&d" (s.pair) 375 : [fc] "d" (func), [pba] "d" ((unsigned long)param), 376 [opc] "i" (CPACF_KMAC) 377 : "cc", "memory", "0", "1"); 378 379 return src_len - s.odd; 380 } 381 382 /** 383 * cpacf_kmctr() - executes the KMCTR (CIPHER MESSAGE WITH COUNTER) instruction 384 * @func: the function code passed to KMCTR; see CPACF_KMCTR_xxx defines 385 * @param: address of parameter block; see POP for details on each func 386 * @dest: address of destination memory area 387 * @src: address of source memory area 388 * @src_len: length of src operand in bytes 389 * @counter: address of counter value 390 * 391 * Returns 0 for the query func, number of processed bytes for 392 * encryption/decryption funcs 393 */ cpacf_kmctr(unsigned long func,void * param,u8 * dest,const u8 * src,long src_len,u8 * counter)394 static inline int cpacf_kmctr(unsigned long func, void *param, u8 *dest, 395 const u8 *src, long src_len, u8 *counter) 396 { 397 union register_pair d, s, c; 398 399 d.even = (unsigned long)dest; 400 s.even = (unsigned long)src; 401 s.odd = (unsigned long)src_len; 402 c.even = (unsigned long)counter; 403 asm volatile( 404 " lgr 0,%[fc]\n" 405 " lgr 1,%[pba]\n" 406 "0: .insn rrf,%[opc] << 16,%[dst],%[src],%[ctr],0\n" 407 " brc 1,0b\n" /* handle partial completion */ 408 : [src] "+&d" (s.pair), [dst] "+&d" (d.pair), 409 [ctr] "+&d" (c.pair) 410 : [fc] "d" (func), [pba] "d" ((unsigned long)param), 411 [opc] "i" (CPACF_KMCTR) 412 : "cc", "memory", "0", "1"); 413 414 return src_len - s.odd; 415 } 416 417 /** 418 * cpacf_prno() - executes the PRNO (PERFORM RANDOM NUMBER OPERATION) 419 * instruction 420 * @func: the function code passed to PRNO; see CPACF_PRNO_xxx defines 421 * @param: address of parameter block; see POP for details on each func 422 * @dest: address of destination memory area 423 * @dest_len: size of destination memory area in bytes 424 * @seed: address of seed data 425 * @seed_len: size of seed data in bytes 426 */ cpacf_prno(unsigned long func,void * param,u8 * dest,unsigned long dest_len,const u8 * seed,unsigned long seed_len)427 static inline void cpacf_prno(unsigned long func, void *param, 428 u8 *dest, unsigned long dest_len, 429 const u8 *seed, unsigned long seed_len) 430 { 431 union register_pair d, s; 432 433 d.even = (unsigned long)dest; 434 d.odd = (unsigned long)dest_len; 435 s.even = (unsigned long)seed; 436 s.odd = (unsigned long)seed_len; 437 asm volatile ( 438 " lgr 0,%[fc]\n" 439 " lgr 1,%[pba]\n" 440 "0: .insn rre,%[opc] << 16,%[dst],%[seed]\n" 441 " brc 1,0b\n" /* handle partial completion */ 442 : [dst] "+&d" (d.pair) 443 : [fc] "d" (func), [pba] "d" ((unsigned long)param), 444 [seed] "d" (s.pair), [opc] "i" (CPACF_PRNO) 445 : "cc", "memory", "0", "1"); 446 } 447 448 /** 449 * cpacf_trng() - executes the TRNG subfunction of the PRNO instruction 450 * @ucbuf: buffer for unconditioned data 451 * @ucbuf_len: amount of unconditioned data to fetch in bytes 452 * @cbuf: buffer for conditioned data 453 * @cbuf_len: amount of conditioned data to fetch in bytes 454 */ cpacf_trng(u8 * ucbuf,unsigned long ucbuf_len,u8 * cbuf,unsigned long cbuf_len)455 static inline void cpacf_trng(u8 *ucbuf, unsigned long ucbuf_len, 456 u8 *cbuf, unsigned long cbuf_len) 457 { 458 union register_pair u, c; 459 460 u.even = (unsigned long)ucbuf; 461 u.odd = (unsigned long)ucbuf_len; 462 c.even = (unsigned long)cbuf; 463 c.odd = (unsigned long)cbuf_len; 464 asm volatile ( 465 " lghi 0,%[fc]\n" 466 "0: .insn rre,%[opc] << 16,%[ucbuf],%[cbuf]\n" 467 " brc 1,0b\n" /* handle partial completion */ 468 : [ucbuf] "+&d" (u.pair), [cbuf] "+&d" (c.pair) 469 : [fc] "K" (CPACF_PRNO_TRNG), [opc] "i" (CPACF_PRNO) 470 : "cc", "memory", "0"); 471 } 472 473 /** 474 * cpacf_pcc() - executes the PCC (PERFORM CRYPTOGRAPHIC COMPUTATION) 475 * instruction 476 * @func: the function code passed to PCC; see CPACF_KM_xxx defines 477 * @param: address of parameter block; see POP for details on each func 478 */ cpacf_pcc(unsigned long func,void * param)479 static inline void cpacf_pcc(unsigned long func, void *param) 480 { 481 asm volatile( 482 " lgr 0,%[fc]\n" 483 " lgr 1,%[pba]\n" 484 "0: .insn rre,%[opc] << 16,0,0\n" /* PCC opcode */ 485 " brc 1,0b\n" /* handle partial completion */ 486 : 487 : [fc] "d" (func), [pba] "d" ((unsigned long)param), 488 [opc] "i" (CPACF_PCC) 489 : "cc", "memory", "0", "1"); 490 } 491 492 /** 493 * cpacf_pckmo() - executes the PCKMO (PERFORM CRYPTOGRAPHIC KEY 494 * MANAGEMENT) instruction 495 * @func: the function code passed to PCKMO; see CPACF_PCKMO_xxx defines 496 * @param: address of parameter block; see POP for details on each func 497 * 498 * Returns 0. 499 */ cpacf_pckmo(long func,void * param)500 static inline void cpacf_pckmo(long func, void *param) 501 { 502 asm volatile( 503 " lgr 0,%[fc]\n" 504 " lgr 1,%[pba]\n" 505 " .insn rre,%[opc] << 16,0,0\n" /* PCKMO opcode */ 506 : 507 : [fc] "d" (func), [pba] "d" ((unsigned long)param), 508 [opc] "i" (CPACF_PCKMO) 509 : "cc", "memory", "0", "1"); 510 } 511 512 /** 513 * cpacf_kma() - executes the KMA (CIPHER MESSAGE WITH AUTHENTICATION) 514 * instruction 515 * @func: the function code passed to KMA; see CPACF_KMA_xxx defines 516 * @param: address of parameter block; see POP for details on each func 517 * @dest: address of destination memory area 518 * @src: address of source memory area 519 * @src_len: length of src operand in bytes 520 * @aad: address of additional authenticated data memory area 521 * @aad_len: length of aad operand in bytes 522 */ cpacf_kma(unsigned long func,void * param,u8 * dest,const u8 * src,unsigned long src_len,const u8 * aad,unsigned long aad_len)523 static inline void cpacf_kma(unsigned long func, void *param, u8 *dest, 524 const u8 *src, unsigned long src_len, 525 const u8 *aad, unsigned long aad_len) 526 { 527 union register_pair d, s, a; 528 529 d.even = (unsigned long)dest; 530 s.even = (unsigned long)src; 531 s.odd = (unsigned long)src_len; 532 a.even = (unsigned long)aad; 533 a.odd = (unsigned long)aad_len; 534 asm volatile( 535 " lgr 0,%[fc]\n" 536 " lgr 1,%[pba]\n" 537 "0: .insn rrf,%[opc] << 16,%[dst],%[src],%[aad],0\n" 538 " brc 1,0b\n" /* handle partial completion */ 539 : [dst] "+&d" (d.pair), [src] "+&d" (s.pair), 540 [aad] "+&d" (a.pair) 541 : [fc] "d" (func), [pba] "d" ((unsigned long)param), 542 [opc] "i" (CPACF_KMA) 543 : "cc", "memory", "0", "1"); 544 } 545 546 #endif /* _ASM_S390_CPACF_H */ 547