--- libaitio/inc/aitio.h	2012/07/31 13:04:39	1.22.2.10
+++ libaitio/inc/aitio.h	2012/07/31 13:37:51	1.22.2.11
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@elwix.org>
 *
 * $Author: misho $
-* $Id: aitio.h,v 1.22.2.10 2012/07/31 13:04:39 misho Exp $
+* $Id: aitio.h,v 1.22.2.11 2012/07/31 13:37:51 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -253,6 +253,14 @@ typedef struct {
 						if (__p) { \
 							__val->val.string = __p; \
 							AIT_LEN(__val) = strlen((_v)) + 1; \
+							strlcpy((char*) __val->val.string, (_v), \
+									AIT_LEN(__val)); \
+						} } while (0)
+#define AIT_SET_STRLCPY(_vl, _v, _len)	do { ait_val_t *__val = (_vl); assert(__val); \
+						assert(AIT_TYPE(__val) == string); \
+						void *__p = io_realloc(__val->val.string, _len); \
+						if (__p) { \
+							__val->val.string = __p; AIT_LEN(__val) = _len; \
 							strlcpy((char*) __val->val.string, (_v), \
 									AIT_LEN(__val)); \
 						} } while (0)