2 * Copyright (c) 2001-2003
3 * Fraunhofer Institute for Open Communication Systems (FhG Fokus).
6 * Author: Harti Brandt <harti@freebsd.org>
8 * Redistribution of this software and documentation and use in source and
9 * binary forms, with or without modification, are permitted provided that
10 * the following conditions are met:
12 * 1. Redistributions of source code or documentation must retain the above
13 * copyright notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
18 * THIS SOFTWARE AND DOCUMENTATION IS PROVIDED BY FRAUNHOFER FOKUS
19 * AND ITS CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
20 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
21 * FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
22 * FRAUNHOFER FOKUS OR ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
24 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
25 * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
26 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
27 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
28 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 * Netgraph module for ITU-T Q.2110 SSCOP.
33 #include <sys/cdefs.h>
34 __FBSDID("$FreeBSD$");
36 #include <sys/param.h>
37 #include <sys/systm.h>
38 #include <sys/kernel.h>
39 #include <sys/malloc.h>
41 #include <sys/errno.h>
42 #include <sys/syslog.h>
43 #include <sys/socket.h>
44 #include <sys/socketvar.h>
45 #include <sys/callout.h>
47 #include <sys/stdint.h>
48 #include <machine/stdarg.h>
50 #include <netgraph/ng_message.h>
51 #include <netgraph/netgraph.h>
52 #include <netgraph/ng_parse.h>
53 #include <netnatm/saal/sscopdef.h>
54 #include <netgraph/atm/ng_sscop.h>
55 #include <netgraph/atm/sscop/ng_sscop_cust.h>
56 #include <netnatm/saal/sscop.h>
58 #define DDD printf("%s: %d\n", __func__, __LINE__)
61 #define VERBOSE(P,M,F) \
63 if (sscop_getdebug((P)->sscop) & (M)) \
67 #define VERBOSE(P,M,F)
70 MALLOC_DEFINE(M_NG_SSCOP, "netgraph_sscop", "netgraph sscop node");
72 MODULE_DEPEND(ng_sscop, ngatmbase, 1, 1, 1);
79 uint64_t data_delivered;
91 hook_p upper; /* SAAL interface */
92 hook_p lower; /* AAL5 interface */
93 hook_p manage; /* management interface */
95 struct sscop *sscop; /* sscop state */
96 int enabled; /* whether the protocol is enabled */
97 int flow; /* flow control states */
98 struct stats stats; /* sadistics */
104 static const struct ng_parse_struct_field ng_sscop_param_type_info[] =
107 static const struct ng_parse_type ng_sscop_param_type = {
108 &ng_parse_struct_type,
109 ng_sscop_param_type_info
113 * Parse a SET PARAM type.
115 static const struct ng_parse_struct_field ng_sscop_setparam_type_info[] =
116 NG_SSCOP_SETPARAM_INFO;
118 static const struct ng_parse_type ng_sscop_setparam_type = {
119 &ng_parse_struct_type,
120 ng_sscop_setparam_type_info,
124 * Parse a SET PARAM response
126 static const struct ng_parse_struct_field ng_sscop_setparam_resp_type_info[] =
127 NG_SSCOP_SETPARAM_RESP_INFO;
129 static const struct ng_parse_type ng_sscop_setparam_resp_type = {
130 &ng_parse_struct_type,
131 ng_sscop_setparam_resp_type_info,
134 static const struct ng_cmdlist ng_sscop_cmdlist[] = {
146 &ng_sscop_setparam_type,
147 &ng_sscop_setparam_resp_type
168 &ng_parse_hint32_type
174 &ng_parse_hint32_type,
182 &ng_parse_uint32_type
187 static ng_constructor_t ng_sscop_constructor;
188 static ng_shutdown_t ng_sscop_shutdown;
189 static ng_rcvmsg_t ng_sscop_rcvmsg;
190 static ng_newhook_t ng_sscop_newhook;
191 static ng_disconnect_t ng_sscop_disconnect;
192 static ng_rcvdata_t ng_sscop_rcvlower;
193 static ng_rcvdata_t ng_sscop_rcvupper;
194 static ng_rcvdata_t ng_sscop_rcvmanage;
196 static int ng_sscop_mod_event(module_t, int, void *);
198 static struct ng_type ng_sscop_typestruct = {
199 .version = NG_ABI_VERSION,
200 .name = NG_SSCOP_NODE_TYPE,
201 .mod_event = ng_sscop_mod_event,
202 .constructor = ng_sscop_constructor,
203 .rcvmsg = ng_sscop_rcvmsg,
204 .shutdown = ng_sscop_shutdown,
205 .newhook = ng_sscop_newhook,
206 .rcvdata = ng_sscop_rcvlower,
207 .disconnect = ng_sscop_disconnect,
208 .cmdlist = ng_sscop_cmdlist,
210 NETGRAPH_INIT(sscop, &ng_sscop_typestruct);
212 static void sscop_send_manage(struct sscop *, void *, enum sscop_maasig,
213 struct SSCOP_MBUF_T *, u_int, u_int);
214 static void sscop_send_upper(struct sscop *, void *, enum sscop_aasig,
215 struct SSCOP_MBUF_T *, u_int);
216 static void sscop_send_lower(struct sscop *, void *,
217 struct SSCOP_MBUF_T *);
218 static void sscop_verbose(struct sscop *, void *, const char *, ...)
221 static const struct sscop_funcs sscop_funcs = {
229 sscop_verbose(struct sscop *sscop, void *arg, const char *fmt, ...)
234 printf("sscop(%p): ", sscop);
240 /************************************************************/
245 ng_sscop_constructor(node_p node)
249 p = malloc(sizeof(*p), M_NG_SSCOP, M_WAITOK | M_ZERO);
251 if ((p->sscop = sscop_create(node, &sscop_funcs)) == NULL) {
255 NG_NODE_SET_PRIVATE(node, p);
257 /* All data message received by the node are expected to change the
258 * node's state. Therefor we must ensure, that we have a writer lock. */
259 NG_NODE_FORCE_WRITER(node);
264 ng_sscop_shutdown(node_p node)
266 struct priv *priv = NG_NODE_PRIVATE(node);
268 sscop_destroy(priv->sscop);
270 free(priv, M_NG_SSCOP);
271 NG_NODE_SET_PRIVATE(node, NULL);
278 /************************************************************/
283 * Flow control message from upper layer.
284 * This is very experimental:
285 * If we get a message from the upper layer, that somebody has passed its
286 * high water mark, we stop updating the receive window.
287 * If we get a low watermark passed, then we raise the window up
289 * If we get a queue status and it indicates a current below the
290 * high watermark, we unstop window updates (if they are stopped) and
291 * raise the window to highwater - current.
294 flow_upper(node_p node, struct ng_mesg *msg)
296 struct ngm_queue_state *q;
297 struct priv *priv = NG_NODE_PRIVATE(node);
300 if (msg->header.arglen != sizeof(struct ngm_queue_state))
302 q = (struct ngm_queue_state *)msg->data;
304 switch (msg->header.cmd) {
306 case NGM_HIGH_WATER_PASSED:
308 VERBOSE(priv, SSCOP_DBG_FLOW, (priv->sscop, priv,
309 "flow control stopped"));
314 case NGM_LOW_WATER_PASSED:
315 window = sscop_window(priv->sscop, 0);
316 space = q->max_queuelen_packets - q->current;
317 if (space > window) {
318 VERBOSE(priv, SSCOP_DBG_FLOW, (priv->sscop, priv,
319 "flow control opened window by %u messages",
321 (void)sscop_window(priv->sscop, space - window);
326 case NGM_SYNC_QUEUE_STATE:
327 if (q->high_watermark <= q->current)
329 window = sscop_window(priv->sscop, 0);
331 space = q->max_queuelen_packets - q->current;
333 space = q->high_watermark - q->current;
334 if (space > window) {
335 VERBOSE(priv, SSCOP_DBG_FLOW, (priv->sscop, priv,
336 "flow control opened window by %u messages",
338 (void)sscop_window(priv->sscop, space - window);
350 flow_lower(node_p node, struct ng_mesg *msg)
352 struct priv *priv = NG_NODE_PRIVATE(node);
354 if (msg->header.arglen != sizeof(struct ngm_queue_state))
357 switch (msg->header.cmd) {
359 case NGM_HIGH_WATER_PASSED:
360 sscop_setbusy(priv->sscop, 1);
363 case NGM_LOW_WATER_PASSED:
364 sscop_setbusy(priv->sscop, 1);
374 * Produce a readable status description
377 text_status(node_p node, struct priv *priv, char *arg, u_int len)
381 sbuf_new(&sbuf, arg, len, 0);
384 sbuf_printf(&sbuf, "upper hook: %s connected to %s:%s\n",
385 NG_HOOK_NAME(priv->upper),
386 NG_NODE_NAME(NG_HOOK_NODE(NG_HOOK_PEER(priv->upper))),
387 NG_HOOK_NAME(NG_HOOK_PEER(priv->upper)));
389 sbuf_printf(&sbuf, "upper hook: <not connected>\n");
392 sbuf_printf(&sbuf, "lower hook: %s connected to %s:%s\n",
393 NG_HOOK_NAME(priv->lower),
394 NG_NODE_NAME(NG_HOOK_NODE(NG_HOOK_PEER(priv->lower))),
395 NG_HOOK_NAME(NG_HOOK_PEER(priv->lower)));
397 sbuf_printf(&sbuf, "lower hook: <not connected>\n");
400 sbuf_printf(&sbuf, "manage hook: %s connected to %s:%s\n",
401 NG_HOOK_NAME(priv->manage),
402 NG_NODE_NAME(NG_HOOK_NODE(NG_HOOK_PEER(priv->manage))),
403 NG_HOOK_NAME(NG_HOOK_PEER(priv->manage)));
405 sbuf_printf(&sbuf, "manage hook: <not connected>\n");
407 sbuf_printf(&sbuf, "sscop state: %s\n",
408 !priv->enabled ? "<disabled>" :
409 sscop_statename(sscop_getstate(priv->sscop)));
411 sbuf_printf(&sbuf, "input packets: %ju\n",
412 (uintmax_t)priv->stats.in_packets);
413 sbuf_printf(&sbuf, "input dropped: %ju\n",
414 (uintmax_t)priv->stats.in_dropped);
415 sbuf_printf(&sbuf, "output packets: %ju\n",
416 (uintmax_t)priv->stats.out_packets);
417 sbuf_printf(&sbuf, "output dropped: %ju\n",
418 (uintmax_t)priv->stats.out_dropped);
419 sbuf_printf(&sbuf, "aa signals: %ju\n",
420 (uintmax_t)priv->stats.aa_signals);
421 sbuf_printf(&sbuf, "aa dropped: %ju\n",
422 (uintmax_t)priv->stats.aa_dropped);
423 sbuf_printf(&sbuf, "maa signals: %ju\n",
424 (uintmax_t)priv->stats.maa_signals);
425 sbuf_printf(&sbuf, "maa dropped: %ju\n",
426 (uintmax_t)priv->stats.maa_dropped);
427 sbuf_printf(&sbuf, "errors: %ju\n",
428 (uintmax_t)priv->stats.errors);
429 sbuf_printf(&sbuf, "data delivered: %ju\n",
430 (uintmax_t)priv->stats.data_delivered);
431 sbuf_printf(&sbuf, "window: %u\n",
432 sscop_window(priv->sscop, 0));
435 return (sbuf_len(&sbuf));
440 * Control message received.
443 ng_sscop_rcvmsg(node_p node, item_p item, hook_p lasthook)
445 struct priv *priv = NG_NODE_PRIVATE(node);
446 struct ng_mesg *resp = NULL;
450 NGI_GET_MSG(item, msg);
452 switch (msg->header.typecookie) {
454 case NGM_GENERIC_COOKIE:
455 switch (msg->header.cmd) {
457 case NGM_TEXT_STATUS:
458 NG_MKRESPONSE(resp, msg, NG_TEXTRESPONSE, M_NOWAIT);
464 resp->header.arglen = text_status(node, priv,
465 (char *)resp->data, resp->header.arglen) + 1;
474 case NGM_FLOW_COOKIE:
475 if (priv->enabled && lasthook != NULL) {
476 if (lasthook == priv->upper)
477 error = flow_upper(node, msg);
478 else if (lasthook == priv->lower)
479 error = flow_lower(node, msg);
483 case NGM_SSCOP_COOKIE:
484 switch (msg->header.cmd) {
486 case NGM_SSCOP_GETPARAM:
488 struct sscop_param *p;
490 NG_MKRESPONSE(resp, msg, sizeof(*p), M_NOWAIT);
495 p = (struct sscop_param *)resp->data;
496 sscop_getparam(priv->sscop, p);
500 case NGM_SSCOP_SETPARAM:
502 struct ng_sscop_setparam *arg;
503 struct ng_sscop_setparam_resp *p;
505 if (msg->header.arglen != sizeof(*arg)) {
513 arg = (struct ng_sscop_setparam *)msg->data;
514 NG_MKRESPONSE(resp, msg, sizeof(*p), M_NOWAIT);
519 p = (struct ng_sscop_setparam_resp *)resp->data;
521 p->error = sscop_setparam(priv->sscop,
522 &arg->param, &p->mask);
526 case NGM_SSCOP_ENABLE:
527 if (msg->header.arglen != 0) {
537 memset(&priv->stats, 0, sizeof(priv->stats));
540 case NGM_SSCOP_DISABLE:
541 if (msg->header.arglen != 0) {
545 if (!priv->enabled) {
550 sscop_reset(priv->sscop);
553 case NGM_SSCOP_GETDEBUG:
554 if (msg->header.arglen != 0) {
558 NG_MKRESPONSE(resp, msg, sizeof(u_int32_t), M_NOWAIT);
563 *(u_int32_t *)resp->data = sscop_getdebug(priv->sscop);
566 case NGM_SSCOP_SETDEBUG:
567 if (msg->header.arglen != sizeof(u_int32_t)) {
571 sscop_setdebug(priv->sscop, *(u_int32_t *)msg->data);
574 case NGM_SSCOP_GETSTATE:
575 if (msg->header.arglen != 0) {
579 NG_MKRESPONSE(resp, msg, sizeof(u_int32_t), M_NOWAIT);
584 *(u_int32_t *)resp->data =
585 priv->enabled ? (sscop_getstate(priv->sscop) + 1)
600 NG_RESPOND_MSG(error, node, item, resp);
606 /************************************************************/
611 ng_sscop_newhook(node_p node, hook_p hook, const char *name)
613 struct priv *priv = NG_NODE_PRIVATE(node);
615 if(strcmp(name, "upper") == 0) {
617 NG_HOOK_SET_RCVDATA(hook, ng_sscop_rcvupper);
618 } else if(strcmp(name, "lower") == 0) {
620 } else if(strcmp(name, "manage") == 0) {
622 NG_HOOK_SET_RCVDATA(hook, ng_sscop_rcvmanage);
629 ng_sscop_disconnect(hook_p hook)
631 node_p node = NG_HOOK_NODE(hook);
632 struct priv *priv = NG_NODE_PRIVATE(node);
634 if(hook == priv->upper)
636 else if(hook == priv->lower)
638 else if(hook == priv->manage)
641 if(NG_NODE_NUMHOOKS(node) == 0) {
642 if(NG_NODE_IS_VALID(node))
643 ng_rmnode_self(node);
646 * Imply a release request, if the upper layer is
649 if(priv->upper == NULL && priv->lower != NULL &&
651 sscop_getstate(priv->sscop) != SSCOP_IDLE) {
652 sscop_aasig(priv->sscop, SSCOP_RELEASE_request,
659 /************************************************************/
664 ng_sscop_rcvlower(hook_p hook, item_p item)
666 struct priv *priv = NG_NODE_PRIVATE(NG_HOOK_NODE(hook));
669 if (!priv->enabled) {
675 * If we are disconnected at the upper layer and in the IDLE
676 * state, drop any incoming packet.
678 if (priv->upper != NULL || sscop_getstate(priv->sscop) != SSCOP_IDLE) {
680 priv->stats.in_packets++;
681 sscop_input(priv->sscop, m);
683 priv->stats.in_dropped++;
691 sscop_send_lower(struct sscop *sscop, void *p, struct mbuf *m)
693 node_p node = (node_p)p;
694 struct priv *priv = NG_NODE_PRIVATE(node);
697 if (priv->lower == NULL) {
699 priv->stats.out_dropped++;
703 priv->stats.out_packets++;
704 NG_SEND_DATA_ONLY(error, priv->lower, m);
708 ng_sscop_rcvupper(hook_p hook, item_p item)
710 struct priv *priv = NG_NODE_PRIVATE(NG_HOOK_NODE(hook));
714 if (!priv->enabled) {
720 * If the lower layer is not connected allow to proceed.
721 * The lower layer sending function will drop outgoing frames,
722 * and the sscop will timeout any establish requests.
727 if (!(m->m_flags & M_PKTHDR)) {
728 printf("no pkthdr\n");
732 if (m->m_len < (int)sizeof(a) && (m = m_pullup(m, sizeof(a))) == NULL)
734 bcopy((caddr_t)mtod(m, struct sscop_arg *), &a, sizeof(a));
737 return (sscop_aasig(priv->sscop, a.sig, m, a.arg));
741 sscop_send_upper(struct sscop *sscop, void *p, enum sscop_aasig sig,
742 struct SSCOP_MBUF_T *m, u_int arg)
744 node_p node = (node_p)p;
745 struct priv *priv = NG_NODE_PRIVATE(node);
749 if (sig == SSCOP_DATA_indication && priv->flow)
750 sscop_window(priv->sscop, 1);
752 if (priv->upper == NULL) {
755 priv->stats.aa_dropped++;
759 priv->stats.aa_signals++;
760 if (sig == SSCOP_DATA_indication)
761 priv->stats.data_delivered++;
764 MGETHDR(m, M_NOWAIT, MT_DATA);
767 m->m_len = sizeof(struct sscop_arg);
768 m->m_pkthdr.len = m->m_len;
770 M_PREPEND(m, sizeof(struct sscop_arg), M_NOWAIT);
774 a = mtod(m, struct sscop_arg *);
778 NG_SEND_DATA_ONLY(error, priv->upper, m);
782 ng_sscop_rcvmanage(hook_p hook, item_p item)
784 struct priv *priv = NG_NODE_PRIVATE(NG_HOOK_NODE(hook));
788 if (!priv->enabled) {
796 if (m->m_len < (int)sizeof(a) && (m = m_pullup(m, sizeof(a))) == NULL)
798 bcopy((caddr_t)mtod(m, struct sscop_arg *), &a, sizeof(a));
801 return (sscop_maasig(priv->sscop, a.sig, m));
805 sscop_send_manage(struct sscop *sscop, void *p, enum sscop_maasig sig,
806 struct SSCOP_MBUF_T *m, u_int err, u_int cnt)
808 node_p node = (node_p)p;
809 struct priv *priv = NG_NODE_PRIVATE(node);
811 struct sscop_merr *e;
812 struct sscop_marg *a;
814 if (priv->manage == NULL) {
817 priv->stats.maa_dropped++;
821 if (sig == SSCOP_MERROR_indication) {
822 MGETHDR(m, M_NOWAIT, MT_DATA);
825 m->m_len = sizeof(*e);
826 m->m_pkthdr.len = m->m_len;
827 e = mtod(m, struct sscop_merr *);
831 priv->stats.errors++;
832 } else if (m == NULL) {
833 MGETHDR(m, M_NOWAIT, MT_DATA);
836 m->m_len = sizeof(*a);
837 m->m_pkthdr.len = m->m_len;
838 a = mtod(m, struct sscop_marg *);
840 priv->stats.maa_signals++;
842 M_PREPEND(m, sizeof(*a), M_NOWAIT);
845 a = mtod(m, struct sscop_marg *);
847 priv->stats.maa_signals++;
850 NG_SEND_DATA_ONLY(error, priv->manage, m);
853 /************************************************************/
859 * Loading and unloading of node type
862 ng_sscop_mod_event(module_t mod, int event, void *data)