X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=tests%2Fovsdb-server.at;h=a1738eaa02bccc46f7678231cdabbdec23d49f9c;hb=734500471524159650e7ded2ebff2536391ffd53;hp=98aeb4a84b7a46aa4928516ec61060ce3c8be412;hpb=b12e3c41afaeb9faed1e3562954ec78fd595677d;p=sliver-openvswitch.git diff --git a/tests/ovsdb-server.at b/tests/ovsdb-server.at index 98aeb4a84..a1738eaa0 100644 --- a/tests/ovsdb-server.at +++ b/tests/ovsdb-server.at @@ -1,4 +1,4 @@ -AT_BANNER([OVSDB -- ovsdb-server transactions]) +AT_BANNER([OVSDB -- ovsdb-server transactions (Unix sockets)]) # OVSDB_CHECK_EXECUTION(TITLE, SCHEMA, TRANSACTIONS, OUTPUT, [KEYWORDS]) # @@ -20,7 +20,7 @@ m4_define([OVSDB_CHECK_EXECUTION], AT_DATA([schema], [$2 ]) OVS_CHECK_LCOV([ovsdb-tool create db schema], [0], [stdout], [ignore]) - AT_CHECK([ovsdb-server --detach --pidfile=$PWD/pid --listen=punix:socket --unixctl=$PWD/unixctl db], [0], [ignore], [ignore]) + AT_CHECK([ovsdb-server --detach --pidfile=$PWD/pid --remote=punix:socket --unixctl=$PWD/unixctl db], [0], [ignore], [ignore]) m4_foreach([txn], [$3], [OVS_CHECK_LCOV([ovsdb-client transact unix:socket 'txn'], [0], [stdout], [ignore], [test ! -e pid || kill `cat pid`]) @@ -32,3 +32,75 @@ cat stdout >> output AT_CLEANUP]) EXECUTION_EXAMPLES + +AT_SETUP([--remote=db: implementation]) +AT_KEYWORDS([ovsdb server positive]) +AT_DATA([schema], + [[{"name": "mydb", + "tables": { + "Manager": { + "columns": { + "manager": {"type": "string"}}}}} +]]) +OVS_CHECK_LCOV([ovsdb-tool create db schema], [0], [ignore], [ignore]) +OVS_CHECK_LCOV( + [[ovsdb-tool transact db \ + '[{"op": "insert", + "table": "Manager", + "row": {"manager": "punix:socket"}}]']], [0], [ignore], [ignore]) +AT_CHECK([ovsdb-server --detach --pidfile=$PWD/pid --remote=db:Manager,manager --unixctl=$PWD/unixctl db], [0], [ignore], [ignore]) +OVS_CHECK_LCOV( + [[ovsdb-client transact unix:socket \ + '[{"op": "select", + "table": "Manager", + "where": [], + "columns": ["manager"]}]']], + [0], [stdout], [ignore], [test ! -e pid || kill `cat pid`]) +AT_CHECK( + [perl $srcdir/uuidfilt.pl stdout], + [0], + [[[{"rows":[{"manager":"punix:socket"}]}] +]], + [ignore], + [test ! -e pid || kill `cat pid`]) +test ! -e pid || kill `cat pid` +AT_CLEANUP + +AT_BANNER([OVSDB -- ovsdb-server transactions (SSL sockets)]) + +# OVSDB_CHECK_EXECUTION(TITLE, SCHEMA, TRANSACTIONS, OUTPUT, [KEYWORDS]) +# +# Creates a database with the given SCHEMA, starts an ovsdb-server on +# that database, and runs each of the TRANSACTIONS (which should be a +# quoted list of quoted strings) against it with ovsdb-client one at a +# time. +# +# Checks that the overall output is OUTPUT, but UUIDs in the output +# are replaced by markers of the form where N is a number. The +# first unique UUID is replaced by <0>, the next by <1>, and so on. +# If a given UUID appears more than once it is always replaced by the +# same marker. +# +# TITLE is provided to AT_SETUP and KEYWORDS to AT_KEYWORDS. +m4_define([OVSDB_CHECK_EXECUTION], + [AT_SETUP([$1]) + AT_KEYWORDS([ovsdb server positive ssl $5]) + AT_SKIP_IF([test "$HAVE_OPENSSL" = no]) + AT_SKIP_IF([test "x$RANDOM" = x]) + AT_DATA([schema], [$2 +]) + SSL_PORT=`expr 32767 + \( $RANDOM % 32767 \)` + PKIDIR=$abs_top_srcdir/tests + OVS_CHECK_LCOV([ovsdb-tool create db schema], [0], [stdout], [ignore]) + AT_CHECK([ovsdb-server --detach --pidfile=$PWD/pid --private-key=$PKIDIR/testpki-privkey2.pem --certificate=$PKIDIR/testpki-cert2.pem --ca-cert=$PKIDIR/testpki-cacert.pem --remote=pssl:$SSL_PORT:127.0.0.1 --unixctl=$PWD/unixctl db], [0], [ignore], [ignore]) + m4_foreach([txn], [$3], + [OVS_CHECK_LCOV([ovsdb-client --private-key=$PKIDIR/testpki-privkey.pem --certificate=$PKIDIR/testpki-cert.pem --ca-cert=$PKIDIR/testpki-cacert.pem transact ssl:127.0.0.1:$SSL_PORT 'txn'], [0], [stdout], [ignore], + [test ! -e pid || kill `cat pid`]) +cat stdout >> output +]) + AT_CHECK([perl $srcdir/uuidfilt.pl output], [0], [$4], [ignore], + [test ! -e pid || kill `cat pid`]) + test ! -e pid || kill `cat pid` + AT_CLEANUP]) + +EXECUTION_EXAMPLES