X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/tripe/blobdiff_plain/52c03a2aa0b5c3461055ca0dcf38e29f2ca88f35..13a55605839046f6f42910de713f4a9b6c44dfd4:/servutil.c

diff --git a/servutil.c b/servutil.c
index c3465e79..92a5f775 100644
--- a/servutil.c
+++ b/servutil.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: servutil.c,v 1.4 2004/04/03 12:35:13 mdw Exp $
+ * $Id$
  *
  * Various handy server-only utilities
  *
@@ -26,24 +26,6 @@
  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  */
 
-/*----- Revision history --------------------------------------------------* 
- *
- * $Log: servutil.c,v $
- * Revision 1.4  2004/04/03 12:35:13  mdw
- * Support elliptic curve key exchange.
- *
- * Revision 1.3  2001/06/19 22:08:11  mdw
- * Use magic number for packet size.
- *
- * Revision 1.2  2001/02/16 21:41:06  mdw
- * Use new spare buffer for building MP textual representations.  Add a
- * function for making human-readable time strings.
- *
- * Revision 1.1  2001/02/03 20:26:37  mdw
- * Initial checkin.
- *
- */
-
 /*----- Header files ------------------------------------------------------*/
 
 #include "tripe.h"
@@ -109,4 +91,53 @@ const char *timestr(time_t t)
   return ((const char *)buf_t);
 }
 
+/* --- @seq_reset@ --- *
+ *
+ * Arguments:	@seqwin *s@ = sequence-checking window
+ *
+ * Returns:	---
+ *
+ * Use:		Resets a sequence number window.
+ */
+
+void seq_reset(seqwin *s) { s->seq = 0; s->win = 0; }
+
+/* --- @seq_check@ --- *
+ *
+ * Arguments:	@seqwin *s@ = sequence-checking window
+ *		@uint32 q@ = sequence number to check
+ *		@const char *service@ = service to report message from
+ *
+ * Returns:	Zero on success, nonzero if the sequence number was bad.
+ *
+ * Use:		Checks a sequence number against the window, updating things
+ *		as necessary.
+ */
+
+int seq_check(seqwin *s, uint32 q, const char *service)
+{
+  uint32 qbit;
+  uint32 n;
+
+  if (q < s->seq) {
+    a_warn(service, "replay", "old-sequence", A_END);
+    return (-1);
+  }
+  if (q >= s->seq + SEQ_WINSZ) {
+    n = q - (s->seq + SEQ_WINSZ - 1);
+    if (n < SEQ_WINSZ)
+      s->win >>= n;
+    else
+      s->win = 0;
+    s->seq += n;
+  }
+  qbit = 1 << (q - s->seq);
+  if (s->win & qbit) {
+    a_warn(service, "replay", "duplicated-sequence", A_END);
+    return (-1);
+  }
+  s->win |= qbit;
+  return (0);
+}
+
 /*----- That's all, folks -------------------------------------------------*/