[net-next-2.6.git] / net / caif / cfrfml.c

/*
 * Copyright (C) ST-Ericsson AB 2010
 * Author:	Sjur Brendeland/sjur.brandeland@stericsson.com
 * License terms: GNU General Public License (GPL) version 2
 */

#define pr_fmt(fmt) KBUILD_MODNAME ":%s(): " fmt, __func__

#include <linux/stddef.h>
#include <linux/spinlock.h>
#include <linux/slab.h>
#include <asm/unaligned.h>
#include <net/caif/caif_layer.h>
#include <net/caif/cfsrvl.h>
#include <net/caif/cfpkt.h>

#define container_obj(layr) container_of(layr, struct cfrfml, serv.layer)
#define RFM_SEGMENTATION_BIT 0x01
#define RFM_HEAD_SIZE 7

static int cfrfml_receive(struct cflayer *layr, struct cfpkt *pkt);
static int cfrfml_transmit(struct cflayer *layr, struct cfpkt *pkt);

struct cfrfml {
	struct cfsrvl serv;
	struct cfpkt *incomplete_frm;
	int fragment_size;
	u8  seghead[6];
	u16 pdu_size;
	/* Protects serialized processing of packets */
	spinlock_t sync;
};

static void cfrfml_release(struct kref *kref)
{
	struct cfsrvl *srvl = container_of(kref, struct cfsrvl, ref);
	struct cfrfml *rfml = container_obj(&srvl->layer);

	if (rfml->incomplete_frm)
		cfpkt_destroy(rfml->incomplete_frm);

	kfree(srvl);
}

struct cflayer *cfrfml_create(u8 channel_id, struct dev_info *dev_info,
					int mtu_size)
{
	int tmp;
	struct cfrfml *this =
		kzalloc(sizeof(struct cfrfml), GFP_ATOMIC);

	if (!this) {
		pr_warn("Out of memory\n");
		return NULL;
	}

	cfsrvl_init(&this->serv, channel_id, dev_info, false);
	this->serv.release = cfrfml_release;
	this->serv.layer.receive = cfrfml_receive;
	this->serv.layer.transmit = cfrfml_transmit;

	/* Round down to closest multiple of 16 */
	tmp = (mtu_size - RFM_HEAD_SIZE - 6) / 16;
	tmp *= 16;

	this->fragment_size = tmp;
	spin_lock_init(&this->sync);
	snprintf(this->serv.layer.name, CAIF_LAYER_NAME_SZ,
		"rfm%d", channel_id);

	return &this->serv.layer;
}

static struct cfpkt *rfm_append(struct cfrfml *rfml, char *seghead,
			struct cfpkt *pkt, int *err)
{
	struct cfpkt *tmppkt;
	*err = -EPROTO;
	/* n-th but not last segment */

	if (cfpkt_extr_head(pkt, seghead, 6) < 0)
		return NULL;

	/* Verify correct header */
	if (memcmp(seghead, rfml->seghead, 6) != 0)
		return NULL;

	tmppkt = cfpkt_append(rfml->incomplete_frm, pkt,
			rfml->pdu_size + RFM_HEAD_SIZE);

	/* If cfpkt_append failes input pkts are not freed */
	*err = -ENOMEM;
	if (tmppkt == NULL)
		return NULL;

	*err = 0;
	return tmppkt;
}

static int cfrfml_receive(struct cflayer *layr, struct cfpkt *pkt)
{
	u8 tmp;
	bool segmented;
	int err;
	u8 seghead[6];
	struct cfrfml *rfml;
	struct cfpkt *tmppkt = NULL;

	caif_assert(layr->up != NULL);
	caif_assert(layr->receive != NULL);
	rfml = container_obj(layr);
	spin_lock(&rfml->sync);

	err = -EPROTO;
	if (cfpkt_extr_head(pkt, &tmp, 1) < 0)
		goto out;
	segmented = tmp & RFM_SEGMENTATION_BIT;

	if (segmented) {
		if (rfml->incomplete_frm == NULL) {
			/* Initial Segment */
			if (cfpkt_peek_head(pkt, rfml->seghead, 6) < 0)
				goto out;

			rfml->pdu_size = get_unaligned_le16(rfml->seghead+4);

			if (cfpkt_erroneous(pkt))
				goto out;
			rfml->incomplete_frm = pkt;
			pkt = NULL;
		} else {

			tmppkt = rfm_append(rfml, seghead, pkt, &err);
			if (tmppkt == NULL)
				goto out;

			if (cfpkt_erroneous(tmppkt))
				goto out;

			rfml->incomplete_frm = tmppkt;


			if (cfpkt_erroneous(tmppkt))
				goto out;
		}
		err = 0;
		goto out;
	}

	if (rfml->incomplete_frm) {

		/* Last Segment */
		tmppkt = rfm_append(rfml, seghead, pkt, &err);
		if (tmppkt == NULL)
			goto out;

		if (cfpkt_erroneous(tmppkt))
			goto out;

		rfml->incomplete_frm = NULL;
		pkt = tmppkt;
		tmppkt = NULL;

		/* Verify that length is correct */
		err = EPROTO;
		if (rfml->pdu_size != cfpkt_getlen(pkt) - RFM_HEAD_SIZE + 1)
			goto out;
	}

	err = rfml->serv.layer.up->receive(rfml->serv.layer.up, pkt);

out:

	if (err != 0) {
		if (tmppkt)
			cfpkt_destroy(tmppkt);
		if (pkt)
			cfpkt_destroy(pkt);
		if (rfml->incomplete_frm)
			cfpkt_destroy(rfml->incomplete_frm);
		rfml->incomplete_frm = NULL;

		pr_info("Connection error %d triggered on RFM link\n", err);

		/* Trigger connection error upon failure.*/
		layr->up->ctrlcmd(layr->up, CAIF_CTRLCMD_REMOTE_SHUTDOWN_IND,
					rfml->serv.dev_info.id);
	}
	spin_unlock(&rfml->sync);
	return err;
}


static int cfrfml_transmit_segment(struct cfrfml *rfml, struct cfpkt *pkt)
{
	caif_assert(cfpkt_getlen(pkt) < rfml->fragment_size);

	/* Add info for MUX-layer to route the packet out. */
	cfpkt_info(pkt)->channel_id = rfml->serv.layer.id;

	/*
	 * To optimize alignment, we add up the size of CAIF header before
	 * payload.
	 */
	cfpkt_info(pkt)->hdr_len = RFM_HEAD_SIZE;
	cfpkt_info(pkt)->dev_info = &rfml->serv.dev_info;

	return rfml->serv.layer.dn->transmit(rfml->serv.layer.dn, pkt);
}

static int cfrfml_transmit(struct cflayer *layr, struct cfpkt *pkt)
{
	int err;
	u8 seg;
	u8 head[6];
	struct cfpkt *rearpkt = NULL;
	struct cfpkt *frontpkt = pkt;
	struct cfrfml *rfml = container_obj(layr);

	caif_assert(layr->dn != NULL);
	caif_assert(layr->dn->transmit != NULL);

	if (!cfsrvl_ready(&rfml->serv, &err))
		return err;

	err = -EPROTO;
	if (cfpkt_getlen(pkt) <= RFM_HEAD_SIZE-1)
		goto out;

	err = 0;
	if (cfpkt_getlen(pkt) > rfml->fragment_size + RFM_HEAD_SIZE)
		err = cfpkt_peek_head(pkt, head, 6);

	if (err < 0)
		goto out;

	while (cfpkt_getlen(frontpkt) > rfml->fragment_size + RFM_HEAD_SIZE) {

		seg = 1;
		err = -EPROTO;

		if (cfpkt_add_head(frontpkt, &seg, 1) < 0)
			goto out;
		/*
		 * On OOM error cfpkt_split returns NULL.
		 *
		 * NOTE: Segmented pdu is not correctly aligned.
		 * This has negative performance impact.
		 */

		rearpkt = cfpkt_split(frontpkt, rfml->fragment_size);
		if (rearpkt == NULL)
			goto out;

		err = cfrfml_transmit_segment(rfml, frontpkt);

		if (err != 0)
			goto out;
		frontpkt = rearpkt;
		rearpkt = NULL;

		err = -ENOMEM;
		if (frontpkt == NULL)
			goto out;
		err = -EPROTO;
		if (cfpkt_add_head(frontpkt, head, 6) < 0)
			goto out;

	}

	seg = 0;
	err = -EPROTO;

	if (cfpkt_add_head(frontpkt, &seg, 1) < 0)
		goto out;

	err = cfrfml_transmit_segment(rfml, frontpkt);

	frontpkt = NULL;
out:

	if (err != 0) {
		pr_info("Connection error %d triggered on RFM link\n", err);
		/* Trigger connection error upon failure.*/

		layr->up->ctrlcmd(layr->up, CAIF_CTRLCMD_REMOTE_SHUTDOWN_IND,
					rfml->serv.dev_info.id);

		if (rearpkt)
			cfpkt_destroy(rearpkt);

		if (frontpkt && frontpkt != pkt) {

			cfpkt_destroy(frontpkt);
			/*
			 * Socket layer will free the original packet,
			 * but this packet may already be sent and
			 * freed. So we have to return 0 in this case
			 * to avoid socket layer to re-free this packet.
			 * The return of shutdown indication will
			 * cause connection to be invalidated anyhow.
			 */
			err = 0;
		}
	}

	return err;
}
Commit	Line	Data
b482cd20 SB	1	/*
	2	* Copyright (C) ST-Ericsson AB 2010
	3	* Author: Sjur Brendeland/sjur.brandeland@stericsson.com
	4	* License terms: GNU General Public License (GPL) version 2
	5	*/
	6
b31fa5ba JP	7	#define pr_fmt(fmt) KBUILD_MODNAME ":%s(): " fmt, __func__
b31fa5ba JP	8
b482cd20 SB	9	#include <linux/stddef.h>
	10	#include <linux/spinlock.h>
	11	#include <linux/slab.h>
7e368739	12	#include <asm/unaligned.h>
b482cd20 SB	13	#include <net/caif/caif_layer.h>
	14	#include <net/caif/cfsrvl.h>
	15	#include <net/caif/cfpkt.h>
	16
a7da1f55	17	#define container_obj(layr) container_of(layr, struct cfrfml, serv.layer)
b482cd20	18	#define RFM_SEGMENTATION_BIT 0x01
a7da1f55	19	#define RFM_HEAD_SIZE 7
b482cd20 SB	20
	21	static int cfrfml_receive(struct cflayer layr, struct cfpkt pkt);
	22	static int cfrfml_transmit(struct cflayer layr, struct cfpkt pkt);
b482cd20	23
a7da1f55 SB	24	struct cfrfml {
	25	struct cfsrvl serv;
	26	struct cfpkt *incomplete_frm;
	27	int fragment_size;
	28	u8 seghead[6];
	29	u16 pdu_size;
	30	/* Protects serialized processing of packets */
	31	spinlock_t sync;
	32	};
	33
	34	static void cfrfml_release(struct kref *kref)
	35	{
	36	struct cfsrvl *srvl = container_of(kref, struct cfsrvl, ref);
	37	struct cfrfml *rfml = container_obj(&srvl->layer);
	38
	39	if (rfml->incomplete_frm)
	40	cfpkt_destroy(rfml->incomplete_frm);
	41
	42	kfree(srvl);
	43	}
	44
	45	struct cflayer cfrfml_create(u8 channel_id, struct dev_info dev_info,
	46	int mtu_size)
b482cd20	47	{
a7da1f55 SB	48	int tmp;
	49	struct cfrfml *this =
	50	kzalloc(sizeof(struct cfrfml), GFP_ATOMIC);
b1c74247	51
a7da1f55	52	if (!this) {
b31fa5ba	53	pr_warn("Out of memory\n");
b482cd20 SB	54	return NULL;
b482cd20 SB	55	}
b1c74247	56
a7da1f55 SB	57	cfsrvl_init(&this->serv, channel_id, dev_info, false);
	58	this->serv.release = cfrfml_release;
	59	this->serv.layer.receive = cfrfml_receive;
	60	this->serv.layer.transmit = cfrfml_transmit;
	61
	62	/* Round down to closest multiple of 16 */
	63	tmp = (mtu_size - RFM_HEAD_SIZE - 6) / 16;
	64	tmp *= 16;
	65
	66	this->fragment_size = tmp;
	67	spin_lock_init(&this->sync);
	68	snprintf(this->serv.layer.name, CAIF_LAYER_NAME_SZ,
	69	"rfm%d", channel_id);
	70
	71	return &this->serv.layer;
	72	}
	73
	74	static struct cfpkt rfm_append(struct cfrfml rfml, char *seghead,
	75	struct cfpkt pkt, int err)
	76	{
	77	struct cfpkt *tmppkt;
	78	*err = -EPROTO;
	79	/* n-th but not last segment */
	80
	81	if (cfpkt_extr_head(pkt, seghead, 6) < 0)
	82	return NULL;
	83
	84	/* Verify correct header */
	85	if (memcmp(seghead, rfml->seghead, 6) != 0)
	86	return NULL;
	87
	88	tmppkt = cfpkt_append(rfml->incomplete_frm, pkt,
	89	rfml->pdu_size + RFM_HEAD_SIZE);
	90
	91	/* If cfpkt_append failes input pkts are not freed */
	92	*err = -ENOMEM;
	93	if (tmppkt == NULL)
	94	return NULL;
b1c74247	95
a7da1f55 SB	96	*err = 0;
a7da1f55 SB	97	return tmppkt;
b482cd20 SB	98	}
b482cd20 SB	99
b482cd20 SB	100	static int cfrfml_receive(struct cflayer layr, struct cfpkt pkt)
	101	{
	102	u8 tmp;
	103	bool segmented;
a7da1f55 SB	104	int err;
	105	u8 seghead[6];
	106	struct cfrfml *rfml;
	107	struct cfpkt *tmppkt = NULL;
	108
b482cd20 SB	109	caif_assert(layr->up != NULL);
b482cd20 SB	110	caif_assert(layr->receive != NULL);
a7da1f55 SB	111	rfml = container_obj(layr);
	112	spin_lock(&rfml->sync);
	113
	114	err = -EPROTO;
	115	if (cfpkt_extr_head(pkt, &tmp, 1) < 0)
	116	goto out;
	117	segmented = tmp & RFM_SEGMENTATION_BIT;
	118
	119	if (segmented) {
	120	if (rfml->incomplete_frm == NULL) {
	121	/* Initial Segment */
	122	if (cfpkt_peek_head(pkt, rfml->seghead, 6) < 0)
	123	goto out;
	124
	125	rfml->pdu_size = get_unaligned_le16(rfml->seghead+4);
	126
	127	if (cfpkt_erroneous(pkt))
	128	goto out;
	129	rfml->incomplete_frm = pkt;
	130	pkt = NULL;
	131	} else {
	132
	133	tmppkt = rfm_append(rfml, seghead, pkt, &err);
	134	if (tmppkt == NULL)
	135	goto out;
	136
	137	if (cfpkt_erroneous(tmppkt))
	138	goto out;
	139
	140	rfml->incomplete_frm = tmppkt;
	141
	142
	143	if (cfpkt_erroneous(tmppkt))
	144	goto out;
	145	}
	146	err = 0;
	147	goto out;
	148	}
	149
	150	if (rfml->incomplete_frm) {
	151
	152	/* Last Segment */
	153	tmppkt = rfm_append(rfml, seghead, pkt, &err);
	154	if (tmppkt == NULL)
	155	goto out;
	156
	157	if (cfpkt_erroneous(tmppkt))
	158	goto out;
	159
	160	rfml->incomplete_frm = NULL;
	161	pkt = tmppkt;
	162	tmppkt = NULL;
	163
	164	/* Verify that length is correct */
	165	err = EPROTO;
	166	if (rfml->pdu_size != cfpkt_getlen(pkt) - RFM_HEAD_SIZE + 1)
	167	goto out;
	168	}
	169
	170	err = rfml->serv.layer.up->receive(rfml->serv.layer.up, pkt);
	171
	172	out:
	173
	174	if (err != 0) {
175	if (tmppkt)
176	cfpkt_destroy(tmppkt);
177	if (pkt)
178	cfpkt_destroy(pkt);
179	if (rfml->incomplete_frm)
180	cfpkt_destroy(rfml->incomplete_frm);
181	rfml->incomplete_frm = NULL;
182
b31fa5ba	183	pr_info("Connection error %d triggered on RFM link\n", err);
a7da1f55 SB	184
	185	/* Trigger connection error upon failure.*/
	186	layr->up->ctrlcmd(layr->up, CAIF_CTRLCMD_REMOTE_SHUTDOWN_IND,
	187	rfml->serv.dev_info.id);
	188	}
	189	spin_unlock(&rfml->sync);
	190	return err;
	191	}
	192
	193
	194	static int cfrfml_transmit_segment(struct cfrfml rfml, struct cfpkt pkt)
	195	{
f2527ec4	196	caif_assert(cfpkt_getlen(pkt) < rfml->fragment_size);
a7da1f55 SB	197
	198	/* Add info for MUX-layer to route the packet out. */
	199	cfpkt_info(pkt)->channel_id = rfml->serv.layer.id;
b482cd20 SB	200
b482cd20 SB	201	/*
a7da1f55 SB	202	* To optimize alignment, we add up the size of CAIF header before
a7da1f55 SB	203	* payload.
b482cd20	204	*/
a7da1f55 SB	205	cfpkt_info(pkt)->hdr_len = RFM_HEAD_SIZE;
a7da1f55 SB	206	cfpkt_info(pkt)->dev_info = &rfml->serv.dev_info;
b482cd20	207
a7da1f55	208	return rfml->serv.layer.dn->transmit(rfml->serv.layer.dn, pkt);
b482cd20 SB	209	}
	210
	211	static int cfrfml_transmit(struct cflayer layr, struct cfpkt pkt)
	212	{
a7da1f55 SB	213	int err;
	214	u8 seg;
	215	u8 head[6];
	216	struct cfpkt *rearpkt = NULL;
	217	struct cfpkt *frontpkt = pkt;
	218	struct cfrfml *rfml = container_obj(layr);
b482cd20 SB	219
	220	caif_assert(layr->dn != NULL);
	221	caif_assert(layr->dn->transmit != NULL);
	222
a7da1f55 SB	223	if (!cfsrvl_ready(&rfml->serv, &err))
	224	return err;
	225
	226	err = -EPROTO;
	227	if (cfpkt_getlen(pkt) <= RFM_HEAD_SIZE-1)
	228	goto out;
	229
	230	err = 0;
	231	if (cfpkt_getlen(pkt) > rfml->fragment_size + RFM_HEAD_SIZE)
	232	err = cfpkt_peek_head(pkt, head, 6);
	233
	234	if (err < 0)
	235	goto out;
	236
	237	while (cfpkt_getlen(frontpkt) > rfml->fragment_size + RFM_HEAD_SIZE) {
	238
	239	seg = 1;
	240	err = -EPROTO;
	241
	242	if (cfpkt_add_head(frontpkt, &seg, 1) < 0)
	243	goto out;
	244	/*
	245	* On OOM error cfpkt_split returns NULL.
	246	*
	247	* NOTE: Segmented pdu is not correctly aligned.
	248	* This has negative performance impact.
	249	*/
	250
	251	rearpkt = cfpkt_split(frontpkt, rfml->fragment_size);
	252	if (rearpkt == NULL)
	253	goto out;
	254
	255	err = cfrfml_transmit_segment(rfml, frontpkt);
	256
	257	if (err != 0)
	258	goto out;
	259	frontpkt = rearpkt;
	260	rearpkt = NULL;
	261
	262	err = -ENOMEM;
	263	if (frontpkt == NULL)
	264	goto out;
	265	err = -EPROTO;
	266	if (cfpkt_add_head(frontpkt, head, 6) < 0)
	267	goto out;
b482cd20	268
b482cd20	269	}
a7da1f55 SB	270
	271	seg = 0;
	272	err = -EPROTO;
	273
	274	if (cfpkt_add_head(frontpkt, &seg, 1) < 0)
	275	goto out;
	276
	277	err = cfrfml_transmit_segment(rfml, frontpkt);
	278
	279	frontpkt = NULL;
	280	out:
	281
	282	if (err != 0) {
b31fa5ba	283	pr_info("Connection error %d triggered on RFM link\n", err);
a7da1f55 SB	284	/* Trigger connection error upon failure.*/
	285
	286	layr->up->ctrlcmd(layr->up, CAIF_CTRLCMD_REMOTE_SHUTDOWN_IND,
	287	rfml->serv.dev_info.id);
	288
	289	if (rearpkt)
	290	cfpkt_destroy(rearpkt);
	291
	292	if (frontpkt && frontpkt != pkt) {
	293
	294	cfpkt_destroy(frontpkt);
	295	/*
	296	* Socket layer will free the original packet,
	297	* but this packet may already be sent and
	298	* freed. So we have to return 0 in this case
	299	* to avoid socket layer to re-free this packet.
	300	* The return of shutdown indication will
	301	* cause connection to be invalidated anyhow.
	302	*/
	303	err = 0;
	304	}
b482cd20 SB	305	}
b482cd20 SB	306
a7da1f55	307	return err;
b482cd20	308	}