[linux.git] / net / atm / signaling.c

/* net/atm/signaling.c - ATM signaling */

/* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */

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

#include <linux/errno.h>	/* error codes */
#include <linux/kernel.h>	/* printk */
#include <linux/skbuff.h>
#include <linux/wait.h>
#include <linux/sched.h>	/* jiffies and HZ */
#include <linux/atm.h>		/* ATM stuff */
#include <linux/atmsap.h>
#include <linux/atmsvc.h>
#include <linux/atmdev.h>
#include <linux/bitops.h>
#include <linux/slab.h>

#include "resources.h"
#include "signaling.h"

#undef WAIT_FOR_DEMON		/* #define this if system calls on SVC sockets
				   should block until the demon runs.
				   Danger: may cause nasty hangs if the demon
				   crashes. */

struct atm_vcc *sigd = NULL;
#ifdef WAIT_FOR_DEMON
static DECLARE_WAIT_QUEUE_HEAD(sigd_sleep);
#endif

static void sigd_put_skb(struct sk_buff *skb)
{
#ifdef WAIT_FOR_DEMON
	DECLARE_WAITQUEUE(wait, current);

	add_wait_queue(&sigd_sleep, &wait);
	while (!sigd) {
		set_current_state(TASK_UNINTERRUPTIBLE);
		pr_debug("atmsvc: waiting for signaling daemon...\n");
		schedule();
	}
	current->state = TASK_RUNNING;
	remove_wait_queue(&sigd_sleep, &wait);
#else
	if (!sigd) {
		pr_debug("atmsvc: no signaling daemon\n");
		kfree_skb(skb);
		return;
	}
#endif
	atm_force_charge(sigd, skb->truesize);
	skb_queue_tail(&sk_atm(sigd)->sk_receive_queue, skb);
	sk_atm(sigd)->sk_data_ready(sk_atm(sigd), skb->len);
}

static void modify_qos(struct atm_vcc *vcc, struct atmsvc_msg *msg)
{
	struct sk_buff *skb;

	if (test_bit(ATM_VF_RELEASED, &vcc->flags) ||
	    !test_bit(ATM_VF_READY, &vcc->flags))
		return;
	msg->type = as_error;
	if (!vcc->dev->ops->change_qos)
		msg->reply = -EOPNOTSUPP;
	else {
		/* should lock VCC */
		msg->reply = vcc->dev->ops->change_qos(vcc, &msg->qos,
						       msg->reply);
		if (!msg->reply)
			msg->type = as_okay;
	}
	/*
	 * Should probably just turn around the old skb. But the, the buffer
	 * space accounting needs to follow the change too. Maybe later.
	 */
	while (!(skb = alloc_skb(sizeof(struct atmsvc_msg), GFP_KERNEL)))
		schedule();
	*(struct atmsvc_msg *)skb_put(skb, sizeof(struct atmsvc_msg)) = *msg;
	sigd_put_skb(skb);
}

static int sigd_send(struct atm_vcc *vcc, struct sk_buff *skb)
{
	struct atmsvc_msg *msg;
	struct atm_vcc *session_vcc;
	struct sock *sk;

	msg = (struct atmsvc_msg *) skb->data;
	atomic_sub(skb->truesize, &sk_atm(vcc)->sk_wmem_alloc);
	vcc = *(struct atm_vcc **) &msg->vcc;
	pr_debug("%d (0x%lx)\n", (int)msg->type, (unsigned long)vcc);
	sk = sk_atm(vcc);

	switch (msg->type) {
	case as_okay:
		sk->sk_err = -msg->reply;
		clear_bit(ATM_VF_WAITING, &vcc->flags);
		if (!*vcc->local.sas_addr.prv && !*vcc->local.sas_addr.pub) {
			vcc->local.sas_family = AF_ATMSVC;
			memcpy(vcc->local.sas_addr.prv,
			       msg->local.sas_addr.prv, ATM_ESA_LEN);
			memcpy(vcc->local.sas_addr.pub,
			       msg->local.sas_addr.pub, ATM_E164_LEN + 1);
		}
		session_vcc = vcc->session ? vcc->session : vcc;
		if (session_vcc->vpi || session_vcc->vci)
			break;
		session_vcc->itf = msg->pvc.sap_addr.itf;
		session_vcc->vpi = msg->pvc.sap_addr.vpi;
		session_vcc->vci = msg->pvc.sap_addr.vci;
		if (session_vcc->vpi || session_vcc->vci)
			session_vcc->qos = msg->qos;
		break;
	case as_error:
		clear_bit(ATM_VF_REGIS, &vcc->flags);
		clear_bit(ATM_VF_READY, &vcc->flags);
		sk->sk_err = -msg->reply;
		clear_bit(ATM_VF_WAITING, &vcc->flags);
		break;
	case as_indicate:
		vcc = *(struct atm_vcc **)&msg->listen_vcc;
		sk = sk_atm(vcc);
		pr_debug("as_indicate!!!\n");
		lock_sock(sk);
		if (sk_acceptq_is_full(sk)) {
			sigd_enq(NULL, as_reject, vcc, NULL, NULL);
			dev_kfree_skb(skb);
			goto as_indicate_complete;
		}
		sk->sk_ack_backlog++;
		skb_queue_tail(&sk->sk_receive_queue, skb);
		pr_debug("waking sk_sleep(sk) 0x%p\n", sk_sleep(sk));
		sk->sk_state_change(sk);
as_indicate_complete:
		release_sock(sk);
		return 0;
	case as_close:
		set_bit(ATM_VF_RELEASED, &vcc->flags);
		vcc_release_async(vcc, msg->reply);
		goto out;
	case as_modify:
		modify_qos(vcc, msg);
		break;
	case as_addparty:
	case as_dropparty:
		sk->sk_err_soft = msg->reply;
					/* < 0 failure, otherwise ep_ref */
		clear_bit(ATM_VF_WAITING, &vcc->flags);
		break;
	default:
		pr_alert("bad message type %d\n", (int)msg->type);
		return -EINVAL;
	}
	sk->sk_state_change(sk);
out:
	dev_kfree_skb(skb);
	return 0;
}

void sigd_enq2(struct atm_vcc *vcc, enum atmsvc_msg_type type,
	       struct atm_vcc *listen_vcc, const struct sockaddr_atmpvc *pvc,
	       const struct sockaddr_atmsvc *svc, const struct atm_qos *qos,
	       int reply)
{
	struct sk_buff *skb;
	struct atmsvc_msg *msg;
	static unsigned session = 0;

	pr_debug("%d (0x%p)\n", (int)type, vcc);
	while (!(skb = alloc_skb(sizeof(struct atmsvc_msg), GFP_KERNEL)))
		schedule();
	msg = (struct atmsvc_msg *)skb_put(skb, sizeof(struct atmsvc_msg));
	memset(msg, 0, sizeof(*msg));
	msg->type = type;
	*(struct atm_vcc **) &msg->vcc = vcc;
	*(struct atm_vcc **) &msg->listen_vcc = listen_vcc;
	msg->reply = reply;
	if (qos)
		msg->qos = *qos;
	if (vcc)
		msg->sap = vcc->sap;
	if (svc)
		msg->svc = *svc;
	if (vcc)
		msg->local = vcc->local;
	if (pvc)
		msg->pvc = *pvc;
	if (vcc) {
		if (type == as_connect && test_bit(ATM_VF_SESSION, &vcc->flags))
			msg->session = ++session;
			/* every new pmp connect gets the next session number */
	}
	sigd_put_skb(skb);
	if (vcc)
		set_bit(ATM_VF_REGIS, &vcc->flags);
}

void sigd_enq(struct atm_vcc *vcc, enum atmsvc_msg_type type,
	      struct atm_vcc *listen_vcc, const struct sockaddr_atmpvc *pvc,
	      const struct sockaddr_atmsvc *svc)
{
	sigd_enq2(vcc, type, listen_vcc, pvc, svc, vcc ? &vcc->qos : NULL, 0);
	/* other ISP applications may use "reply" */
}

static void purge_vcc(struct atm_vcc *vcc)
{
	if (sk_atm(vcc)->sk_family == PF_ATMSVC &&
	    !test_bit(ATM_VF_META, &vcc->flags)) {
		set_bit(ATM_VF_RELEASED, &vcc->flags);
		clear_bit(ATM_VF_REGIS, &vcc->flags);
		vcc_release_async(vcc, -EUNATCH);
	}
}

static void sigd_close(struct atm_vcc *vcc)
{
	struct hlist_node *node;
	struct sock *s;
	int i;

	pr_debug("\n");
	sigd = NULL;
	if (skb_peek(&sk_atm(vcc)->sk_receive_queue))
		pr_err("closing with requests pending\n");
	skb_queue_purge(&sk_atm(vcc)->sk_receive_queue);

	read_lock(&vcc_sklist_lock);
	for (i = 0; i < VCC_HTABLE_SIZE; ++i) {
		struct hlist_head *head = &vcc_hash[i];

		sk_for_each(s, node, head) {
			vcc = atm_sk(s);

			purge_vcc(vcc);
		}
	}
	read_unlock(&vcc_sklist_lock);
}

static struct atmdev_ops sigd_dev_ops = {
	.close = sigd_close,
	.send =	sigd_send
};

static struct atm_dev sigd_dev = {
	.ops =		&sigd_dev_ops,
	.type =		"sig",
	.number =	999,
	.lock =		__SPIN_LOCK_UNLOCKED(sigd_dev.lock)
};

int sigd_attach(struct atm_vcc *vcc)
{
	if (sigd)
		return -EADDRINUSE;
	pr_debug("\n");
	sigd = vcc;
	vcc->dev = &sigd_dev;
	vcc_insert_socket(sk_atm(vcc));
	set_bit(ATM_VF_META, &vcc->flags);
	set_bit(ATM_VF_READY, &vcc->flags);
#ifdef WAIT_FOR_DEMON
	wake_up(&sigd_sleep);
#endif
	return 0;
}
Commit	Line	Data
1da177e4 LT	1	/* net/atm/signaling.c - ATM signaling */
	2
	3	/* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */
	4
99824461	5	#define pr_fmt(fmt) KBUILD_MODNAME ":%s: " fmt, __func__
1da177e4 LT	6
	7	#include <linux/errno.h> /* error codes */
	8	#include <linux/kernel.h> /* printk */
	9	#include <linux/skbuff.h>
	10	#include <linux/wait.h>
	11	#include <linux/sched.h> /* jiffies and HZ */
	12	#include <linux/atm.h> /* ATM stuff */
	13	#include <linux/atmsap.h>
	14	#include <linux/atmsvc.h>
	15	#include <linux/atmdev.h>
	16	#include <linux/bitops.h>
5a0e3ad6	17	#include <linux/slab.h>
1da177e4 LT	18
	19	#include "resources.h"
	20	#include "signaling.h"
	21
1da177e4 LT	22	#undef WAIT_FOR_DEMON /* #define this if system calls on SVC sockets
	23	should block until the demon runs.
	24	Danger: may cause nasty hangs if the demon
	25	crashes. */
	26
1da177e4 LT	27	struct atm_vcc *sigd = NULL;
	28	#ifdef WAIT_FOR_DEMON
	29	static DECLARE_WAIT_QUEUE_HEAD(sigd_sleep);
	30	#endif
	31
1da177e4 LT	32	static void sigd_put_skb(struct sk_buff *skb)
	33	{
	34	#ifdef WAIT_FOR_DEMON
0ec96e65	35	DECLARE_WAITQUEUE(wait, current);
1da177e4	36
0ec96e65	37	add_wait_queue(&sigd_sleep, &wait);
1da177e4 LT	38	while (!sigd) {
1da177e4 LT	39	set_current_state(TASK_UNINTERRUPTIBLE);
99824461	40	pr_debug("atmsvc: waiting for signaling daemon...\n");
1da177e4 LT	41	schedule();
	42	}
	43	current->state = TASK_RUNNING;
0ec96e65	44	remove_wait_queue(&sigd_sleep, &wait);
1da177e4 LT	45	#else
1da177e4 LT	46	if (!sigd) {
99824461	47	pr_debug("atmsvc: no signaling daemon\n");
1da177e4 LT	48	kfree_skb(skb);
	49	return;
	50	}
	51	#endif
0ec96e65 JP	52	atm_force_charge(sigd, skb->truesize);
0ec96e65 JP	53	skb_queue_tail(&sk_atm(sigd)->sk_receive_queue, skb);
1da177e4 LT	54	sk_atm(sigd)->sk_data_ready(sk_atm(sigd), skb->len);
	55	}
	56
0ec96e65	57	static void modify_qos(struct atm_vcc vcc, struct atmsvc_msg msg)
1da177e4 LT	58	{
	59	struct sk_buff *skb;
	60
0ec96e65 JP	61	if (test_bit(ATM_VF_RELEASED, &vcc->flags) \|\|
0ec96e65 JP	62	!test_bit(ATM_VF_READY, &vcc->flags))
1da177e4 LT	63	return;
1da177e4 LT	64	msg->type = as_error;
0ec96e65 JP	65	if (!vcc->dev->ops->change_qos)
0ec96e65 JP	66	msg->reply = -EOPNOTSUPP;
1da177e4 LT	67	else {
1da177e4 LT	68	/* should lock VCC */
0ec96e65 JP	69	msg->reply = vcc->dev->ops->change_qos(vcc, &msg->qos,
	70	msg->reply);
	71	if (!msg->reply)
	72	msg->type = as_okay;
1da177e4 LT	73	}
	74	/*
	75	* Should probably just turn around the old skb. But the, the buffer
	76	* space accounting needs to follow the change too. Maybe later.
	77	*/
0ec96e65	78	while (!(skb = alloc_skb(sizeof(struct atmsvc_msg), GFP_KERNEL)))
1da177e4	79	schedule();
0ec96e65	80	(struct atmsvc_msg )skb_put(skb, sizeof(struct atmsvc_msg)) = *msg;
1da177e4 LT	81	sigd_put_skb(skb);
	82	}
	83
0ec96e65	84	static int sigd_send(struct atm_vcc vcc, struct sk_buff skb)
1da177e4 LT	85	{
	86	struct atmsvc_msg *msg;
	87	struct atm_vcc *session_vcc;
	88	struct sock *sk;
	89
	90	msg = (struct atmsvc_msg *) skb->data;
	91	atomic_sub(skb->truesize, &sk_atm(vcc)->sk_wmem_alloc);
1da177e4	92	vcc = (struct atm_vcc *) &msg->vcc;
99824461	93	pr_debug("%d (0x%lx)\n", (int)msg->type, (unsigned long)vcc);
1da177e4 LT	94	sk = sk_atm(vcc);
	95
	96	switch (msg->type) {
0ec96e65 JP	97	case as_okay:
	98	sk->sk_err = -msg->reply;
	99	clear_bit(ATM_VF_WAITING, &vcc->flags);
	100	if (!vcc->local.sas_addr.prv && !vcc->local.sas_addr.pub) {
	101	vcc->local.sas_family = AF_ATMSVC;
	102	memcpy(vcc->local.sas_addr.prv,
	103	msg->local.sas_addr.prv, ATM_ESA_LEN);
	104	memcpy(vcc->local.sas_addr.pub,
	105	msg->local.sas_addr.pub, ATM_E164_LEN + 1);
	106	}
	107	session_vcc = vcc->session ? vcc->session : vcc;
	108	if (session_vcc->vpi \|\| session_vcc->vci)
1da177e4	109	break;
0ec96e65 JP	110	session_vcc->itf = msg->pvc.sap_addr.itf;
	111	session_vcc->vpi = msg->pvc.sap_addr.vpi;
	112	session_vcc->vci = msg->pvc.sap_addr.vci;
	113	if (session_vcc->vpi \|\| session_vcc->vci)
	114	session_vcc->qos = msg->qos;
	115	break;
	116	case as_error:
	117	clear_bit(ATM_VF_REGIS, &vcc->flags);
	118	clear_bit(ATM_VF_READY, &vcc->flags);
	119	sk->sk_err = -msg->reply;
	120	clear_bit(ATM_VF_WAITING, &vcc->flags);
	121	break;
	122	case as_indicate:
	123	vcc = (struct atm_vcc *)&msg->listen_vcc;
	124	sk = sk_atm(vcc);
	125	pr_debug("as_indicate!!!\n");
	126	lock_sock(sk);
	127	if (sk_acceptq_is_full(sk)) {
	128	sigd_enq(NULL, as_reject, vcc, NULL, NULL);
	129	dev_kfree_skb(skb);
	130	goto as_indicate_complete;
	131	}
	132	sk->sk_ack_backlog++;
	133	skb_queue_tail(&sk->sk_receive_queue, skb);
aa395145	134	pr_debug("waking sk_sleep(sk) 0x%p\n", sk_sleep(sk));
0ec96e65	135	sk->sk_state_change(sk);
1da177e4	136	as_indicate_complete:
0ec96e65 JP	137	release_sock(sk);
	138	return 0;
	139	case as_close:
	140	set_bit(ATM_VF_RELEASED, &vcc->flags);
	141	vcc_release_async(vcc, msg->reply);
	142	goto out;
	143	case as_modify:
	144	modify_qos(vcc, msg);
	145	break;
	146	case as_addparty:
	147	case as_dropparty:
	148	sk->sk_err_soft = msg->reply;
	149	/* < 0 failure, otherwise ep_ref */
	150	clear_bit(ATM_VF_WAITING, &vcc->flags);
	151	break;
	152	default:
	153	pr_alert("bad message type %d\n", (int)msg->type);
	154	return -EINVAL;
1da177e4 LT	155	}
	156	sk->sk_state_change(sk);
	157	out:
	158	dev_kfree_skb(skb);
	159	return 0;
	160	}
	161
0ec96e65 JP	162	void sigd_enq2(struct atm_vcc *vcc, enum atmsvc_msg_type type,
	163	struct atm_vcc listen_vcc, const struct sockaddr_atmpvc pvc,
	164	const struct sockaddr_atmsvc svc, const struct atm_qos qos,
	165	int reply)
1da177e4 LT	166	{
	167	struct sk_buff *skb;
	168	struct atmsvc_msg *msg;
	169	static unsigned session = 0;
	170
99824461	171	pr_debug("%d (0x%p)\n", (int)type, vcc);
0ec96e65	172	while (!(skb = alloc_skb(sizeof(struct atmsvc_msg), GFP_KERNEL)))
1da177e4	173	schedule();
0ec96e65 JP	174	msg = (struct atmsvc_msg *)skb_put(skb, sizeof(struct atmsvc_msg));
0ec96e65 JP	175	memset(msg, 0, sizeof(*msg));
1da177e4 LT	176	msg->type = type;
	177	(struct atm_vcc *) &msg->vcc = vcc;
	178	(struct atm_vcc *) &msg->listen_vcc = listen_vcc;
	179	msg->reply = reply;
0ec96e65 JP	180	if (qos)
	181	msg->qos = *qos;
	182	if (vcc)
	183	msg->sap = vcc->sap;
	184	if (svc)
	185	msg->svc = *svc;
	186	if (vcc)
	187	msg->local = vcc->local;
	188	if (pvc)
	189	msg->pvc = *pvc;
1da177e4 LT	190	if (vcc) {
	191	if (type == as_connect && test_bit(ATM_VF_SESSION, &vcc->flags))
	192	msg->session = ++session;
	193	/* every new pmp connect gets the next session number */
	194	}
	195	sigd_put_skb(skb);
0ec96e65 JP	196	if (vcc)
0ec96e65 JP	197	set_bit(ATM_VF_REGIS, &vcc->flags);
1da177e4 LT	198	}
1da177e4 LT	199
0ec96e65 JP	200	void sigd_enq(struct atm_vcc *vcc, enum atmsvc_msg_type type,
	201	struct atm_vcc listen_vcc, const struct sockaddr_atmpvc pvc,
	202	const struct sockaddr_atmsvc *svc)
1da177e4	203	{
0ec96e65	204	sigd_enq2(vcc, type, listen_vcc, pvc, svc, vcc ? &vcc->qos : NULL, 0);
1da177e4 LT	205	/* other ISP applications may use "reply" */
	206	}
	207
1da177e4 LT	208	static void purge_vcc(struct atm_vcc *vcc)
	209	{
	210	if (sk_atm(vcc)->sk_family == PF_ATMSVC &&
9301e320 CW	211	!test_bit(ATM_VF_META, &vcc->flags)) {
	212	set_bit(ATM_VF_RELEASED, &vcc->flags);
	213	clear_bit(ATM_VF_REGIS, &vcc->flags);
1da177e4 LT	214	vcc_release_async(vcc, -EUNATCH);
	215	}
	216	}
	217
1da177e4 LT	218	static void sigd_close(struct atm_vcc *vcc)
	219	{
	220	struct hlist_node *node;
	221	struct sock *s;
	222	int i;
	223
99824461	224	pr_debug("\n");
1da177e4 LT	225	sigd = NULL;
1da177e4 LT	226	if (skb_peek(&sk_atm(vcc)->sk_receive_queue))
99824461	227	pr_err("closing with requests pending\n");
1da177e4 LT	228	skb_queue_purge(&sk_atm(vcc)->sk_receive_queue);
	229
	230	read_lock(&vcc_sklist_lock);
0ec96e65	231	for (i = 0; i < VCC_HTABLE_SIZE; ++i) {
1da177e4 LT	232	struct hlist_head *head = &vcc_hash[i];
	233
	234	sk_for_each(s, node, head) {
cfcabdcc	235	vcc = atm_sk(s);
1da177e4	236
9301e320	237	purge_vcc(vcc);
1da177e4 LT	238	}
	239	}
	240	read_unlock(&vcc_sklist_lock);
	241	}
	242
1da177e4 LT	243	static struct atmdev_ops sigd_dev_ops = {
	244	.close = sigd_close,
	245	.send = sigd_send
	246	};
	247
1da177e4 LT	248	static struct atm_dev sigd_dev = {
	249	.ops = &sigd_dev_ops,
	250	.type = "sig",
	251	.number = 999,
4ef8d0ae	252	.lock = __SPIN_LOCK_UNLOCKED(sigd_dev.lock)
1da177e4 LT	253	};
1da177e4 LT	254
1da177e4 LT	255	int sigd_attach(struct atm_vcc *vcc)
1da177e4 LT	256	{
0ec96e65 JP	257	if (sigd)
0ec96e65 JP	258	return -EADDRINUSE;
99824461	259	pr_debug("\n");
1da177e4 LT	260	sigd = vcc;
	261	vcc->dev = &sigd_dev;
	262	vcc_insert_socket(sk_atm(vcc));
0ec96e65 JP	263	set_bit(ATM_VF_META, &vcc->flags);
0ec96e65 JP	264	set_bit(ATM_VF_READY, &vcc->flags);
1da177e4 LT	265	#ifdef WAIT_FOR_DEMON
	266	wake_up(&sigd_sleep);
	267	#endif
	268	return 0;
	269	}