Add new files for HARP3

Host ATM Research Platform (HARP), Network Computing Services, Inc.
This software was developed with the support of the Defense Advanced
Research Projects Agency (DARPA).

1 files changed, 317 insertions, 0 deletions

diff --git a/sys/netatm/uni/sscf_uni.c b/sys/netatm/uni/sscf_uni.c
new file mode 100644
index 0000000..b5fd7fb
--- /dev/null
+++ b/sys/netatm/uni/sscf_uni.c
@@ -0,0 +1,317 @@
+/*
+ *
+ * ===================================
+ * HARP  |  Host ATM Research Platform
+ * ===================================
+ *
+ *
+ * This Host ATM Research Platform ("HARP") file (the "Software") is
+ * made available by Network Computing Services, Inc. ("NetworkCS")
+ * "AS IS".  NetworkCS does not provide maintenance, improvements or
+ * support of any kind.
+ *
+ * NETWORKCS MAKES NO WARRANTIES OR REPRESENTATIONS, EXPRESS OR IMPLIED,
+ * INCLUDING, BUT NOT LIMITED TO, IMPLIED WARRANTIES OF MERCHANTABILITY
+ * AND FITNESS FOR A PARTICULAR PURPOSE, AS TO ANY ELEMENT OF THE
+ * SOFTWARE OR ANY SUPPORT PROVIDED IN CONNECTION WITH THIS SOFTWARE.
+ * In no event shall NetworkCS be responsible for any damages, including
+ * but not limited to consequential damages, arising from or relating to
+ * any use of the Software or related support.
+ *
+ * Copyright 1994-1998 Network Computing Services, Inc.
+ *
+ * Copies of this Software may be made, however, the above copyright
+ * notice must be reproduced on all copies.
+ *
+ *	@(#) $Id: sscf_uni.c,v 1.6 1998/03/24 21:10:38 mks Exp $
+ *
+ */
+
+/*
+ * ATM Forum UNI Support
+ * ---------------------
+ *
+ * Signalling AAL SSCF at the UNI
+ *
+ */
+
+#ifndef lint
+static char *RCSid = "@(#) $Id: sscf_uni.c,v 1.6 1998/03/24 21:10:38 mks Exp $";
+#endif
+
+#include <netatm/kern_include.h>
+
+#include <netatm/uni/uni.h>
+#include <netatm/uni/sscop.h>
+#include <netatm/uni/sscf_uni.h>
+#include <netatm/uni/sscf_uni_var.h>
+
+
+/*
+ * Global variables
+ */
+int	sscf_uni_vccnt = 0;
+
+/*
+ * Local functions
+ */
+static int	sscf_uni_inst __P((struct stack_defn **, Atm_connvc *));
+
+/*
+ * Local variables
+ */
+static struct sp_info	sscf_uni_pool = {
+	"sscf uni pool",		/* si_name */
+	sizeof(struct univcc),		/* si_blksiz */
+	5,				/* si_blkcnt */
+	100				/* si_maxallow */
+};
+
+static struct stack_defn	sscf_uni_service = {
+	NULL,
+	SAP_SSCF_UNI,
+	0,
+	sscf_uni_inst,
+	sscf_uni_lower,
+	sscf_uni_upper,
+	0
+};
+
+static struct t_atm_cause	sscf_uni_cause = {
+	T_ATM_ITU_CODING,
+	T_ATM_LOC_USER,
+	T_ATM_CAUSE_TEMPORARY_FAILURE,
+	{0, 0, 0, 0}
+};
+
+
+/*
+ * Initialize SSCF UNI processing
+ * 
+ * This will be called during module loading.  We will register our stack
+ * service and wait for someone to talk to us.
+ *
+ * Arguments:
+ *	none
+ *
+ * Returns:
+ *	0 	initialization was successful 
+ *	errno	initialization failed - reason indicated
+ *
+ */
+int
+sscf_uni_start()
+{
+	int	err = 0;
+
+	/*
+	 * Register stack service
+	 */
+	if (err = atm_stack_register(&sscf_uni_service))
+		goto done;
+
+done:
+	return (err);
+}
+
+
+/*
+ * Terminate SSCF UNI processing 
+ * 
+ * This will be called just prior to unloading the module from memory.  All 
+ * signalling instances should have been terminated by now, so we just free
+ * up all of our resources.
+ *
+ * Called at splnet.
+ *
+ * Arguments:
+ *	none
+ *
+ * Returns:
+ *	0 	termination was successful 
+ *	errno	termination failed - reason indicated
+ *
+ */
+int
+sscf_uni_stop()
+{
+	/*
+	 * Any connections still exist??
+	 */
+	if (sscf_uni_vccnt) {
+
+		/*
+		 * Yes, can't stop yet
+		 */
+		return (EBUSY);
+	}
+
+	/*
+	 * Deregister the stack service
+	 */
+	(void) atm_stack_deregister(&sscf_uni_service);
+
+	/*
+	 * Free our storage pools
+	 */
+	atm_release_pool(&sscf_uni_pool);
+
+	return (0);
+}
+
+
+/*
+ * SSCF_UNI Stack Instantiation 
+ * 
+ * Called at splnet.
+ *
+ * Arguments:
+ *	ssp	pointer to array of stack definition pointers for connection
+ *		ssp[0] points to upper layer's stack service definition
+ *		ssp[1] points to this layer's stack service definition
+ *		ssp[2] points to lower layer's stack service definition
+ *	cvp	pointer to connection vcc for this stack
+ *
+ * Returns:
+ *	0 	instantiation successful
+ *	errno	instantiation failed - reason indicated
+ *
+ */
+static int
+sscf_uni_inst(ssp, cvp)
+	struct stack_defn	**ssp;
+	Atm_connvc		*cvp;
+{
+	struct stack_defn	*sdp_up = ssp[0],
+				*sdp_me = ssp[1],
+				*sdp_low = ssp[2];
+	struct univcc	*uvp;
+	int		err;
+
+	ATM_DEBUG2("sscf_uni_inst: ssp=0x%x, cvp=0x%x\n", ssp, cvp);
+
+	/*
+	 * Validate lower SAP
+	 */
+	if (sdp_low->sd_sap != SAP_SSCOP)
+		return (EINVAL);
+
+	/*
+	 * Allocate our control block
+	 */
+	uvp = (struct univcc *)atm_allocate(&sscf_uni_pool);
+	if (uvp == NULL)
+		return (ENOMEM);
+
+	uvp->uv_ustate = UVU_INST;
+	uvp->uv_lstate = UVL_INST;
+	uvp->uv_connvc = cvp;
+	uvp->uv_toku = sdp_up->sd_toku;
+	uvp->uv_upper = sdp_up->sd_upper;
+	sscf_uni_vccnt++;
+
+	/*
+	 * Store my token into service definition
+	 */
+	sdp_me->sd_toku = uvp;
+
+	/*
+	 * Update and save input buffer headroom
+	 */
+	HEADIN(cvp, 0, 0);
+	/* uvp->uv_headin = cvp->cvc_attr.headin; */
+
+	/*
+	 * Pass instantiation down the stack
+	 */
+	err = sdp_low->sd_inst(ssp + 1, cvp);
+	if (err) {
+		/*
+		 * Lower layer instantiation failed, free our resources
+		 */
+		atm_free((caddr_t)uvp);
+		sscf_uni_vccnt--;
+		return (err);
+	}
+
+	/*
+	 * Save and update output buffer headroom
+	 */
+	/* uvp->uv_headout = cvp->cvc_attr.headout; */
+	HEADOUT(cvp, 0, 0);
+
+	/*
+	 * Save lower layer's interface info
+	 */
+	uvp->uv_lower = sdp_low->sd_lower;
+	uvp->uv_tokl = sdp_low->sd_toku;
+
+	return (0);
+}
+
+
+/*
+ * Abort an SSCF_UNI connection
+ * 
+ * Called when an unrecoverable or "should never happen" error occurs.
+ * We just log a message and request the signalling manager to abort the
+ * connection.
+ *
+ * Arguments:
+ *	uvp	pointer to univcc control block
+ *	msg	pointer to error message
+ *
+ * Returns:
+ *	none
+ *
+ */
+void
+sscf_uni_abort(uvp, msg)
+	struct univcc	*uvp;
+	char		*msg;
+{
+	/*
+	 * Log error message
+	 */
+	log(LOG_ERR, msg);
+
+	/*
+	 * Set termination states
+	 */
+	uvp->uv_ustate = UVU_TERM;
+	uvp->uv_lstate = UVL_TERM;
+
+	/*
+	 * Tell Connection Manager to abort this connection
+	 */
+	(void) atm_cm_abort(uvp->uv_connvc, &sscf_uni_cause);
+}
+
+
+/*
+ * Print an SSCF PDU
+ * 
+ * Arguments:
+ *	uvp	pointer to univcc control block
+ *	m	pointer to pdu buffer chain
+ *	msg	pointer to message string
+ *
+ * Returns:
+ *	none
+ *
+ */
+void
+sscf_uni_pdu_print(uvp, m, msg)
+	struct univcc	*uvp;
+	KBuffer		*m;
+	char		*msg;
+{
+	char		buf[128];
+	struct vccb	*vcp;
+
+	vcp = uvp->uv_connvc->cvc_vcc;
+	sprintf(buf, "sscf_uni %s: vcc=(%d,%d)\n",
+			msg, vcp->vc_vpi, vcp->vc_vci);
+	atm_pdu_print(m, buf);
+}
+