[linux-2.6-block.git] / crypto / crypto_user.c

/*
 * Crypto user configuration API.
 *
 * Copyright (C) 2011 secunet Security Networks AG
 * Copyright (C) 2011 Steffen Klassert <steffen.klassert@secunet.com>
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms and conditions of the GNU General Public License,
 * version 2, as published by the Free Software Foundation.
 *
 * This program is distributed in the hope 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.,
 * 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
 */

#include <linux/module.h>
#include <linux/crypto.h>
#include <linux/cryptouser.h>
#include <linux/sched.h>
#include <net/netlink.h>
#include <linux/security.h>
#include <net/net_namespace.h>
#include <crypto/internal/aead.h>
#include <crypto/internal/skcipher.h>
#include <crypto/akcipher.h>

#include "internal.h"

#define null_terminated(x)	(strnlen(x, sizeof(x)) < sizeof(x))

static DEFINE_MUTEX(crypto_cfg_mutex);

/* The crypto netlink socket */
static struct sock *crypto_nlsk;

struct crypto_dump_info {
	struct sk_buff *in_skb;
	struct sk_buff *out_skb;
	u32 nlmsg_seq;
	u16 nlmsg_flags;
};

static struct crypto_alg *crypto_alg_match(struct crypto_user_alg *p, int exact)
{
	struct crypto_alg *q, *alg = NULL;

	down_read(&crypto_alg_sem);

	list_for_each_entry(q, &crypto_alg_list, cra_list) {
		int match = 0;

		if ((q->cra_flags ^ p->cru_type) & p->cru_mask)
			continue;

		if (strlen(p->cru_driver_name))
			match = !strcmp(q->cra_driver_name,
					p->cru_driver_name);
		else if (!exact)
			match = !strcmp(q->cra_name, p->cru_name);

		if (!match)
			continue;

		if (unlikely(!crypto_mod_get(q)))
			continue;

		alg = q;
		break;
	}

	up_read(&crypto_alg_sem);

	return alg;
}

static int crypto_report_cipher(struct sk_buff *skb, struct crypto_alg *alg)
{
	struct crypto_report_cipher rcipher;

	strncpy(rcipher.type, "cipher", sizeof(rcipher.type));

	rcipher.blocksize = alg->cra_blocksize;
	rcipher.min_keysize = alg->cra_cipher.cia_min_keysize;
	rcipher.max_keysize = alg->cra_cipher.cia_max_keysize;

	if (nla_put(skb, CRYPTOCFGA_REPORT_CIPHER,
		    sizeof(struct crypto_report_cipher), &rcipher))
		goto nla_put_failure;
	return 0;

nla_put_failure:
	return -EMSGSIZE;
}

static int crypto_report_comp(struct sk_buff *skb, struct crypto_alg *alg)
{
	struct crypto_report_comp rcomp;

	strncpy(rcomp.type, "compression", sizeof(rcomp.type));
	if (nla_put(skb, CRYPTOCFGA_REPORT_COMPRESS,
		    sizeof(struct crypto_report_comp), &rcomp))
		goto nla_put_failure;
	return 0;

nla_put_failure:
	return -EMSGSIZE;
}

static int crypto_report_akcipher(struct sk_buff *skb, struct crypto_alg *alg)
{
	struct crypto_report_akcipher rakcipher;

	strncpy(rakcipher.type, "akcipher", sizeof(rakcipher.type));

	if (nla_put(skb, CRYPTOCFGA_REPORT_AKCIPHER,
		    sizeof(struct crypto_report_akcipher), &rakcipher))
		goto nla_put_failure;
	return 0;

nla_put_failure:
	return -EMSGSIZE;
}

static int crypto_report_one(struct crypto_alg *alg,
			     struct crypto_user_alg *ualg, struct sk_buff *skb)
{
	strncpy(ualg->cru_name, alg->cra_name, sizeof(ualg->cru_name));
	strncpy(ualg->cru_driver_name, alg->cra_driver_name,
		sizeof(ualg->cru_driver_name));
	strncpy(ualg->cru_module_name, module_name(alg->cra_module),
		sizeof(ualg->cru_module_name));

	ualg->cru_type = 0;
	ualg->cru_mask = 0;
	ualg->cru_flags = alg->cra_flags;
	ualg->cru_refcnt = atomic_read(&alg->cra_refcnt);

	if (nla_put_u32(skb, CRYPTOCFGA_PRIORITY_VAL, alg->cra_priority))
		goto nla_put_failure;
	if (alg->cra_flags & CRYPTO_ALG_LARVAL) {
		struct crypto_report_larval rl;

		strncpy(rl.type, "larval", sizeof(rl.type));
		if (nla_put(skb, CRYPTOCFGA_REPORT_LARVAL,
			    sizeof(struct crypto_report_larval), &rl))
			goto nla_put_failure;
		goto out;
	}

	if (alg->cra_type && alg->cra_type->report) {
		if (alg->cra_type->report(skb, alg))
			goto nla_put_failure;

		goto out;
	}

	switch (alg->cra_flags & (CRYPTO_ALG_TYPE_MASK | CRYPTO_ALG_LARVAL)) {
	case CRYPTO_ALG_TYPE_CIPHER:
		if (crypto_report_cipher(skb, alg))
			goto nla_put_failure;

		break;
	case CRYPTO_ALG_TYPE_COMPRESS:
		if (crypto_report_comp(skb, alg))
			goto nla_put_failure;

		break;

	case CRYPTO_ALG_TYPE_AKCIPHER:
		if (crypto_report_akcipher(skb, alg))
			goto nla_put_failure;

		break;
	}

out:
	return 0;

nla_put_failure:
	return -EMSGSIZE;
}

static int crypto_report_alg(struct crypto_alg *alg,
			     struct crypto_dump_info *info)
{
	struct sk_buff *in_skb = info->in_skb;
	struct sk_buff *skb = info->out_skb;
	struct nlmsghdr *nlh;
	struct crypto_user_alg *ualg;
	int err = 0;

	nlh = nlmsg_put(skb, NETLINK_CB(in_skb).portid, info->nlmsg_seq,
			CRYPTO_MSG_GETALG, sizeof(*ualg), info->nlmsg_flags);
	if (!nlh) {
		err = -EMSGSIZE;
		goto out;
	}

	ualg = nlmsg_data(nlh);

	err = crypto_report_one(alg, ualg, skb);
	if (err) {
		nlmsg_cancel(skb, nlh);
		goto out;
	}

	nlmsg_end(skb, nlh);

out:
	return err;
}

static int crypto_report(struct sk_buff *in_skb, struct nlmsghdr *in_nlh,
			 struct nlattr **attrs)
{
	struct crypto_user_alg *p = nlmsg_data(in_nlh);
	struct crypto_alg *alg;
	struct sk_buff *skb;
	struct crypto_dump_info info;
	int err;

	if (!null_terminated(p->cru_name) || !null_terminated(p->cru_driver_name))
		return -EINVAL;

	alg = crypto_alg_match(p, 0);
	if (!alg)
		return -ENOENT;

	err = -ENOMEM;
	skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_ATOMIC);
	if (!skb)
		goto drop_alg;

	info.in_skb = in_skb;
	info.out_skb = skb;
	info.nlmsg_seq = in_nlh->nlmsg_seq;
	info.nlmsg_flags = 0;

	err = crypto_report_alg(alg, &info);

drop_alg:
	crypto_mod_put(alg);

	if (err)
		return err;

	return nlmsg_unicast(crypto_nlsk, skb, NETLINK_CB(in_skb).portid);
}

static int crypto_dump_report(struct sk_buff *skb, struct netlink_callback *cb)
{
	struct crypto_alg *alg;
	struct crypto_dump_info info;
	int err;

	if (cb->args[0])
		goto out;

	cb->args[0] = 1;

	info.in_skb = cb->skb;
	info.out_skb = skb;
	info.nlmsg_seq = cb->nlh->nlmsg_seq;
	info.nlmsg_flags = NLM_F_MULTI;

	list_for_each_entry(alg, &crypto_alg_list, cra_list) {
		err = crypto_report_alg(alg, &info);
		if (err)
			goto out_err;
	}

out:
	return skb->len;
out_err:
	return err;
}

static int crypto_dump_report_done(struct netlink_callback *cb)
{
	return 0;
}

static int crypto_update_alg(struct sk_buff *skb, struct nlmsghdr *nlh,
			     struct nlattr **attrs)
{
	struct crypto_alg *alg;
	struct crypto_user_alg *p = nlmsg_data(nlh);
	struct nlattr *priority = attrs[CRYPTOCFGA_PRIORITY_VAL];
	LIST_HEAD(list);

	if (!netlink_capable(skb, CAP_NET_ADMIN))
		return -EPERM;

	if (!null_terminated(p->cru_name) || !null_terminated(p->cru_driver_name))
		return -EINVAL;

	if (priority && !strlen(p->cru_driver_name))
		return -EINVAL;

	alg = crypto_alg_match(p, 1);
	if (!alg)
		return -ENOENT;

	down_write(&crypto_alg_sem);

	crypto_remove_spawns(alg, &list, NULL);

	if (priority)
		alg->cra_priority = nla_get_u32(priority);

	up_write(&crypto_alg_sem);

	crypto_mod_put(alg);
	crypto_remove_final(&list);

	return 0;
}

static int crypto_del_alg(struct sk_buff *skb, struct nlmsghdr *nlh,
			  struct nlattr **attrs)
{
	struct crypto_alg *alg;
	struct crypto_user_alg *p = nlmsg_data(nlh);
	int err;

	if (!netlink_capable(skb, CAP_NET_ADMIN))
		return -EPERM;

	if (!null_terminated(p->cru_name) || !null_terminated(p->cru_driver_name))
		return -EINVAL;

	alg = crypto_alg_match(p, 1);
	if (!alg)
		return -ENOENT;

	/* We can not unregister core algorithms such as aes-generic.
	 * We would loose the reference in the crypto_alg_list to this algorithm
	 * if we try to unregister. Unregistering such an algorithm without
	 * removing the module is not possible, so we restrict to crypto
	 * instances that are build from templates. */
	err = -EINVAL;
	if (!(alg->cra_flags & CRYPTO_ALG_INSTANCE))
		goto drop_alg;

	err = -EBUSY;
	if (atomic_read(&alg->cra_refcnt) > 2)
		goto drop_alg;

	err = crypto_unregister_instance((struct crypto_instance *)alg);

drop_alg:
	crypto_mod_put(alg);
	return err;
}

static struct crypto_alg *crypto_user_skcipher_alg(const char *name, u32 type,
						   u32 mask)
{
	int err;
	struct crypto_alg *alg;

	type = crypto_skcipher_type(type);
	mask = crypto_skcipher_mask(mask);

	for (;;) {
		alg = crypto_lookup_skcipher(name,  type, mask);
		if (!IS_ERR(alg))
			return alg;

		err = PTR_ERR(alg);
		if (err != -EAGAIN)
			break;
		if (signal_pending(current)) {
			err = -EINTR;
			break;
		}
	}

	return ERR_PTR(err);
}

static struct crypto_alg *crypto_user_aead_alg(const char *name, u32 type,
					       u32 mask)
{
	int err;
	struct crypto_alg *alg;

	type &= ~(CRYPTO_ALG_TYPE_MASK | CRYPTO_ALG_GENIV);
	type |= CRYPTO_ALG_TYPE_AEAD;
	mask &= ~(CRYPTO_ALG_TYPE_MASK | CRYPTO_ALG_GENIV);
	mask |= CRYPTO_ALG_TYPE_MASK;

	for (;;) {
		alg = crypto_lookup_aead(name,  type, mask);
		if (!IS_ERR(alg))
			return alg;

		err = PTR_ERR(alg);
		if (err != -EAGAIN)
			break;
		if (signal_pending(current)) {
			err = -EINTR;
			break;
		}
	}

	return ERR_PTR(err);
}

static int crypto_add_alg(struct sk_buff *skb, struct nlmsghdr *nlh,
			  struct nlattr **attrs)
{
	int exact = 0;
	const char *name;
	struct crypto_alg *alg;
	struct crypto_user_alg *p = nlmsg_data(nlh);
	struct nlattr *priority = attrs[CRYPTOCFGA_PRIORITY_VAL];

	if (!netlink_capable(skb, CAP_NET_ADMIN))
		return -EPERM;

	if (!null_terminated(p->cru_name) || !null_terminated(p->cru_driver_name))
		return -EINVAL;

	if (strlen(p->cru_driver_name))
		exact = 1;

	if (priority && !exact)
		return -EINVAL;

	alg = crypto_alg_match(p, exact);
	if (alg) {
		crypto_mod_put(alg);
		return -EEXIST;
	}

	if (strlen(p->cru_driver_name))
		name = p->cru_driver_name;
	else
		name = p->cru_name;

	switch (p->cru_type & p->cru_mask & CRYPTO_ALG_TYPE_MASK) {
	case CRYPTO_ALG_TYPE_AEAD:
		alg = crypto_user_aead_alg(name, p->cru_type, p->cru_mask);
		break;
	case CRYPTO_ALG_TYPE_GIVCIPHER:
	case CRYPTO_ALG_TYPE_BLKCIPHER:
	case CRYPTO_ALG_TYPE_ABLKCIPHER:
		alg = crypto_user_skcipher_alg(name, p->cru_type, p->cru_mask);
		break;
	default:
		alg = crypto_alg_mod_lookup(name, p->cru_type, p->cru_mask);
	}

	if (IS_ERR(alg))
		return PTR_ERR(alg);

	down_write(&crypto_alg_sem);

	if (priority)
		alg->cra_priority = nla_get_u32(priority);

	up_write(&crypto_alg_sem);

	crypto_mod_put(alg);

	return 0;
}

#define MSGSIZE(type) sizeof(struct type)

static const int crypto_msg_min[CRYPTO_NR_MSGTYPES] = {
	[CRYPTO_MSG_NEWALG	- CRYPTO_MSG_BASE] = MSGSIZE(crypto_user_alg),
	[CRYPTO_MSG_DELALG	- CRYPTO_MSG_BASE] = MSGSIZE(crypto_user_alg),
	[CRYPTO_MSG_UPDATEALG	- CRYPTO_MSG_BASE] = MSGSIZE(crypto_user_alg),
	[CRYPTO_MSG_GETALG	- CRYPTO_MSG_BASE] = MSGSIZE(crypto_user_alg),
};

static const struct nla_policy crypto_policy[CRYPTOCFGA_MAX+1] = {
	[CRYPTOCFGA_PRIORITY_VAL]   = { .type = NLA_U32},
};

#undef MSGSIZE

static const struct crypto_link {
	int (*doit)(struct sk_buff *, struct nlmsghdr *, struct nlattr **);
	int (*dump)(struct sk_buff *, struct netlink_callback *);
	int (*done)(struct netlink_callback *);
} crypto_dispatch[CRYPTO_NR_MSGTYPES] = {
	[CRYPTO_MSG_NEWALG	- CRYPTO_MSG_BASE] = { .doit = crypto_add_alg},
	[CRYPTO_MSG_DELALG	- CRYPTO_MSG_BASE] = { .doit = crypto_del_alg},
	[CRYPTO_MSG_UPDATEALG	- CRYPTO_MSG_BASE] = { .doit = crypto_update_alg},
	[CRYPTO_MSG_GETALG	- CRYPTO_MSG_BASE] = { .doit = crypto_report,
						       .dump = crypto_dump_report,
						       .done = crypto_dump_report_done},
};

static int crypto_user_rcv_msg(struct sk_buff *skb, struct nlmsghdr *nlh)
{
	struct nlattr *attrs[CRYPTOCFGA_MAX+1];
	const struct crypto_link *link;
	int type, err;

	type = nlh->nlmsg_type;
	if (type > CRYPTO_MSG_MAX)
		return -EINVAL;

	type -= CRYPTO_MSG_BASE;
	link = &crypto_dispatch[type];

	if ((type == (CRYPTO_MSG_GETALG - CRYPTO_MSG_BASE) &&
	    (nlh->nlmsg_flags & NLM_F_DUMP))) {
		struct crypto_alg *alg;
		u16 dump_alloc = 0;

		if (link->dump == NULL)
			return -EINVAL;

		list_for_each_entry(alg, &crypto_alg_list, cra_list)
			dump_alloc += CRYPTO_REPORT_MAXSIZE;

		{
			struct netlink_dump_control c = {
				.dump = link->dump,
				.done = link->done,
				.min_dump_alloc = dump_alloc,
			};
			return netlink_dump_start(crypto_nlsk, skb, nlh, &c);
		}
	}

	err = nlmsg_parse(nlh, crypto_msg_min[type], attrs, CRYPTOCFGA_MAX,
			  crypto_policy);
	if (err < 0)
		return err;

	if (link->doit == NULL)
		return -EINVAL;

	return link->doit(skb, nlh, attrs);
}

static void crypto_netlink_rcv(struct sk_buff *skb)
{
	mutex_lock(&crypto_cfg_mutex);
	netlink_rcv_skb(skb, &crypto_user_rcv_msg);
	mutex_unlock(&crypto_cfg_mutex);
}

static int __init crypto_user_init(void)
{
	struct netlink_kernel_cfg cfg = {
		.input	= crypto_netlink_rcv,
	};

	crypto_nlsk = netlink_kernel_create(&init_net, NETLINK_CRYPTO, &cfg);
	if (!crypto_nlsk)
		return -ENOMEM;

	return 0;
}

static void __exit crypto_user_exit(void)
{
	netlink_kernel_release(crypto_nlsk);
}

module_init(crypto_user_init);
module_exit(crypto_user_exit);
MODULE_LICENSE("GPL");
MODULE_AUTHOR("Steffen Klassert <steffen.klassert@secunet.com>");
MODULE_DESCRIPTION("Crypto userspace configuration API");
MODULE_ALIAS("net-pf-16-proto-21");
Commit	Line	Data
a38f7907 SK	1	/*
	2	* Crypto user configuration API.
	3	*
	4	* Copyright (C) 2011 secunet Security Networks AG
	5	* Copyright (C) 2011 Steffen Klassert <steffen.klassert@secunet.com>
	6	*
	7	* This program is free software; you can redistribute it and/or modify it
	8	* under the terms and conditions of the GNU General Public License,
	9	* version 2, as published by the Free Software Foundation.
	10	*
	11	* This program is distributed in the hope it will be useful, but WITHOUT
	12	* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
	13	* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
	14	* more details.
	15	*
	16	* You should have received a copy of the GNU General Public License along with
	17	* this program; if not, write to the Free Software Foundation, Inc.,
	18	* 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
	19	*/
	20
	21	#include <linux/module.h>
	22	#include <linux/crypto.h>
	23	#include <linux/cryptouser.h>
1e122994	24	#include <linux/sched.h>
a38f7907 SK	25	#include <net/netlink.h>
	26	#include <linux/security.h>
	27	#include <net/net_namespace.h>
1e122994 SK	28	#include <crypto/internal/aead.h>
1e122994 SK	29	#include <crypto/internal/skcipher.h>
3c339ab8	30	#include <crypto/akcipher.h>
1e122994	31
a38f7907 SK	32	#include "internal.h"
a38f7907 SK	33
8fd61d34 MK	34	#define null_terminated(x) (strnlen(x, sizeof(x)) < sizeof(x))
8fd61d34 MK	35
66ce0b0f	36	static DEFINE_MUTEX(crypto_cfg_mutex);
a38f7907 SK	37
	38	/* The crypto netlink socket */
	39	static struct sock *crypto_nlsk;
	40
	41	struct crypto_dump_info {
	42	struct sk_buff *in_skb;
	43	struct sk_buff *out_skb;
	44	u32 nlmsg_seq;
	45	u16 nlmsg_flags;
	46	};
	47
	48	static struct crypto_alg crypto_alg_match(struct crypto_user_alg p, int exact)
	49	{
a38f7907 SK	50	struct crypto_alg q, alg = NULL;
	51
	52	down_read(&crypto_alg_sem);
	53
a38f7907	54	list_for_each_entry(q, &crypto_alg_list, cra_list) {
e6ea64ec	55	int match = 0;
a38f7907 SK	56
	57	if ((q->cra_flags ^ p->cru_type) & p->cru_mask)
	58	continue;
	59
	60	if (strlen(p->cru_driver_name))
	61	match = !strcmp(q->cra_driver_name,
	62	p->cru_driver_name);
	63	else if (!exact)
	64	match = !strcmp(q->cra_name, p->cru_name);
	65
016baaa1 HX	66	if (!match)
	67	continue;
	68
	69	if (unlikely(!crypto_mod_get(q)))
	70	continue;
	71
	72	alg = q;
	73	break;
a38f7907 SK	74	}
	75
	76	up_read(&crypto_alg_sem);
	77
	78	return alg;
	79	}
	80
07a5fa4a SK	81	static int crypto_report_cipher(struct sk_buff skb, struct crypto_alg alg)
	82	{
	83	struct crypto_report_cipher rcipher;
	84
9a5467bf	85	strncpy(rcipher.type, "cipher", sizeof(rcipher.type));
07a5fa4a SK	86
	87	rcipher.blocksize = alg->cra_blocksize;
	88	rcipher.min_keysize = alg->cra_cipher.cia_min_keysize;
	89	rcipher.max_keysize = alg->cra_cipher.cia_max_keysize;
	90
6662df33 DM	91	if (nla_put(skb, CRYPTOCFGA_REPORT_CIPHER,
	92	sizeof(struct crypto_report_cipher), &rcipher))
	93	goto nla_put_failure;
07a5fa4a SK	94	return 0;
	95
	96	nla_put_failure:
	97	return -EMSGSIZE;
	98	}
	99
540b97c1 SK	100	static int crypto_report_comp(struct sk_buff skb, struct crypto_alg alg)
	101	{
	102	struct crypto_report_comp rcomp;
	103
9a5467bf	104	strncpy(rcomp.type, "compression", sizeof(rcomp.type));
6662df33 DM	105	if (nla_put(skb, CRYPTOCFGA_REPORT_COMPRESS,
	106	sizeof(struct crypto_report_comp), &rcomp))
	107	goto nla_put_failure;
540b97c1 SK	108	return 0;
	109
	110	nla_put_failure:
	111	return -EMSGSIZE;
	112	}
	113
3c339ab8 TS	114	static int crypto_report_akcipher(struct sk_buff skb, struct crypto_alg alg)
	115	{
	116	struct crypto_report_akcipher rakcipher;
	117
	118	strncpy(rakcipher.type, "akcipher", sizeof(rakcipher.type));
	119
	120	if (nla_put(skb, CRYPTOCFGA_REPORT_AKCIPHER,
	121	sizeof(struct crypto_report_akcipher), &rakcipher))
	122	goto nla_put_failure;
	123	return 0;
	124
	125	nla_put_failure:
	126	return -EMSGSIZE;
	127	}
	128
a38f7907 SK	129	static int crypto_report_one(struct crypto_alg *alg,
	130	struct crypto_user_alg ualg, struct sk_buff skb)
	131	{
9a5467bf MK	132	strncpy(ualg->cru_name, alg->cra_name, sizeof(ualg->cru_name));
	133	strncpy(ualg->cru_driver_name, alg->cra_driver_name,
	134	sizeof(ualg->cru_driver_name));
	135	strncpy(ualg->cru_module_name, module_name(alg->cra_module),
	136	sizeof(ualg->cru_module_name));
	137
	138	ualg->cru_type = 0;
	139	ualg->cru_mask = 0;
a38f7907 SK	140	ualg->cru_flags = alg->cra_flags;
	141	ualg->cru_refcnt = atomic_read(&alg->cra_refcnt);
	142
6662df33 DM	143	if (nla_put_u32(skb, CRYPTOCFGA_PRIORITY_VAL, alg->cra_priority))
6662df33 DM	144	goto nla_put_failure;
6c5a86f5 SK	145	if (alg->cra_flags & CRYPTO_ALG_LARVAL) {
	146	struct crypto_report_larval rl;
	147
9a5467bf	148	strncpy(rl.type, "larval", sizeof(rl.type));
6662df33 DM	149	if (nla_put(skb, CRYPTOCFGA_REPORT_LARVAL,
	150	sizeof(struct crypto_report_larval), &rl))
	151	goto nla_put_failure;
6c5a86f5 SK	152	goto out;
	153	}
	154
b6aa63c0 SK	155	if (alg->cra_type && alg->cra_type->report) {
	156	if (alg->cra_type->report(skb, alg))
	157	goto nla_put_failure;
07a5fa4a SK	158
	159	goto out;
	160	}
	161
	162	switch (alg->cra_flags & (CRYPTO_ALG_TYPE_MASK \| CRYPTO_ALG_LARVAL)) {
	163	case CRYPTO_ALG_TYPE_CIPHER:
	164	if (crypto_report_cipher(skb, alg))
	165	goto nla_put_failure;
	166
540b97c1 SK	167	break;
	168	case CRYPTO_ALG_TYPE_COMPRESS:
	169	if (crypto_report_comp(skb, alg))
	170	goto nla_put_failure;
	171
07a5fa4a	172	break;
3c339ab8 TS	173
	174	case CRYPTO_ALG_TYPE_AKCIPHER:
	175	if (crypto_report_akcipher(skb, alg))
	176	goto nla_put_failure;
	177
	178	break;
b6aa63c0 SK	179	}
b6aa63c0 SK	180
6c5a86f5	181	out:
a38f7907 SK	182	return 0;
	183
	184	nla_put_failure:
	185	return -EMSGSIZE;
	186	}
	187
	188	static int crypto_report_alg(struct crypto_alg *alg,
	189	struct crypto_dump_info *info)
	190	{
	191	struct sk_buff *in_skb = info->in_skb;
	192	struct sk_buff *skb = info->out_skb;
	193	struct nlmsghdr *nlh;
	194	struct crypto_user_alg *ualg;
	195	int err = 0;
	196
15e47304	197	nlh = nlmsg_put(skb, NETLINK_CB(in_skb).portid, info->nlmsg_seq,
a38f7907 SK	198	CRYPTO_MSG_GETALG, sizeof(*ualg), info->nlmsg_flags);
	199	if (!nlh) {
	200	err = -EMSGSIZE;
	201	goto out;
	202	}
	203
	204	ualg = nlmsg_data(nlh);
	205
	206	err = crypto_report_one(alg, ualg, skb);
	207	if (err) {
	208	nlmsg_cancel(skb, nlh);
	209	goto out;
	210	}
	211
	212	nlmsg_end(skb, nlh);
	213
	214	out:
	215	return err;
	216	}
	217
	218	static int crypto_report(struct sk_buff in_skb, struct nlmsghdr in_nlh,
	219	struct nlattr **attrs)
	220	{
	221	struct crypto_user_alg *p = nlmsg_data(in_nlh);
	222	struct crypto_alg *alg;
	223	struct sk_buff *skb;
	224	struct crypto_dump_info info;
	225	int err;
	226
8fd61d34 MK	227	if (!null_terminated(p->cru_name) \|\| !null_terminated(p->cru_driver_name))
	228	return -EINVAL;
	229
5d4a5e77	230	alg = crypto_alg_match(p, 0);
a38f7907 SK	231	if (!alg)
	232	return -ENOENT;
	233
016baaa1	234	err = -ENOMEM;
a38f7907 SK	235	skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_ATOMIC);
a38f7907 SK	236	if (!skb)
016baaa1	237	goto drop_alg;
a38f7907 SK	238
	239	info.in_skb = in_skb;
	240	info.out_skb = skb;
	241	info.nlmsg_seq = in_nlh->nlmsg_seq;
	242	info.nlmsg_flags = 0;
	243
	244	err = crypto_report_alg(alg, &info);
016baaa1 HX	245
	246	drop_alg:
	247	crypto_mod_put(alg);
	248
a38f7907 SK	249	if (err)
	250	return err;
	251
15e47304	252	return nlmsg_unicast(crypto_nlsk, skb, NETLINK_CB(in_skb).portid);
a38f7907 SK	253	}
	254
	255	static int crypto_dump_report(struct sk_buff skb, struct netlink_callback cb)
	256	{
	257	struct crypto_alg *alg;
	258	struct crypto_dump_info info;
	259	int err;
	260
	261	if (cb->args[0])
	262	goto out;
	263
	264	cb->args[0] = 1;
	265
	266	info.in_skb = cb->skb;
	267	info.out_skb = skb;
	268	info.nlmsg_seq = cb->nlh->nlmsg_seq;
	269	info.nlmsg_flags = NLM_F_MULTI;
	270
	271	list_for_each_entry(alg, &crypto_alg_list, cra_list) {
	272	err = crypto_report_alg(alg, &info);
	273	if (err)
	274	goto out_err;
	275	}
	276
	277	out:
	278	return skb->len;
	279	out_err:
	280	return err;
	281	}
	282
	283	static int crypto_dump_report_done(struct netlink_callback *cb)
	284	{
	285	return 0;
	286	}
	287
	288	static int crypto_update_alg(struct sk_buff skb, struct nlmsghdr nlh,
	289	struct nlattr **attrs)
	290	{
	291	struct crypto_alg *alg;
	292	struct crypto_user_alg *p = nlmsg_data(nlh);
	293	struct nlattr *priority = attrs[CRYPTOCFGA_PRIORITY_VAL];
	294	LIST_HEAD(list);
	295
639b4ac6	296	if (!netlink_capable(skb, CAP_NET_ADMIN))
c568398a MCO	297	return -EPERM;
c568398a MCO	298
8fd61d34 MK	299	if (!null_terminated(p->cru_name) \|\| !null_terminated(p->cru_driver_name))
	300	return -EINVAL;
	301
a38f7907 SK	302	if (priority && !strlen(p->cru_driver_name))
	303	return -EINVAL;
	304
	305	alg = crypto_alg_match(p, 1);
	306	if (!alg)
	307	return -ENOENT;
	308
	309	down_write(&crypto_alg_sem);
	310
	311	crypto_remove_spawns(alg, &list, NULL);
	312
	313	if (priority)
	314	alg->cra_priority = nla_get_u32(priority);
	315
	316	up_write(&crypto_alg_sem);
	317
016baaa1	318	crypto_mod_put(alg);
a38f7907 SK	319	crypto_remove_final(&list);
	320
	321	return 0;
	322	}
	323
	324	static int crypto_del_alg(struct sk_buff skb, struct nlmsghdr nlh,
	325	struct nlattr **attrs)
	326	{
	327	struct crypto_alg *alg;
	328	struct crypto_user_alg *p = nlmsg_data(nlh);
016baaa1	329	int err;
a38f7907	330
639b4ac6	331	if (!netlink_capable(skb, CAP_NET_ADMIN))
c568398a MCO	332	return -EPERM;
c568398a MCO	333
8fd61d34 MK	334	if (!null_terminated(p->cru_name) \|\| !null_terminated(p->cru_driver_name))
	335	return -EINVAL;
	336
a38f7907 SK	337	alg = crypto_alg_match(p, 1);
	338	if (!alg)
	339	return -ENOENT;
	340
	341	/* We can not unregister core algorithms such as aes-generic.
	342	* We would loose the reference in the crypto_alg_list to this algorithm
	343	* if we try to unregister. Unregistering such an algorithm without
	344	* removing the module is not possible, so we restrict to crypto
	345	* instances that are build from templates. */
016baaa1	346	err = -EINVAL;
a38f7907	347	if (!(alg->cra_flags & CRYPTO_ALG_INSTANCE))
016baaa1	348	goto drop_alg;
a38f7907	349
016baaa1 HX	350	err = -EBUSY;
	351	if (atomic_read(&alg->cra_refcnt) > 2)
	352	goto drop_alg;
a38f7907	353
016baaa1 HX	354	err = crypto_unregister_instance((struct crypto_instance *)alg);
	355
	356	drop_alg:
	357	crypto_mod_put(alg);
	358	return err;
a38f7907 SK	359	}
a38f7907 SK	360
1e122994 SK	361	static struct crypto_alg crypto_user_skcipher_alg(const char name, u32 type,
	362	u32 mask)
	363	{
	364	int err;
	365	struct crypto_alg *alg;
	366
	367	type = crypto_skcipher_type(type);
	368	mask = crypto_skcipher_mask(mask);
	369
	370	for (;;) {
	371	alg = crypto_lookup_skcipher(name, type, mask);
	372	if (!IS_ERR(alg))
	373	return alg;
	374
	375	err = PTR_ERR(alg);
	376	if (err != -EAGAIN)
	377	break;
	378	if (signal_pending(current)) {
	379	err = -EINTR;
	380	break;
	381	}
	382	}
	383
	384	return ERR_PTR(err);
	385	}
	386
	387	static struct crypto_alg crypto_user_aead_alg(const char name, u32 type,
	388	u32 mask)
	389	{
	390	int err;
	391	struct crypto_alg *alg;
	392
	393	type &= ~(CRYPTO_ALG_TYPE_MASK \| CRYPTO_ALG_GENIV);
	394	type \|= CRYPTO_ALG_TYPE_AEAD;
	395	mask &= ~(CRYPTO_ALG_TYPE_MASK \| CRYPTO_ALG_GENIV);
	396	mask \|= CRYPTO_ALG_TYPE_MASK;
	397
	398	for (;;) {
	399	alg = crypto_lookup_aead(name, type, mask);
	400	if (!IS_ERR(alg))
	401	return alg;
	402
	403	err = PTR_ERR(alg);
	404	if (err != -EAGAIN)
	405	break;
	406	if (signal_pending(current)) {
	407	err = -EINTR;
	408	break;
	409	}
	410	}
	411
	412	return ERR_PTR(err);
	413	}
	414
a38f7907 SK	415	static int crypto_add_alg(struct sk_buff skb, struct nlmsghdr nlh,
	416	struct nlattr **attrs)
	417	{
0cfdec7a	418	int exact = 0;
a38f7907 SK	419	const char *name;
	420	struct crypto_alg *alg;
	421	struct crypto_user_alg *p = nlmsg_data(nlh);
	422	struct nlattr *priority = attrs[CRYPTOCFGA_PRIORITY_VAL];
	423
639b4ac6	424	if (!netlink_capable(skb, CAP_NET_ADMIN))
c568398a MCO	425	return -EPERM;
c568398a MCO	426
8fd61d34 MK	427	if (!null_terminated(p->cru_name) \|\| !null_terminated(p->cru_driver_name))
	428	return -EINVAL;
	429
a38f7907 SK	430	if (strlen(p->cru_driver_name))
	431	exact = 1;
	432
	433	if (priority && !exact)
	434	return -EINVAL;
	435
	436	alg = crypto_alg_match(p, exact);
016baaa1 HX	437	if (alg) {
016baaa1 HX	438	crypto_mod_put(alg);
a38f7907	439	return -EEXIST;
016baaa1	440	}
a38f7907 SK	441
	442	if (strlen(p->cru_driver_name))
	443	name = p->cru_driver_name;
	444	else
	445	name = p->cru_name;
	446
1e122994 SK	447	switch (p->cru_type & p->cru_mask & CRYPTO_ALG_TYPE_MASK) {
	448	case CRYPTO_ALG_TYPE_AEAD:
	449	alg = crypto_user_aead_alg(name, p->cru_type, p->cru_mask);
	450	break;
	451	case CRYPTO_ALG_TYPE_GIVCIPHER:
	452	case CRYPTO_ALG_TYPE_BLKCIPHER:
	453	case CRYPTO_ALG_TYPE_ABLKCIPHER:
	454	alg = crypto_user_skcipher_alg(name, p->cru_type, p->cru_mask);
	455	break;
	456	default:
	457	alg = crypto_alg_mod_lookup(name, p->cru_type, p->cru_mask);
	458	}
	459
a38f7907 SK	460	if (IS_ERR(alg))
	461	return PTR_ERR(alg);
	462
	463	down_write(&crypto_alg_sem);
	464
	465	if (priority)
	466	alg->cra_priority = nla_get_u32(priority);
	467
	468	up_write(&crypto_alg_sem);
	469
	470	crypto_mod_put(alg);
	471
	472	return 0;
	473	}
	474
	475	#define MSGSIZE(type) sizeof(struct type)
	476
	477	static const int crypto_msg_min[CRYPTO_NR_MSGTYPES] = {
	478	[CRYPTO_MSG_NEWALG - CRYPTO_MSG_BASE] = MSGSIZE(crypto_user_alg),
	479	[CRYPTO_MSG_DELALG - CRYPTO_MSG_BASE] = MSGSIZE(crypto_user_alg),
	480	[CRYPTO_MSG_UPDATEALG - CRYPTO_MSG_BASE] = MSGSIZE(crypto_user_alg),
	481	[CRYPTO_MSG_GETALG - CRYPTO_MSG_BASE] = MSGSIZE(crypto_user_alg),
	482	};
	483
	484	static const struct nla_policy crypto_policy[CRYPTOCFGA_MAX+1] = {
	485	[CRYPTOCFGA_PRIORITY_VAL] = { .type = NLA_U32},
	486	};
	487
	488	#undef MSGSIZE
	489
a84fb791	490	static const struct crypto_link {
a38f7907 SK	491	int (doit)(struct sk_buff , struct nlmsghdr , struct nlattr *);
	492	int (dump)(struct sk_buff , struct netlink_callback *);
	493	int (done)(struct netlink_callback );
	494	} crypto_dispatch[CRYPTO_NR_MSGTYPES] = {
	495	[CRYPTO_MSG_NEWALG - CRYPTO_MSG_BASE] = { .doit = crypto_add_alg},
	496	[CRYPTO_MSG_DELALG - CRYPTO_MSG_BASE] = { .doit = crypto_del_alg},
	497	[CRYPTO_MSG_UPDATEALG - CRYPTO_MSG_BASE] = { .doit = crypto_update_alg},
	498	[CRYPTO_MSG_GETALG - CRYPTO_MSG_BASE] = { .doit = crypto_report,
	499	.dump = crypto_dump_report,
	500	.done = crypto_dump_report_done},
	501	};
	502
	503	static int crypto_user_rcv_msg(struct sk_buff skb, struct nlmsghdr nlh)
	504	{
	505	struct nlattr *attrs[CRYPTOCFGA_MAX+1];
a84fb791	506	const struct crypto_link *link;
a38f7907 SK	507	int type, err;
	508
	509	type = nlh->nlmsg_type;
	510	if (type > CRYPTO_MSG_MAX)
	511	return -EINVAL;
	512
	513	type -= CRYPTO_MSG_BASE;
	514	link = &crypto_dispatch[type];
	515
a38f7907 SK	516	if ((type == (CRYPTO_MSG_GETALG - CRYPTO_MSG_BASE) &&
a38f7907 SK	517	(nlh->nlmsg_flags & NLM_F_DUMP))) {
5219a534 SK	518	struct crypto_alg *alg;
	519	u16 dump_alloc = 0;
	520
a38f7907 SK	521	if (link->dump == NULL)
a38f7907 SK	522	return -EINVAL;
5219a534 SK	523
	524	list_for_each_entry(alg, &crypto_alg_list, cra_list)
	525	dump_alloc += CRYPTO_REPORT_MAXSIZE;
	526
80d326fa PNA	527	{
	528	struct netlink_dump_control c = {
	529	.dump = link->dump,
	530	.done = link->done,
5219a534	531	.min_dump_alloc = dump_alloc,
80d326fa PNA	532	};
	533	return netlink_dump_start(crypto_nlsk, skb, nlh, &c);
	534	}
a38f7907 SK	535	}
	536
	537	err = nlmsg_parse(nlh, crypto_msg_min[type], attrs, CRYPTOCFGA_MAX,
	538	crypto_policy);
	539	if (err < 0)
	540	return err;
	541
	542	if (link->doit == NULL)
	543	return -EINVAL;
	544
	545	return link->doit(skb, nlh, attrs);
	546	}
	547
	548	static void crypto_netlink_rcv(struct sk_buff *skb)
	549	{
	550	mutex_lock(&crypto_cfg_mutex);
	551	netlink_rcv_skb(skb, &crypto_user_rcv_msg);
	552	mutex_unlock(&crypto_cfg_mutex);
	553	}
	554
	555	static int __init crypto_user_init(void)
	556	{
a31f2d17 PNA	557	struct netlink_kernel_cfg cfg = {
	558	.input = crypto_netlink_rcv,
	559	};
	560
9f00d977	561	crypto_nlsk = netlink_kernel_create(&init_net, NETLINK_CRYPTO, &cfg);
a38f7907 SK	562	if (!crypto_nlsk)
	563	return -ENOMEM;
	564
	565	return 0;
	566	}
	567
	568	static void __exit crypto_user_exit(void)
	569	{
	570	netlink_kernel_release(crypto_nlsk);
	571	}
	572
	573	module_init(crypto_user_init);
	574	module_exit(crypto_user_exit);
	575	MODULE_LICENSE("GPL");
	576	MODULE_AUTHOR("Steffen Klassert <steffen.klassert@secunet.com>");
	577	MODULE_DESCRIPTION("Crypto userspace configuration API");
476c7fe2	578	MODULE_ALIAS("net-pf-16-proto-21");