--- libaitrpc/src/aitrpc.c	2011/05/02 23:12:08	1.2
+++ libaitrpc/src/aitrpc.c	2011/11/03 15:32:21	1.4
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@openbsd-bg.org>
 *
 * $Author: misho $
-* $Id: aitrpc.c,v 1.2 2011/05/02 23:12:08 misho Exp $
+* $Id: aitrpc.c,v 1.4 2011/11/03 15:32:21 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -50,8 +50,6 @@ SUCH DAMAGE.
 
 // ------------------------------------------------
 
-int rpc_Kill, blob_Kill;
-
 int rpc_Errno;
 char rpc_Error[STRSIZ];
 
@@ -86,3 +84,45 @@ rpc_SetErr(int eno, char *estr, ...)
 
 // ------------------------------------------------------------
 
+/*
+ * rpc_chkPktSession() Check session in RPC packet
+ * @p = packet session
+ * @s = active session
+ * return: -1 error or 0 ok
+ */
+inline int
+rpc_chkPktSession(rpc_sess_t *p, rpc_sess_t *s)
+{
+	assert(p && s);
+	if (!p || !s)
+		return -1;
+
+	if (p->sess_version != s->sess_version)
+		return 1;
+	if (ntohl(p->sess_program) != s->sess_program)
+		return 2;
+	if (ntohl(p->sess_process) != s->sess_process)
+		return 3;
+
+	return 0;
+}
+
+/*
+ * rpc_addPktSession() Add session into RPC packet
+ * @p = packet session
+ * @s = active session
+ * return: -1 error or 0 ok
+ */
+inline int
+rpc_addPktSession(rpc_sess_t *p, rpc_sess_t *s)
+{
+	assert(p && s);
+	if (!p || !s)
+		return -1;
+
+	p->sess_version = s->sess_version;
+	p->sess_program = htonl(s->sess_program);
+	p->sess_process = htonl(s->sess_process);
+
+	return 0;
+}