/* * Cryptographic API. * * Support for z990 cryptographic instructions. * * Copyright (C) 2003 IBM Deutschland GmbH, IBM Corporation * Author(s): Thomas Spatzier (tspat@de.ibm.com) * * This program is free software; you can redistribute it and/or modify it * under the terms of the GNU General Public License as published by the Free * Software Foundation; either version 2 of the License, or (at your option) * any later version. * */ #ifndef _CRYPTO_ARCH_S390_CRYPT_Z990_H #define _CRYPTO_ARCH_S390_CRYPT_Z990_H #include <asm/errno.h> #define CRYPT_Z990_OP_MASK 0xFF00 #define CRYPT_Z990_FUNC_MASK 0x00FF /*z990 cryptographic operations*/ enum crypt_z990_operations { CRYPT_Z990_KM = 0x0100, CRYPT_Z990_KMC = 0x0200, CRYPT_Z990_KIMD = 0x0300, CRYPT_Z990_KLMD = 0x0400, CRYPT_Z990_KMAC = 0x0500 }; /*function codes for KM (CIPHER MESSAGE) instruction*/ enum crypt_z990_km_func { KM_QUERY = CRYPT_Z990_KM | 0, KM_DEA_ENCRYPT = CRYPT_Z990_KM | 1, KM_DEA_DECRYPT = CRYPT_Z990_KM | 1 | 0x80, //modifier bit->decipher KM_TDEA_128_ENCRYPT = CRYPT_Z990_KM | 2, KM_TDEA_128_DECRYPT = CRYPT_Z990_KM | 2 | 0x80, KM_TDEA_192_ENCRYPT = CRYPT_Z990_KM | 3, KM_TDEA_192_DECRYPT = CRYPT_Z990_KM | 3 | 0x80, }; /*function codes for KMC (CIPHER MESSAGE WITH CHAINING) instruction*/ enum crypt_z990_kmc_func { KMC_QUERY = CRYPT_Z990_KMC | 0, KMC_DEA_ENCRYPT = CRYPT_Z990_KMC | 1, KMC_DEA_DECRYPT = CRYPT_Z990_KMC | 1 | 0x80, //modifier bit->decipher KMC_TDEA_128_ENCRYPT = CRYPT_Z990_KMC | 2, KMC_TDEA_128_DECRYPT = CRYPT_Z990_KMC | 2 | 0x80, KMC_TDEA_192_ENCRYPT = CRYPT_Z990_KMC | 3, KMC_TDEA_192_DECRYPT = CRYPT_Z990_KMC | 3 | 0x80, }; /*function codes for KIMD (COMPUTE INTERMEDIATE MESSAGE DIGEST) instruction*/ enum crypt_z990_kimd_func { KIMD_QUERY = CRYPT_Z990_KIMD | 0, KIMD_SHA_1 = CRYPT_Z990_KIMD | 1, }; /*function codes for KLMD (COMPUTE LAST MESSAGE DIGEST) instruction*/ enum crypt_z990_klmd_func { KLMD_QUERY = CRYPT_Z990_KLMD | 0, KLMD_SHA_1 = CRYPT_Z990_KLMD | 1, }; /*function codes for KMAC (COMPUTE MESSAGE AUTHENTICATION CODE) instruction*/ enum crypt_z990_kmac_func { KMAC_QUERY = CRYPT_Z990_KMAC | 0, KMAC_DEA = CRYPT_Z990_KMAC | 1, KMAC_TDEA_128 = CRYPT_Z990_KMAC | 2, KMAC_TDEA_192 = CRYPT_Z990_KMAC | 3 }; /*status word for z990 crypto instructions' QUERY functions*/ struct crypt_z990_query_status { u64 high; u64 low; }; /* * Standard fixup and ex_table sections for crypt_z990 inline functions. * label 0: the z990 crypto operation * label 1: just after 1 to catch illegal operation exception on non-z990 * label 6: the return point after fixup * label 7: set error value if exception _in_ crypto operation * label 8: set error value if illegal operation exception * [ret] is the variable to receive the error code * [ERR] is the error code value */ #ifndef __s390x__ #define __crypt_z990_fixup \ ".section .fixup,\"ax\" \n" \ "7: lhi %0,%h[e1] \n" \ " bras 1,9f \n" \ " .long 6b \n" \ "8: lhi %0,%h[e2] \n" \ " bras 1,9f \n" \ " .long 6b \n" \ "9: l 1,0(1) \n" \ " br 1 \n" \ ".previous \n" \ ".section __ex_table,\"a\" \n" \ " .align 4 \n" \ " .long 0b,7b \n" \ " .long 1b,8b \n" \ ".previous" #else /* __s390x__ */ #define __crypt_z990_fixup \ ".section .fixup,\"ax\" \n" \ "7: lhi %0,%h[e1] \n" \ " jg 6b \n" \ "8: lhi %0,%h[e2] \n" \ " jg 6b \n" \ ".previous\n" \ ".section __ex_table,\"a\" \n" \ " .align 8 \n" \ " .quad 0b,7b \n" \ " .quad 1b,8b \n" \ ".previous" #endif /* __s390x__ */ /* * Standard code for setting the result of z990 crypto instructions. * %0: the register which will receive the result * [result]: the register containing the result (e.g. second operand length * to compute number of processed bytes]. */ #ifndef __s390x__ #define __crypt_z990_set_result \ " lr %0,%[result] \n" #else /* __s390x__ */ #define __crypt_z990_set_result \ " lgr %0,%[result] \n" #endif /* * Executes the KM (CIPHER MESSAGE) operation of the z990 CPU. * @param func: the function code passed to KM; see crypt_z990_km_func * @param param: address of parameter block; see POP for details on each func * @param dest: address of destination memory area * @param src: address of source memory area * @param src_len: length of src operand in bytes * @returns < zero for failure, 0 for the query func, number of processed bytes * for encryption/decryption funcs */ static inline int crypt_z990_km(long func, void* param, u8* dest, const u8* src, long src_len) { register long __func asm("0") = func & CRYPT_Z990_FUNC_MASK; register void* __param asm("1") = param; register u8* __dest asm("4") = dest; register const u8* __src asm("2") = src; register long __src_len asm("3") = src_len; int ret; ret = 0; __asm__ __volatile__ ( "0: .insn rre,0xB92E0000,%1,%2 \n" //KM opcode "1: brc 1,0b \n" //handle partial completion __crypt_z990_set_result "6: \n" __crypt_z990_fixup : "+d" (ret), "+a" (__dest), "+a" (__src), [result] "+d" (__src_len) : [e1] "K" (-EFAULT), [e2] "K" (-ENOSYS), "d" (__func), "a" (__param) : "cc", "memory" ); if (ret >= 0 && func & CRYPT_Z990_FUNC_MASK){ ret = src_len - ret; } return ret; } /* * Executes the KMC (CIPHER MESSAGE WITH CHAINING) operation of the z990 CPU. * @param func: the function code passed to KM; see crypt_z990_kmc_func * @param param: address of parameter block; see POP for details on each func * @param dest: address of destination memory area * @param src: address of source memory area * @param src_len: length of src operand in bytes * @returns < zero for failure, 0 for the query func, number of processed bytes * for encryption/decryption funcs */ static inline int crypt_z990_kmc(long func, void* param, u8* dest, const u8* src, long src_len) { register long __func asm("0") = func & CRYPT_Z990_FUNC_MASK; register void* __param asm("1") = param; register u8* __dest asm("4") = dest; register const u8* __src asm("2") = src; register long __src_len asm("3") = src_len; int ret; ret = 0; __asm__ __volatile__ ( "0: .insn rre,0xB92F0000,%1,%2 \n" //KMC opcode "1: brc 1,0b \n" //handle partial completion __crypt_z990_set_result "6: \n" __crypt_z990_fixup : "+d" (ret), "+a" (__dest), "+a" (__src), [result] "+d" (__src_len) : [e1] "K" (-EFAULT), [e2] "K" (-ENOSYS), "d" (__func), "a" (__param) : "cc", "memory" ); if (ret >= 0 && func & CRYPT_Z990_FUNC_MASK){ ret = src_len - ret; } return ret; } /* * Executes the KIMD (COMPUTE INTERMEDIATE MESSAGE DIGEST) operation * of the z990 CPU. * @param func: the function code passed to KM; see crypt_z990_kimd_func * @param param: address of parameter block; see POP for details on each func * @param src: address of source memory area * @param src_len: length of src operand in bytes * @returns < zero for failure, 0 for the query func, number of processed bytes * for digest funcs */ static inline int crypt_z990_kimd(long func, void* param, const u8* src, long src_len) { register long __func asm("0") = func & CRYPT_Z990_FUNC_MASK; register void* __param asm("1") = param; register const u8* __src asm("2") = src; register long __src_len asm("3") = src_len; int ret; ret = 0; __asm__ __volatile__ ( "0: .insn rre,0xB93E0000,%1,%1 \n" //KIMD opcode "1: brc 1,0b \n" /*handle partical completion of kimd*/ __crypt_z990_set_result "6: \n" __crypt_z990_fixup : "+d" (ret), "+a" (__src), [result] "+d" (__src_len) : [e1] "K" (-EFAULT), [e2] "K" (-ENOSYS), "d" (__func), "a" (__param) : "cc", "memory" ); if (ret >= 0 && (func & CRYPT_Z990_FUNC_MASK)){ ret = src_len - ret; } return ret; } /* * Executes the KLMD (COMPUTE LAST MESSAGE DIGEST) operation of the z990 CPU. * @param func: the function code passed to KM; see crypt_z990_klmd_func * @param param: address of parameter block; see POP for details on each func * @param src: address of source memory area * @param src_len: length of src operand in bytes * @returns < zero for failure, 0 for the query func, number of processed bytes * for digest funcs */ static inline int crypt_z990_klmd(long func, void* param, const u8* src, long src_len) { register long __func asm("0") = func & CRYPT_Z990_FUNC_MASK; register void* __param asm("1") = param; register const u8* __src asm("2") = src; register long __src_len asm("3") = src_len; int ret; ret = 0; __asm__ __volatile__ ( "0: .insn rre,0xB93F0000,%1,%1 \n" //KLMD opcode "1: brc 1,0b \n" /*handle partical completion of klmd*/ __crypt_z990_set_result "6: \n" __crypt_z990_fixup : "+d" (ret), "+a" (__src), [result] "+d" (__src_len) : [e1] "K" (-EFAULT), [e2] "K" (-ENOSYS), "d" (__func), "a" (__param) : "cc", "memory" ); if (ret >= 0 && func & CRYPT_Z990_FUNC_MASK){ ret = src_len - ret; } return ret; } /* * Executes the KMAC (COMPUTE MESSAGE AUTHENTICATION CODE) operation * of the z990 CPU. * @param func: the function code passed to KM; see crypt_z990_klmd_func * @param param: address of parameter block; see POP for details on each func * @param src: address of source memory area * @param src_len: length of src operand in bytes * @returns < zero for failure, 0 for the query func, number of processed bytes * for digest funcs */ static inline int crypt_z990_kmac(long func, void* param, const u8* src, long src_len) { register long __func asm("0") = func & CRYPT_Z990_FUNC_MASK; register void* __param asm("1") = param; register const u8* __src asm("2") = src; register long __src_len asm("3") = src_len; int ret; ret = 0; __asm__ __volatile__ ( "0: .insn rre,0xB91E0000,%5,%5 \n" //KMAC opcode "1: brc 1,0b \n" /*handle partical completion of klmd*/ __crypt_z990_set_result "6: \n" __crypt_z990_fixup : "+d" (ret), "+a" (__src), [result] "+d" (__src_len) : [e1] "K" (-EFAULT), [e2] "K" (-ENOSYS), "d" (__func), "a" (__param) : "cc", "memory" ); if (ret >= 0 && func & CRYPT_Z990_FUNC_MASK){ ret = src_len - ret; } return ret; } /** * Tests if a specific z990 crypto function is implemented on the machine. * @param func: the function code of the specific function; 0 if op in general * @return 1 if func available; 0 if func or op in general not available */ static inline int crypt_z990_func_available(int func) { int ret; struct crypt_z990_query_status status = { .high = 0, .low = 0 }; switch (func & CRYPT_Z990_OP_MASK){ case CRYPT_Z990_KM: ret = crypt_z990_km(KM_QUERY, &status, NULL, NULL, 0); break; case CRYPT_Z990_KMC: ret = crypt_z990_kmc(KMC_QUERY, &status, NULL, NULL, 0); break; case CRYPT_Z990_KIMD: ret = crypt_z990_kimd(KIMD_QUERY, &status, NULL, 0); break; case CRYPT_Z990_KLMD: ret = crypt_z990_klmd(KLMD_QUERY, &status, NULL, 0); break; case CRYPT_Z990_KMAC: ret = crypt_z990_kmac(KMAC_QUERY, &status, NULL, 0); break; default: ret = 0; return ret; } if (ret >= 0){ func &= CRYPT_Z990_FUNC_MASK; func &= 0x7f; //mask modifier bit if (func < 64){ ret = (status.high >> (64 - func - 1)) & 0x1; } else { ret = (status.low >> (128 - func - 1)) & 0x1; } } else { ret = 0; } return ret; } #endif // _CRYPTO_ARCH_S390_CRYPT_Z990_H