aboutsummaryrefslogtreecommitdiff
path: root/tests/pack.at
diff options
context:
space:
mode:
Diffstat (limited to 'tests/pack.at')
-rw-r--r--tests/pack.at47
1 files changed, 47 insertions, 0 deletions
diff --git a/tests/pack.at b/tests/pack.at
new file mode 100644
index 0000000..0baf8e6
--- /dev/null
+++ b/tests/pack.at
@@ -0,0 +1,47 @@
+# This file is part of vmod-binlog testsuite -*- autotest -*-
+# Copyright (C) 2013 Sergey Poznyakoff
+#
+# Vmod-binlog is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3, or (at your option)
+# any later version.
+#
+# Vmod-binlog is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with vmod-binlog. If not, see <http://www.gnu.org/licenses/>.
+
+m4_dnl TESTPACK(conv, args [, out])
+m4_define([TESTPACK],
+[AT_SETUP($1)
+AT_KEYWORDS([pack $1])
+AT_CHECK([binpack -- $1 $2 | binpack -d -- $1 | sed 's/ /_/g'],[0],
+[m4_if([$3],,[m4_bpatsubst([$2],[ ],[_])
+],[$3
+])])
+AT_CLEANUP])
+
+AT_BANNER(Pack conversions)
+
+TESTPACK(Z20, text, text_______________)
+TESTPACK(c, A)
+TESTPACK(s, 115)
+TESTPACK(S, 115)
+TESTPACK(l, 137)
+TESTPACK(L, 137)
+TESTPACK(q, 137)
+TESTPACK(Q, 137)
+TESTPACK(i, 137)
+TESTPACK(i, -137)
+TESTPACK(I, 137)
+TESTPACK(n, 143)
+TESTPACK(N, 2130706433)
+TESTPACK(v, 143)
+TESTPACK(V, 2130706433)
+#TESTPACK(f, 1.456)
+#TESTPACK(d, 1.456)
+TESTPACK(L2, [24 67], 24_67)
+TESTPACK(lZ5l2, [137 text -568 1025])

Return to:

Send suggestions and report system problems to the System administrator.