--- libelwix/src/pack.c	2014/01/29 14:16:54	1.3
+++ libelwix/src/pack.c	2014/02/10 22:50:44	1.4
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@elwix.org>
 *
 * $Author: misho $
-* $Id: pack.c,v 1.3 2014/01/29 14:16:54 misho Exp $
+* $Id: pack.c,v 1.4 2014/02/10 22:50:44 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -154,10 +154,11 @@ rpack_uint8(rpack_t * __restrict rp, uint8_t * __restr
  *
  * @rp = raw buffer
  * @n = set value if !=NULL
+ * @be = extract in big-endian
  * return: -1 error or get value
  */
 uint16_t
-rpack_uint16(rpack_t * __restrict rp, uint16_t * __restrict n)
+rpack_uint16(rpack_t * __restrict rp, uint16_t * __restrict n, int be)
 {
 	uint16_t u;
 	uint8_t *next;
@@ -168,7 +169,7 @@ rpack_uint16(rpack_t * __restrict rp, uint16_t * __res
 	if (!(next = rpack_align_and_reserve(rp, sizeof(uint16_t))))
 		return (uint16_t) -1;
 
-	u = EXTRACT_LE_16(next);
+	u = be ? EXTRACT_BE_16(next) : EXTRACT_LE_16(next);
 	if (n)
 		RPACK_SET_16(next, n);
 
@@ -181,10 +182,11 @@ rpack_uint16(rpack_t * __restrict rp, uint16_t * __res
  *
  * @rp = raw buffer
  * @n = set value if !=NULL
+ * @be = extract in big-endian
  * return: -1 error or get value
  */
 uint32_t
-rpack_uint24(rpack_t * __restrict rp, uint32_t * __restrict n)
+rpack_uint24(rpack_t * __restrict rp, uint32_t * __restrict n, int be)
 {
 	uint32_t u;
 	uint8_t *next;
@@ -195,7 +197,7 @@ rpack_uint24(rpack_t * __restrict rp, uint32_t * __res
 	if (!(next = rpack_align_and_reserve(rp, sizeof(uint32_t))))
 		return (uint32_t) -1;
 
-	u = EXTRACT_LE_24(next);
+	u = be ? EXTRACT_BE_24(next) : EXTRACT_LE_24(next);
 	if (n)
 		RPACK_SET_24(next, n);
 
@@ -208,10 +210,11 @@ rpack_uint24(rpack_t * __restrict rp, uint32_t * __res
  *
  * @rp = raw buffer
  * @n = set value if !=NULL
+ * @be = extract in big-endian
  * return: -1 error or get value
  */
 uint32_t
-rpack_uint32(rpack_t * __restrict rp, uint32_t * __restrict n)
+rpack_uint32(rpack_t * __restrict rp, uint32_t * __restrict n, int be)
 {
 	uint32_t u;
 	uint8_t *next;
@@ -222,7 +225,7 @@ rpack_uint32(rpack_t * __restrict rp, uint32_t * __res
 	if (!(next = rpack_align_and_reserve(rp, sizeof(uint32_t))))
 		return (uint32_t) -1;
 
-	u = EXTRACT_LE_32(next);
+	u = be ? EXTRACT_BE_32(next) : EXTRACT_LE_32(next);
 	if (n)
 		RPACK_SET_32(next, n);
 
@@ -235,10 +238,11 @@ rpack_uint32(rpack_t * __restrict rp, uint32_t * __res
  *
  * @rp = raw buffer
  * @n = set value if !=NULL
+ * @be = extract in big-endian
  * return: -1 error or get value
  */
 uint64_t
-rpack_uint64(rpack_t * __restrict rp, uint64_t * __restrict n)
+rpack_uint64(rpack_t * __restrict rp, uint64_t * __restrict n, int be)
 {
 	uint64_t u;
 	uint8_t *next;
@@ -249,7 +253,7 @@ rpack_uint64(rpack_t * __restrict rp, uint64_t * __res
 	if (!(next = rpack_align_and_reserve(rp, sizeof(uint64_t))))
 		return (uint64_t) -1;
 
-	u = EXTRACT_LE_64(next);
+	u = be ? EXTRACT_BE_64(next) : EXTRACT_LE_64(next);
 	if (n)
 		RPACK_SET_64(next, n);