--- libelwix/src/pack.c	2014/02/11 13:25:09	1.6.2.1
+++ libelwix/src/pack.c	2014/02/13 14:58:55	1.6.2.2
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@elwix.org>
 *
 * $Author: misho $
-* $Id: pack.c,v 1.6.2.1 2014/02/11 13:25:09 misho Exp $
+* $Id: pack.c,v 1.6.2.2 2014/02/13 14:58:55 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -503,4 +503,28 @@ rpack_ruint64(rpack_t * __restrict rp, uint64_t * __re
 
 	rp->r_next += sizeof(uint64_t);
 	return u;
+}
+
+/*
+ * rpack_next() - Get and set current position
+ *
+ * @rp = raw packet
+ * @after_len = !=0 move current position after length
+ * return: NULL error or current position
+ */
+uint8_t *
+rpack_next(rpack_t * __restrict rp, size_t after_len)
+{
+	uint8_t *next = NULL;
+
+	if (!RPACK_SANITY(rp))
+		return NULL;
+	/* No space left */
+	if (after_len + rp->r_next - rp->r_buf > rp->r_len)
+		return NULL;
+
+	next = rp->r_next;
+
+	rp->r_next += after_len;
+	return next;
 }