2006-09-20 13:58:32 +00:00
|
|
|
/*
|
|
|
|
* linux/drivers/s390/crypto/zcrypt_pcicc.c
|
|
|
|
*
|
2006-09-20 13:58:36 +00:00
|
|
|
* zcrypt 2.1.0
|
2006-09-20 13:58:32 +00:00
|
|
|
*
|
|
|
|
* Copyright (C) 2001, 2006 IBM Corporation
|
|
|
|
* Author(s): Robert Burroughs
|
|
|
|
* Eric Rossman (edrossma@us.ibm.com)
|
|
|
|
*
|
|
|
|
* Hotplug & misc device support: Jochen Roehrig (roehrig@de.ibm.com)
|
|
|
|
* Major cleanup & driver split: Martin Schwidefsky <schwidefsky@de.ibm.com>
|
|
|
|
* Ralph Wuerthner <rwuerthn@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, or (at your option)
|
|
|
|
* any later version.
|
|
|
|
*
|
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
* GNU General Public License for more details.
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
|
|
* along with this program; if not, write to the Free Software
|
|
|
|
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <linux/module.h>
|
|
|
|
#include <linux/init.h>
|
|
|
|
#include <linux/err.h>
|
|
|
|
#include <asm/atomic.h>
|
|
|
|
#include <asm/uaccess.h>
|
|
|
|
|
|
|
|
#include "ap_bus.h"
|
|
|
|
#include "zcrypt_api.h"
|
|
|
|
#include "zcrypt_error.h"
|
|
|
|
#include "zcrypt_pcicc.h"
|
|
|
|
#include "zcrypt_cca_key.h"
|
|
|
|
|
|
|
|
#define PCICC_MIN_MOD_SIZE 64 /* 512 bits */
|
|
|
|
#define PCICC_MAX_MOD_SIZE_OLD 128 /* 1024 bits */
|
|
|
|
#define PCICC_MAX_MOD_SIZE 256 /* 2048 bits */
|
|
|
|
|
|
|
|
/**
|
|
|
|
* PCICC cards need a speed rating of 0. This keeps them at the end of
|
|
|
|
* the zcrypt device list (see zcrypt_api.c). PCICC cards are only
|
|
|
|
* used if no other cards are present because they are slow and can only
|
|
|
|
* cope with PKCS12 padded requests. The logic is queer. PKCS11 padded
|
|
|
|
* requests are rejected. The modexpo function encrypts PKCS12 padded data
|
|
|
|
* and decrypts any non-PKCS12 padded data (except PKCS11) in the assumption
|
|
|
|
* that it's encrypted PKCS12 data. The modexpo_crt function always decrypts
|
|
|
|
* the data in the assumption that its PKCS12 encrypted data.
|
|
|
|
*/
|
|
|
|
#define PCICC_SPEED_RATING 0
|
|
|
|
|
|
|
|
#define PCICC_MAX_MESSAGE_SIZE 0x710 /* max size type6 v1 crt message */
|
|
|
|
#define PCICC_MAX_RESPONSE_SIZE 0x710 /* max size type86 v1 reply */
|
|
|
|
|
|
|
|
#define PCICC_CLEANUP_TIME (15*HZ)
|
|
|
|
|
|
|
|
static struct ap_device_id zcrypt_pcicc_ids[] = {
|
|
|
|
{ AP_DEVICE(AP_DEVICE_TYPE_PCICC) },
|
|
|
|
{ /* end of list */ },
|
|
|
|
};
|
|
|
|
|
|
|
|
#ifndef CONFIG_ZCRYPT_MONOLITHIC
|
|
|
|
MODULE_DEVICE_TABLE(ap, zcrypt_pcicc_ids);
|
|
|
|
MODULE_AUTHOR("IBM Corporation");
|
|
|
|
MODULE_DESCRIPTION("PCICC Cryptographic Coprocessor device driver, "
|
|
|
|
"Copyright 2001, 2006 IBM Corporation");
|
|
|
|
MODULE_LICENSE("GPL");
|
|
|
|
#endif
|
|
|
|
|
|
|
|
static int zcrypt_pcicc_probe(struct ap_device *ap_dev);
|
|
|
|
static void zcrypt_pcicc_remove(struct ap_device *ap_dev);
|
|
|
|
static void zcrypt_pcicc_receive(struct ap_device *, struct ap_message *,
|
|
|
|
struct ap_message *);
|
|
|
|
|
|
|
|
static struct ap_driver zcrypt_pcicc_driver = {
|
|
|
|
.probe = zcrypt_pcicc_probe,
|
|
|
|
.remove = zcrypt_pcicc_remove,
|
|
|
|
.receive = zcrypt_pcicc_receive,
|
|
|
|
.ids = zcrypt_pcicc_ids,
|
|
|
|
};
|
|
|
|
|
|
|
|
/**
|
|
|
|
* The following is used to initialize the CPRB passed to the PCICC card
|
|
|
|
* in a type6 message. The 3 fields that must be filled in at execution
|
|
|
|
* time are req_parml, rpl_parml and usage_domain. Note that all three
|
|
|
|
* fields are *little*-endian. Actually, everything about this interface
|
|
|
|
* is ascii/little-endian, since the device has 'Intel inside'.
|
|
|
|
*
|
|
|
|
* The CPRB is followed immediately by the parm block.
|
|
|
|
* The parm block contains:
|
|
|
|
* - function code ('PD' 0x5044 or 'PK' 0x504B)
|
|
|
|
* - rule block (0x0A00 'PKCS-1.2' or 0x0A00 'ZERO-PAD')
|
|
|
|
* - VUD block
|
|
|
|
*/
|
|
|
|
static struct CPRB static_cprb = {
|
|
|
|
.cprb_len = __constant_cpu_to_le16(0x0070),
|
|
|
|
.cprb_ver_id = 0x41,
|
|
|
|
.func_id = {0x54,0x32},
|
|
|
|
.checkpoint_flag= 0x01,
|
|
|
|
.svr_namel = __constant_cpu_to_le16(0x0008),
|
|
|
|
.svr_name = {'I','C','S','F',' ',' ',' ',' '}
|
|
|
|
};
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Check the message for PKCS11 padding.
|
|
|
|
*/
|
|
|
|
static inline int is_PKCS11_padded(unsigned char *buffer, int length)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
if ((buffer[0] != 0x00) || (buffer[1] != 0x01))
|
|
|
|
return 0;
|
|
|
|
for (i = 2; i < length; i++)
|
|
|
|
if (buffer[i] != 0xFF)
|
|
|
|
break;
|
|
|
|
if (i < 10 || i == length)
|
|
|
|
return 0;
|
|
|
|
if (buffer[i] != 0x00)
|
|
|
|
return 0;
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Check the message for PKCS12 padding.
|
|
|
|
*/
|
|
|
|
static inline int is_PKCS12_padded(unsigned char *buffer, int length)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
if ((buffer[0] != 0x00) || (buffer[1] != 0x02))
|
|
|
|
return 0;
|
|
|
|
for (i = 2; i < length; i++)
|
|
|
|
if (buffer[i] == 0x00)
|
|
|
|
break;
|
|
|
|
if ((i < 10) || (i == length))
|
|
|
|
return 0;
|
|
|
|
if (buffer[i] != 0x00)
|
|
|
|
return 0;
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Convert a ICAMEX message to a type6 MEX message.
|
|
|
|
*
|
|
|
|
* @zdev: crypto device pointer
|
|
|
|
* @zreq: crypto request pointer
|
|
|
|
* @mex: pointer to user input data
|
|
|
|
*
|
|
|
|
* Returns 0 on success or -EFAULT.
|
|
|
|
*/
|
|
|
|
static int ICAMEX_msg_to_type6MEX_msg(struct zcrypt_device *zdev,
|
|
|
|
struct ap_message *ap_msg,
|
|
|
|
struct ica_rsa_modexpo *mex)
|
|
|
|
{
|
|
|
|
static struct type6_hdr static_type6_hdr = {
|
|
|
|
.type = 0x06,
|
|
|
|
.offset1 = 0x00000058,
|
|
|
|
.agent_id = {0x01,0x00,0x43,0x43,0x41,0x2D,0x41,0x50,
|
|
|
|
0x50,0x4C,0x20,0x20,0x20,0x01,0x01,0x01},
|
|
|
|
.function_code = {'P','K'},
|
|
|
|
};
|
|
|
|
static struct function_and_rules_block static_pke_function_and_rules ={
|
|
|
|
.function_code = {'P','K'},
|
|
|
|
.ulen = __constant_cpu_to_le16(10),
|
|
|
|
.only_rule = {'P','K','C','S','-','1','.','2'}
|
|
|
|
};
|
|
|
|
struct {
|
|
|
|
struct type6_hdr hdr;
|
|
|
|
struct CPRB cprb;
|
|
|
|
struct function_and_rules_block fr;
|
|
|
|
unsigned short length;
|
|
|
|
char text[0];
|
|
|
|
} __attribute__((packed)) *msg = ap_msg->message;
|
|
|
|
int vud_len, pad_len, size;
|
|
|
|
|
|
|
|
/* VUD.ciphertext */
|
|
|
|
if (copy_from_user(msg->text, mex->inputdata, mex->inputdatalength))
|
|
|
|
return -EFAULT;
|
|
|
|
|
|
|
|
if (is_PKCS11_padded(msg->text, mex->inputdatalength))
|
|
|
|
return -EINVAL;
|
|
|
|
|
|
|
|
/* static message header and f&r */
|
|
|
|
msg->hdr = static_type6_hdr;
|
|
|
|
msg->fr = static_pke_function_and_rules;
|
|
|
|
|
|
|
|
if (is_PKCS12_padded(msg->text, mex->inputdatalength)) {
|
|
|
|
/* strip the padding and adjust the data length */
|
|
|
|
pad_len = strnlen(msg->text + 2, mex->inputdatalength - 2) + 3;
|
|
|
|
if (pad_len <= 9 || pad_len >= mex->inputdatalength)
|
|
|
|
return -ENODEV;
|
|
|
|
vud_len = mex->inputdatalength - pad_len;
|
|
|
|
memmove(msg->text, msg->text + pad_len, vud_len);
|
|
|
|
msg->length = cpu_to_le16(vud_len + 2);
|
|
|
|
|
|
|
|
/* Set up key after the variable length text. */
|
|
|
|
size = zcrypt_type6_mex_key_en(mex, msg->text + vud_len, 0);
|
|
|
|
if (size < 0)
|
|
|
|
return size;
|
|
|
|
size += sizeof(*msg) + vud_len; /* total size of msg */
|
|
|
|
} else {
|
|
|
|
vud_len = mex->inputdatalength;
|
|
|
|
msg->length = cpu_to_le16(2 + vud_len);
|
|
|
|
|
|
|
|
msg->hdr.function_code[1] = 'D';
|
|
|
|
msg->fr.function_code[1] = 'D';
|
|
|
|
|
|
|
|
/* Set up key after the variable length text. */
|
|
|
|
size = zcrypt_type6_mex_key_de(mex, msg->text + vud_len, 0);
|
|
|
|
if (size < 0)
|
|
|
|
return size;
|
|
|
|
size += sizeof(*msg) + vud_len; /* total size of msg */
|
|
|
|
}
|
|
|
|
|
|
|
|
/* message header, cprb and f&r */
|
|
|
|
msg->hdr.ToCardLen1 = (size - sizeof(msg->hdr) + 3) & -4;
|
|
|
|
msg->hdr.FromCardLen1 = PCICC_MAX_RESPONSE_SIZE - sizeof(msg->hdr);
|
|
|
|
|
|
|
|
msg->cprb = static_cprb;
|
|
|
|
msg->cprb.usage_domain[0]= AP_QID_QUEUE(zdev->ap_dev->qid);
|
|
|
|
msg->cprb.req_parml = cpu_to_le16(size - sizeof(msg->hdr) -
|
|
|
|
sizeof(msg->cprb));
|
|
|
|
msg->cprb.rpl_parml = cpu_to_le16(msg->hdr.FromCardLen1);
|
|
|
|
|
|
|
|
ap_msg->length = (size + 3) & -4;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Convert a ICACRT message to a type6 CRT message.
|
|
|
|
*
|
|
|
|
* @zdev: crypto device pointer
|
|
|
|
* @zreq: crypto request pointer
|
|
|
|
* @crt: pointer to user input data
|
|
|
|
*
|
|
|
|
* Returns 0 on success or -EFAULT.
|
|
|
|
*/
|
|
|
|
static int ICACRT_msg_to_type6CRT_msg(struct zcrypt_device *zdev,
|
|
|
|
struct ap_message *ap_msg,
|
|
|
|
struct ica_rsa_modexpo_crt *crt)
|
|
|
|
{
|
|
|
|
static struct type6_hdr static_type6_hdr = {
|
|
|
|
.type = 0x06,
|
|
|
|
.offset1 = 0x00000058,
|
|
|
|
.agent_id = {0x01,0x00,0x43,0x43,0x41,0x2D,0x41,0x50,
|
|
|
|
0x50,0x4C,0x20,0x20,0x20,0x01,0x01,0x01},
|
|
|
|
.function_code = {'P','D'},
|
|
|
|
};
|
|
|
|
static struct function_and_rules_block static_pkd_function_and_rules ={
|
|
|
|
.function_code = {'P','D'},
|
|
|
|
.ulen = __constant_cpu_to_le16(10),
|
|
|
|
.only_rule = {'P','K','C','S','-','1','.','2'}
|
|
|
|
};
|
|
|
|
struct {
|
|
|
|
struct type6_hdr hdr;
|
|
|
|
struct CPRB cprb;
|
|
|
|
struct function_and_rules_block fr;
|
|
|
|
unsigned short length;
|
|
|
|
char text[0];
|
|
|
|
} __attribute__((packed)) *msg = ap_msg->message;
|
|
|
|
int size;
|
|
|
|
|
|
|
|
/* VUD.ciphertext */
|
|
|
|
msg->length = cpu_to_le16(2 + crt->inputdatalength);
|
|
|
|
if (copy_from_user(msg->text, crt->inputdata, crt->inputdatalength))
|
|
|
|
return -EFAULT;
|
|
|
|
|
|
|
|
if (is_PKCS11_padded(msg->text, crt->inputdatalength))
|
|
|
|
return -EINVAL;
|
|
|
|
|
|
|
|
/* Set up key after the variable length text. */
|
|
|
|
size = zcrypt_type6_crt_key(crt, msg->text + crt->inputdatalength, 0);
|
|
|
|
if (size < 0)
|
|
|
|
return size;
|
|
|
|
size += sizeof(*msg) + crt->inputdatalength; /* total size of msg */
|
|
|
|
|
|
|
|
/* message header, cprb and f&r */
|
|
|
|
msg->hdr = static_type6_hdr;
|
|
|
|
msg->hdr.ToCardLen1 = (size - sizeof(msg->hdr) + 3) & -4;
|
|
|
|
msg->hdr.FromCardLen1 = PCICC_MAX_RESPONSE_SIZE - sizeof(msg->hdr);
|
|
|
|
|
|
|
|
msg->cprb = static_cprb;
|
|
|
|
msg->cprb.usage_domain[0] = AP_QID_QUEUE(zdev->ap_dev->qid);
|
|
|
|
msg->cprb.req_parml = msg->cprb.rpl_parml =
|
|
|
|
cpu_to_le16(size - sizeof(msg->hdr) - sizeof(msg->cprb));
|
|
|
|
|
|
|
|
msg->fr = static_pkd_function_and_rules;
|
|
|
|
|
|
|
|
ap_msg->length = (size + 3) & -4;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Copy results from a type 86 reply message back to user space.
|
|
|
|
*
|
|
|
|
* @zdev: crypto device pointer
|
|
|
|
* @reply: reply AP message.
|
|
|
|
* @data: pointer to user output data
|
|
|
|
* @length: size of user output data
|
|
|
|
*
|
|
|
|
* Returns 0 on success or -EINVAL, -EFAULT, -EAGAIN in case of an error.
|
|
|
|
*/
|
|
|
|
struct type86_reply {
|
|
|
|
struct type86_hdr hdr;
|
|
|
|
struct type86_fmt2_ext fmt2;
|
|
|
|
struct CPRB cprb;
|
|
|
|
unsigned char pad[4]; /* 4 byte function code/rules block ? */
|
|
|
|
unsigned short length;
|
|
|
|
char text[0];
|
|
|
|
} __attribute__((packed));
|
|
|
|
|
|
|
|
static int convert_type86(struct zcrypt_device *zdev,
|
|
|
|
struct ap_message *reply,
|
|
|
|
char __user *outputdata,
|
|
|
|
unsigned int outputdatalength)
|
|
|
|
{
|
|
|
|
static unsigned char static_pad[] = {
|
|
|
|
0x00,0x02,
|
|
|
|
0x1B,0x7B,0x5D,0xB5,0x75,0x01,0x3D,0xFD,
|
|
|
|
0x8D,0xD1,0xC7,0x03,0x2D,0x09,0x23,0x57,
|
|
|
|
0x89,0x49,0xB9,0x3F,0xBB,0x99,0x41,0x5B,
|
|
|
|
0x75,0x21,0x7B,0x9D,0x3B,0x6B,0x51,0x39,
|
|
|
|
0xBB,0x0D,0x35,0xB9,0x89,0x0F,0x93,0xA5,
|
|
|
|
0x0B,0x47,0xF1,0xD3,0xBB,0xCB,0xF1,0x9D,
|
|
|
|
0x23,0x73,0x71,0xFF,0xF3,0xF5,0x45,0xFB,
|
|
|
|
0x61,0x29,0x23,0xFD,0xF1,0x29,0x3F,0x7F,
|
|
|
|
0x17,0xB7,0x1B,0xA9,0x19,0xBD,0x57,0xA9,
|
|
|
|
0xD7,0x95,0xA3,0xCB,0xED,0x1D,0xDB,0x45,
|
|
|
|
0x7D,0x11,0xD1,0x51,0x1B,0xED,0x71,0xE9,
|
|
|
|
0xB1,0xD1,0xAB,0xAB,0x21,0x2B,0x1B,0x9F,
|
|
|
|
0x3B,0x9F,0xF7,0xF7,0xBD,0x63,0xEB,0xAD,
|
|
|
|
0xDF,0xB3,0x6F,0x5B,0xDB,0x8D,0xA9,0x5D,
|
|
|
|
0xE3,0x7D,0x77,0x49,0x47,0xF5,0xA7,0xFD,
|
|
|
|
0xAB,0x2F,0x27,0x35,0x77,0xD3,0x49,0xC9,
|
|
|
|
0x09,0xEB,0xB1,0xF9,0xBF,0x4B,0xCB,0x2B,
|
|
|
|
0xEB,0xEB,0x05,0xFF,0x7D,0xC7,0x91,0x8B,
|
|
|
|
0x09,0x83,0xB9,0xB9,0x69,0x33,0x39,0x6B,
|
|
|
|
0x79,0x75,0x19,0xBF,0xBB,0x07,0x1D,0xBD,
|
|
|
|
0x29,0xBF,0x39,0x95,0x93,0x1D,0x35,0xC7,
|
|
|
|
0xC9,0x4D,0xE5,0x97,0x0B,0x43,0x9B,0xF1,
|
|
|
|
0x16,0x93,0x03,0x1F,0xA5,0xFB,0xDB,0xF3,
|
|
|
|
0x27,0x4F,0x27,0x61,0x05,0x1F,0xB9,0x23,
|
|
|
|
0x2F,0xC3,0x81,0xA9,0x23,0x71,0x55,0x55,
|
|
|
|
0xEB,0xED,0x41,0xE5,0xF3,0x11,0xF1,0x43,
|
|
|
|
0x69,0x03,0xBD,0x0B,0x37,0x0F,0x51,0x8F,
|
|
|
|
0x0B,0xB5,0x89,0x5B,0x67,0xA9,0xD9,0x4F,
|
|
|
|
0x01,0xF9,0x21,0x77,0x37,0x73,0x79,0xC5,
|
|
|
|
0x7F,0x51,0xC1,0xCF,0x97,0xA1,0x75,0xAD,
|
|
|
|
0x35,0x9D,0xD3,0xD3,0xA7,0x9D,0x5D,0x41,
|
|
|
|
0x6F,0x65,0x1B,0xCF,0xA9,0x87,0x91,0x09
|
|
|
|
};
|
|
|
|
struct type86_reply *msg = reply->message;
|
|
|
|
unsigned short service_rc, service_rs;
|
|
|
|
unsigned int reply_len, pad_len;
|
|
|
|
char *data;
|
|
|
|
|
|
|
|
service_rc = le16_to_cpu(msg->cprb.ccp_rtcode);
|
|
|
|
if (unlikely(service_rc != 0)) {
|
|
|
|
service_rs = le16_to_cpu(msg->cprb.ccp_rscode);
|
|
|
|
if (service_rc == 8 && service_rs == 66) {
|
|
|
|
PDEBUG("Bad block format on PCICC\n");
|
|
|
|
return -EINVAL;
|
|
|
|
}
|
|
|
|
if (service_rc == 8 && service_rs == 65) {
|
|
|
|
PDEBUG("Probably an even modulus on PCICC\n");
|
|
|
|
return -EINVAL;
|
|
|
|
}
|
|
|
|
if (service_rc == 8 && service_rs == 770) {
|
|
|
|
PDEBUG("Invalid key length on PCICC\n");
|
|
|
|
zdev->max_mod_size = PCICC_MAX_MOD_SIZE_OLD;
|
|
|
|
return -EAGAIN;
|
|
|
|
}
|
|
|
|
if (service_rc == 8 && service_rs == 783) {
|
|
|
|
PDEBUG("Extended bitlengths not enabled on PCICC\n");
|
|
|
|
zdev->max_mod_size = PCICC_MAX_MOD_SIZE_OLD;
|
|
|
|
return -EAGAIN;
|
|
|
|
}
|
|
|
|
PRINTK("Unknown service rc/rs (PCICC): %d/%d\n",
|
|
|
|
service_rc, service_rs);
|
|
|
|
zdev->online = 0;
|
|
|
|
return -EAGAIN; /* repeat the request on a different device. */
|
|
|
|
}
|
|
|
|
data = msg->text;
|
|
|
|
reply_len = le16_to_cpu(msg->length) - 2;
|
|
|
|
if (reply_len > outputdatalength)
|
|
|
|
return -EINVAL;
|
|
|
|
/**
|
|
|
|
* For all encipher requests, the length of the ciphertext (reply_len)
|
|
|
|
* will always equal the modulus length. For MEX decipher requests
|
|
|
|
* the output needs to get padded. Minimum pad size is 10.
|
|
|
|
*
|
|
|
|
* Currently, the cases where padding will be added is for:
|
|
|
|
* - PCIXCC_MCL2 using a CRT form token (since PKD didn't support
|
|
|
|
* ZERO-PAD and CRT is only supported for PKD requests)
|
|
|
|
* - PCICC, always
|
|
|
|
*/
|
|
|
|
pad_len = outputdatalength - reply_len;
|
|
|
|
if (pad_len > 0) {
|
|
|
|
if (pad_len < 10)
|
|
|
|
return -EINVAL;
|
|
|
|
/* 'restore' padding left in the PCICC/PCIXCC card. */
|
|
|
|
if (copy_to_user(outputdata, static_pad, pad_len - 1))
|
|
|
|
return -EFAULT;
|
|
|
|
if (put_user(0, outputdata + pad_len - 1))
|
|
|
|
return -EFAULT;
|
|
|
|
}
|
|
|
|
/* Copy the crypto response to user space. */
|
|
|
|
if (copy_to_user(outputdata + pad_len, data, reply_len))
|
|
|
|
return -EFAULT;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int convert_response(struct zcrypt_device *zdev,
|
|
|
|
struct ap_message *reply,
|
|
|
|
char __user *outputdata,
|
|
|
|
unsigned int outputdatalength)
|
|
|
|
{
|
|
|
|
struct type86_reply *msg = reply->message;
|
|
|
|
|
|
|
|
/* Response type byte is the second byte in the response. */
|
|
|
|
switch (msg->hdr.type) {
|
|
|
|
case TYPE82_RSP_CODE:
|
|
|
|
case TYPE88_RSP_CODE:
|
|
|
|
return convert_error(zdev, reply);
|
|
|
|
case TYPE86_RSP_CODE:
|
|
|
|
if (msg->hdr.reply_code)
|
|
|
|
return convert_error(zdev, reply);
|
|
|
|
if (msg->cprb.cprb_ver_id == 0x01)
|
|
|
|
return convert_type86(zdev, reply,
|
|
|
|
outputdata, outputdatalength);
|
|
|
|
/* no break, incorrect cprb version is an unknown response */
|
|
|
|
default: /* Unknown response type, this should NEVER EVER happen */
|
|
|
|
PRINTK("Unrecognized Message Header: %08x%08x\n",
|
|
|
|
*(unsigned int *) reply->message,
|
|
|
|
*(unsigned int *) (reply->message+4));
|
|
|
|
zdev->online = 0;
|
|
|
|
return -EAGAIN; /* repeat the request on a different device. */
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* This function is called from the AP bus code after a crypto request
|
|
|
|
* "msg" has finished with the reply message "reply".
|
|
|
|
* It is called from tasklet context.
|
|
|
|
* @ap_dev: pointer to the AP device
|
|
|
|
* @msg: pointer to the AP message
|
|
|
|
* @reply: pointer to the AP reply message
|
|
|
|
*/
|
|
|
|
static void zcrypt_pcicc_receive(struct ap_device *ap_dev,
|
|
|
|
struct ap_message *msg,
|
|
|
|
struct ap_message *reply)
|
|
|
|
{
|
|
|
|
static struct error_hdr error_reply = {
|
|
|
|
.type = TYPE82_RSP_CODE,
|
|
|
|
.reply_code = REP82_ERROR_MACHINE_FAILURE,
|
|
|
|
};
|
|
|
|
struct type86_reply *t86r = reply->message;
|
|
|
|
int length;
|
|
|
|
|
|
|
|
/* Copy the reply message to the request message buffer. */
|
|
|
|
if (IS_ERR(reply))
|
|
|
|
memcpy(msg->message, &error_reply, sizeof(error_reply));
|
|
|
|
else if (t86r->hdr.type == TYPE86_RSP_CODE &&
|
|
|
|
t86r->cprb.cprb_ver_id == 0x01) {
|
|
|
|
length = sizeof(struct type86_reply) + t86r->length - 2;
|
|
|
|
length = min(PCICC_MAX_RESPONSE_SIZE, length);
|
|
|
|
memcpy(msg->message, reply->message, length);
|
|
|
|
} else
|
|
|
|
memcpy(msg->message, reply->message, sizeof error_reply);
|
|
|
|
complete((struct completion *) msg->private);
|
|
|
|
}
|
|
|
|
|
|
|
|
static atomic_t zcrypt_step = ATOMIC_INIT(0);
|
|
|
|
|
|
|
|
/**
|
|
|
|
* The request distributor calls this function if it picked the PCICC
|
|
|
|
* device to handle a modexpo request.
|
|
|
|
* @zdev: pointer to zcrypt_device structure that identifies the
|
|
|
|
* PCICC device to the request distributor
|
|
|
|
* @mex: pointer to the modexpo request buffer
|
|
|
|
*/
|
|
|
|
static long zcrypt_pcicc_modexpo(struct zcrypt_device *zdev,
|
|
|
|
struct ica_rsa_modexpo *mex)
|
|
|
|
{
|
|
|
|
struct ap_message ap_msg;
|
|
|
|
struct completion work;
|
|
|
|
int rc;
|
|
|
|
|
|
|
|
ap_msg.message = (void *) get_zeroed_page(GFP_KERNEL);
|
|
|
|
if (!ap_msg.message)
|
|
|
|
return -ENOMEM;
|
|
|
|
ap_msg.length = PAGE_SIZE;
|
|
|
|
ap_msg.psmid = (((unsigned long long) current->pid) << 32) +
|
|
|
|
atomic_inc_return(&zcrypt_step);
|
|
|
|
ap_msg.private = &work;
|
|
|
|
rc = ICAMEX_msg_to_type6MEX_msg(zdev, &ap_msg, mex);
|
|
|
|
if (rc)
|
|
|
|
goto out_free;
|
|
|
|
init_completion(&work);
|
|
|
|
ap_queue_message(zdev->ap_dev, &ap_msg);
|
|
|
|
rc = wait_for_completion_interruptible_timeout(
|
|
|
|
&work, PCICC_CLEANUP_TIME);
|
|
|
|
if (rc > 0)
|
|
|
|
rc = convert_response(zdev, &ap_msg, mex->outputdata,
|
|
|
|
mex->outputdatalength);
|
|
|
|
else {
|
|
|
|
/* Signal pending or message timed out. */
|
|
|
|
ap_cancel_message(zdev->ap_dev, &ap_msg);
|
|
|
|
if (rc == 0)
|
|
|
|
/* Message timed out. */
|
|
|
|
rc = -ETIME;
|
|
|
|
}
|
|
|
|
out_free:
|
|
|
|
free_page((unsigned long) ap_msg.message);
|
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* The request distributor calls this function if it picked the PCICC
|
|
|
|
* device to handle a modexpo_crt request.
|
|
|
|
* @zdev: pointer to zcrypt_device structure that identifies the
|
|
|
|
* PCICC device to the request distributor
|
|
|
|
* @crt: pointer to the modexpoc_crt request buffer
|
|
|
|
*/
|
|
|
|
static long zcrypt_pcicc_modexpo_crt(struct zcrypt_device *zdev,
|
|
|
|
struct ica_rsa_modexpo_crt *crt)
|
|
|
|
{
|
|
|
|
struct ap_message ap_msg;
|
|
|
|
struct completion work;
|
|
|
|
int rc;
|
|
|
|
|
|
|
|
ap_msg.message = (void *) get_zeroed_page(GFP_KERNEL);
|
|
|
|
if (!ap_msg.message)
|
|
|
|
return -ENOMEM;
|
|
|
|
ap_msg.length = PAGE_SIZE;
|
|
|
|
ap_msg.psmid = (((unsigned long long) current->pid) << 32) +
|
|
|
|
atomic_inc_return(&zcrypt_step);
|
|
|
|
ap_msg.private = &work;
|
|
|
|
rc = ICACRT_msg_to_type6CRT_msg(zdev, &ap_msg, crt);
|
|
|
|
if (rc)
|
|
|
|
goto out_free;
|
|
|
|
init_completion(&work);
|
|
|
|
ap_queue_message(zdev->ap_dev, &ap_msg);
|
|
|
|
rc = wait_for_completion_interruptible_timeout(
|
|
|
|
&work, PCICC_CLEANUP_TIME);
|
|
|
|
if (rc > 0)
|
|
|
|
rc = convert_response(zdev, &ap_msg, crt->outputdata,
|
|
|
|
crt->outputdatalength);
|
|
|
|
else {
|
|
|
|
/* Signal pending or message timed out. */
|
|
|
|
ap_cancel_message(zdev->ap_dev, &ap_msg);
|
|
|
|
if (rc == 0)
|
|
|
|
/* Message timed out. */
|
|
|
|
rc = -ETIME;
|
|
|
|
}
|
|
|
|
out_free:
|
|
|
|
free_page((unsigned long) ap_msg.message);
|
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* The crypto operations for a PCICC card.
|
|
|
|
*/
|
|
|
|
static struct zcrypt_ops zcrypt_pcicc_ops = {
|
|
|
|
.rsa_modexpo = zcrypt_pcicc_modexpo,
|
|
|
|
.rsa_modexpo_crt = zcrypt_pcicc_modexpo_crt,
|
|
|
|
};
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Probe function for PCICC cards. It always accepts the AP device
|
|
|
|
* since the bus_match already checked the hardware type.
|
|
|
|
* @ap_dev: pointer to the AP device.
|
|
|
|
*/
|
|
|
|
static int zcrypt_pcicc_probe(struct ap_device *ap_dev)
|
|
|
|
{
|
|
|
|
struct zcrypt_device *zdev;
|
|
|
|
int rc;
|
|
|
|
|
|
|
|
zdev = zcrypt_device_alloc(PCICC_MAX_RESPONSE_SIZE);
|
|
|
|
if (!zdev)
|
|
|
|
return -ENOMEM;
|
|
|
|
zdev->ap_dev = ap_dev;
|
|
|
|
zdev->ops = &zcrypt_pcicc_ops;
|
|
|
|
zdev->online = 1;
|
|
|
|
zdev->user_space_type = ZCRYPT_PCICC;
|
|
|
|
zdev->type_string = "PCICC";
|
|
|
|
zdev->min_mod_size = PCICC_MIN_MOD_SIZE;
|
|
|
|
zdev->max_mod_size = PCICC_MAX_MOD_SIZE;
|
|
|
|
zdev->speed_rating = PCICC_SPEED_RATING;
|
|
|
|
ap_dev->reply = &zdev->reply;
|
|
|
|
ap_dev->private = zdev;
|
|
|
|
rc = zcrypt_device_register(zdev);
|
|
|
|
if (rc)
|
|
|
|
goto out_free;
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
out_free:
|
|
|
|
ap_dev->private = NULL;
|
|
|
|
zcrypt_device_free(zdev);
|
|
|
|
return rc;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* This is called to remove the extended PCICC driver information
|
|
|
|
* if an AP device is removed.
|
|
|
|
*/
|
|
|
|
static void zcrypt_pcicc_remove(struct ap_device *ap_dev)
|
|
|
|
{
|
|
|
|
struct zcrypt_device *zdev = ap_dev->private;
|
|
|
|
|
|
|
|
zcrypt_device_unregister(zdev);
|
|
|
|
}
|
|
|
|
|
|
|
|
int __init zcrypt_pcicc_init(void)
|
|
|
|
{
|
|
|
|
return ap_driver_register(&zcrypt_pcicc_driver, THIS_MODULE, "pcicc");
|
|
|
|
}
|
|
|
|
|
|
|
|
void zcrypt_pcicc_exit(void)
|
|
|
|
{
|
|
|
|
ap_driver_unregister(&zcrypt_pcicc_driver);
|
|
|
|
}
|
|
|
|
|
|
|
|
#ifndef CONFIG_ZCRYPT_MONOLITHIC
|
|
|
|
module_init(zcrypt_pcicc_init);
|
|
|
|
module_exit(zcrypt_pcicc_exit);
|
|
|
|
#endif
|