aboutsummaryrefslogtreecommitdiff
path: root/sys/netccitt/pk_timer.c
diff options
context:
space:
mode:
Diffstat (limited to 'sys/netccitt/pk_timer.c')
-rw-r--r--sys/netccitt/pk_timer.c118
1 files changed, 118 insertions, 0 deletions
diff --git a/sys/netccitt/pk_timer.c b/sys/netccitt/pk_timer.c
new file mode 100644
index 000000000000..34a3a73407d7
--- /dev/null
+++ b/sys/netccitt/pk_timer.c
@@ -0,0 +1,118 @@
+/*
+ * Copyright (c) University of British Columbia, 1984
+ * Copyright (c) 1990 The Regents of the University of California.
+ * All rights reserved.
+ *
+ * This code is derived from software contributed to Berkeley by
+ * the Laboratory for Computation Vision and the Computer Science Department
+ * of the University of British Columbia.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in the
+ * documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ * must display the following acknowledgement:
+ * This product includes software developed by the University of
+ * California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ * may be used to endorse or promote products derived from this software
+ * without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ *
+ * from: @(#)pk_timer.c 7.5 (Berkeley) 5/29/91
+ * $Id: pk_timer.c,v 1.2 1993/10/16 19:46:55 rgrimes Exp $
+ */
+
+#include "param.h"
+#include "systm.h"
+#include "mbuf.h"
+#include "socket.h"
+#include "protosw.h"
+#include "socketvar.h"
+#include "errno.h"
+
+#include "../net/if.h"
+
+#include "x25.h"
+#include "pk.h"
+#include "pk_var.h"
+
+/*
+ * Various timer values. They can be adjusted
+ * by patching the binary with adb if necessary.
+ */
+int pk_t20 = 18 * PR_SLOWHZ; /* restart timer */
+int pk_t21 = 20 * PR_SLOWHZ; /* call timer */
+/* XXX pk_t22 is never used */
+int pk_t22 = 18 * PR_SLOWHZ; /* reset timer */
+int pk_t23 = 18 * PR_SLOWHZ; /* clear timer */
+
+pk_timer ()
+{
+ register struct pkcb *pkp;
+ register struct pklcd *lcp, **pp;
+ register int lcns_jammed, cant_restart;
+
+ for (pkp = pkcbhead; pkp; pkp = pkp->pk_next) {
+ switch (pkp -> pk_state) {
+ case DTE_SENT_RESTART:
+ lcp = pkp -> pk_chan[0];
+ /*
+ * If restart failures are common, a link level
+ * reset should be initiated here.
+ */
+ if (lcp -> lcd_timer && --lcp -> lcd_timer == 0)
+ pk_message (0, pkp -> pk_xcp,
+ "packet level restart failed");
+ break;
+
+ case DTE_READY:
+ lcns_jammed = cant_restart = 0;
+ for (pp = &pkp -> pk_chan[1]; pp <= &pkp -> pk_chan[pkp -> pk_maxlcn]; pp++) {
+ if ((lcp = *pp) == 0)
+ continue;
+ switch (lcp -> lcd_state) {
+ case SENT_CALL:
+ if (--lcp -> lcd_timer == 0) {
+ if (lcp -> lcd_so)
+ lcp -> lcd_so -> so_error = ETIMEDOUT;
+ pk_clear (lcp, 49, 1);
+ }
+ break;
+
+ case SENT_CLEAR:
+ if (lcp -> lcd_retry >= 3)
+ lcns_jammed++;
+ else
+ if (--lcp -> lcd_timer == 0)
+ pk_clear (lcp, 50, 1);
+ break;
+
+ case DATA_TRANSFER: /* lcn active */
+ cant_restart++;
+ break;
+ }
+ }
+ if (lcns_jammed > pkp -> pk_maxlcn / 2 && cant_restart == 0) {
+ pk_message (0, pkp -> pk_xcp, "%d lcns jammed: attempting restart", lcns_jammed);
+ pk_restart (pkp, 0);
+ }
+ }
+ }
+}