--- libaitrpc/src/srv.c	2013/07/16 13:04:20	1.17
+++ libaitrpc/src/srv.c	2013/08/22 11:55:45	1.17.6.1
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@openbsd-bg.org>
 *
 * $Author: misho $
-* $Id: srv.c,v 1.17 2013/07/16 13:04:20 misho Exp $
+* $Id: srv.c,v 1.17.6.1 2013/08/22 11:55:45 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -191,7 +191,7 @@ txPacket(sched_task_t *task)
 		}
 	}
 
-	rpc->call_len = htons(wlen);
+	rpc->call_len = htonl(wlen);
 
 #if 0
 	/* calculate CRC */
@@ -303,7 +303,7 @@ rxPacket(sched_task_t *task)
 		} else
 			rpc = (struct tagRPCCall*) (buf + off);
 
-		len = ntohs(rpc->call_len);
+		len = ntohl(rpc->call_len);
 		rlen -= len;
 
 		/* check RPC packet lengths */
@@ -422,7 +422,7 @@ txUDPPacket(sched_task_t *task)
 		}
 	}
 
-	rpc->call_len = htons(wlen);
+	rpc->call_len = htonl(wlen);
 
 	/* calculate CRC */
 	rpc->call_crc ^= rpc->call_crc;
@@ -480,7 +480,7 @@ rxUDPPacket(sched_task_t *task)
 		} else
 			rpc = (struct tagRPCCall*) (AIT_GET_BUF(&c->cli_buf) + off);
 
-		len = ntohs(rpc->call_len);
+		len = ntohl(rpc->call_len);
 		rlen -= len;
 
 		/* check RPC packet lengths */