--- libaitio/src/Attic/vars.c	2012/08/29 13:51:30	1.13
+++ libaitio/src/Attic/vars.c	2012/09/10 12:03:56	1.13.2.2
@@ -3,7 +3,7 @@
 *  by Michael Pounov <misho@elwix.org>
 *
 * $Author: misho $
-* $Id: vars.c,v 1.13 2012/08/29 13:51:30 misho Exp $
+* $Id: vars.c,v 1.13.2.2 2012/09/10 12:03:56 misho Exp $
 *
 **************************************************************************
 The ELWIX and AITNET software is distributed under the following
@@ -746,3 +746,73 @@ io_findKeyHash(array_t * __restrict vars, const char *
 	return io_findKeyVars(vars, k);
 }
 
+/*
+ * io_sprintfVar() - Builtin string variable from formatted input
+ *
+ * @v = variable
+ * @fmt = format string
+ * @... = argument(s)
+ * return: -1 error or >0 copied bytes to variable
+ */
+int
+io_sprintfVar(ait_val_t * __restrict v, const char *fmt, ...)
+{
+	int ret = 0;
+	va_list lst;
+	char *str = NULL;
+
+	if (!v || !fmt)
+		return -1;
+
+	va_start(lst, fmt);
+	ret = vasprintf(&str, fmt, lst);
+	va_end(lst);
+
+	if (str && ret > -1) {
+		AIT_FREE_VAL(v);
+		AIT_SET_STR(v, str);
+	} else
+		LOGERR;
+
+	if (str)
+		free(str);
+	return ret;
+}
+
+/*
+ * io_setlikeVar() - Set variable like ...
+ *
+ * @v = variable
+ * @t = type of data
+ * @l = length of data
+ * @... = data
+ * return: -1 error or 0 ok
+ */
+inline int
+io_setlikeVar(ait_val_t * __restrict v, ait_type_t t, u_int l, ...)
+{
+	va_list lst;
+
+	if (!v)
+		return -1;
+
+	AIT_FREE_VAL(v);
+	AIT_INIT_VAL2(v, t);
+	AIT_LEN(v) = l;
+	AIT_IN(v) = 1;
+
+	va_start(lst, l);
+	switch (AIT_TYPE(v)) {
+		case ptr:
+		case buffer:
+		case string:
+			AIT_ADDR(v) = va_arg(lst, void*);
+			break;
+		default:
+			AIT_RAW(v) = va_arg(lst, uint64_t);
+			break;
+	}
+	va_end(lst);
+
+	return 0;
+}