tests/ofproto-macros.at

   1 m4_divert_push([PREPARE_TESTS])
   2 [
   3 # Strips out uninteresting parts of ovs-ofctl output, as well as parts
   4 # that vary from one run to another.
   5 ofctl_strip () {
   6     sed '
   7 s/ (xid=0x[0-9a-fA-F]*)//
   8 s/ duration=[0-9.]*s,//
   9 s/ cookie=0x0,//
  10 s/ table=0,//
  11 s/ n_packets=0,//
  12 s/ n_bytes=0,//
  13 s/ idle_age=[0-9]*,//
  14 s/ hard_age=[0-9]*,//
  15 '
  16 }
  17
  18 # parse_listening_port [SERVER]
  19 #
  20 # Parses the TCP or SSL port on which a server is listening from the
  21 # log, given that the server was told to listen on a kernel-chosen
  22 # port, file provided on stdin, and prints the port number on stdout.
  23 # You should specify the listening remote as ptcp:0:127.0.0.1 or
  24 # pssl:0:127.0.0.1, or the equivalent with [::1] instead of 127.0.0.1.
  25 #
  26 # Here's an example of how to use this with ovsdb-server:
  27 #
  28 #    OVS_LOGDIR=`pwd`; export OVS_LOGDIR
  29 #    ovsdb-server --log-file --remote=ptcp:0:127.0.0.1 ...
  30 #    TCP_PORT=`parse_listening_port < ovsdb-server.log`
  31 parse_listening_port () {
  32     sed -n 's/.*0:.*: listening on port \([0-9]*\)$/\1/p'
  33 }]
  34 m4_divert_pop([PREPARE_TESTS])
  35
  36 m4_define([STRIP_XIDS], [[sed 's/ (xid=0x[0-9a-fA-F]*)//']])
  37 m4_define([STRIP_DURATION], [[sed 's/\bduration=[0-9.]*s/duration=?s/']])
  38 m4_define([STRIP_USED], [[sed 's/used:[0-9]\.[0-9]*/used:0.0/']])
  39 m4_define([STRIP_UFID], [[sed 's/ufid:[0-9a-f]* //']])
  40 m4_define([TESTABLE_LOG], [-vPATTERN:ANY:'%c|%p|%m'])
  41
  42 # _OVS_VSWITCHD_START([vswitchd-aux-args])
  43 #
  44 # Creates an empty database and starts ovsdb-server.
  45 # Starts ovs-vswitchd, with additional arguments 'vswitchd-aux-args'.
  46 #
  47 m4_define([_OVS_VSWITCHD_START],
  48   [OVS_RUNDIR=`pwd`; export OVS_RUNDIR
  49    OVS_LOGDIR=`pwd`; export OVS_LOGDIR
  50    OVS_DBDIR=`pwd`; export OVS_DBDIR
  51    OVS_SYSCONFDIR=`pwd`; export OVS_SYSCONFDIR
  52
  53    dnl Create database.
  54    touch .conf.db.~lock~
  55    AT_CHECK([ovsdb-tool create conf.db $abs_top_srcdir/vswitchd/vswitch.ovsschema])
  56
  57    dnl Start ovsdb-server.
  58    AT_CHECK([ovsdb-server --detach --no-chdir --pidfile --log-file --remote=punix:$OVS_RUNDIR/db.sock], [0], [], [stderr])
  59     ON_EXIT_UNQUOTED([kill `cat ovsdb-server.pid`])
  60    AT_CHECK([[sed < stderr '
  61 /vlog|INFO|opened log file/d
  62 /ovsdb_server|INFO|ovsdb-server (Open vSwitch)/d']])
  63    AT_CAPTURE_FILE([ovsdb-server.log])
  64
  65    dnl Initialize database.
  66    AT_CHECK([ovs-vsctl --no-wait init])
  67
  68    dnl Start ovs-vswitchd.
  69    AT_CHECK([ovs-vswitchd $1 --detach --no-chdir --pidfile --log-file -vvconn -vofproto_dpif], [0], [], [stderr])
  70    AT_CAPTURE_FILE([ovs-vswitchd.log])
  71    ON_EXIT_UNQUOTED([kill `cat ovs-vswitchd.pid`])
  72    AT_CHECK([[sed < stderr '
  73 /ovs_numa|INFO|Discovered /d
  74 /vlog|INFO|opened log file/d
  75 /vswitchd|INFO|ovs-vswitchd (Open vSwitch)/d
  76 /reconnect|INFO|/d
  77 /ofproto|INFO|using datapath ID/d
  78 /ofproto|INFO|datapath ID changed to fedcba9876543210/d']])
  79 ])
  80
  81 # OVS_VSWITCHD_START([vsctl-args], [vsctl-output], [=override])
  82 #
  83 # Creates a database and starts ovsdb-server, starts ovs-vswitchd
  84 # connected to that database, calls ovs-vsctl to create a bridge named
  85 # br0 with predictable settings, passing 'vsctl-args' as additional
  86 # commands to ovs-vsctl.  If 'vsctl-args' causes ovs-vsctl to provide
  87 # output (e.g. because it includes "create" commands) then 'vsctl-output'
  88 # specifies the expected output after filtering through uuidfilt.pl.
  89 #
  90 # If a test needs to use "system" devices (as dummies), then specify
  91 # =override (literally) as the third argument.  Otherwise, system devices
  92 # won't work at all (which makes sense because tests should not access a
  93 # system's real Ethernet devices).
  94 m4_define([OVS_VSWITCHD_START],
  95   [_OVS_VSWITCHD_START([--enable-dummy$3 --disable-system])
  96
  97    dnl Add bridges, ports, etc.
  98    AT_CHECK([ovs-vsctl -- add-br br0 -- set bridge br0 datapath-type=dummy other-config:datapath-id=fedcba9876543210 other-config:hwaddr=aa:55:aa:55:00:00 protocols=[[OpenFlow10,OpenFlow11,OpenFlow12,OpenFlow13,OpenFlow14,OpenFlow15]] fail-mode=secure -- $1 m4_if([$2], [], [], [| ${PERL} $srcdir/uuidfilt.pl])], [0], [$2])
  99 ])
 100
 101 m4_divert_push([PREPARE_TESTS])
 102 check_logs () {
 103     sed -n "$1
 104 /timeval.*Unreasonably long [[0-9]]*ms poll interval/d
 105 /timeval.*faults: [[0-9]]* minor, [[0-9]]* major/d
 106 /timeval.*disk: [[0-9]]* reads, [[0-9]]* writes/d
 107 /timeval.*context switches: [[0-9]]* voluntary, [[0-9]]* involuntary/d
 108 /ovs_rcu.*blocked [[0-9]]* ms waiting for .* to quiesce/d
 109 /|WARN|/p
 110 /|ERR|/p
 111 /|EMER|/p" ovs-vswitchd.log ovsdb-server.log
 112 }
 113 m4_divert_pop([PREPARE_TESTS])
 114
 115 # OVS_VSWITCHD_STOP([WHITELIST])
 116 #
 117 # Gracefully stops ovs-vswitchd and ovsdb-server, checking their log files
 118 # for messages with severity WARN or higher and signaling an error if any
 119 # is present.  The optional WHITELIST may contain shell-quoted "sed"
 120 # commands to delete any warnings that are actually expected, e.g.:
 121 #
 122 #   OVS_VSWITCHD_STOP(["/expected error/d"])
 123 m4_define([OVS_VSWITCHD_STOP],
 124   [AT_CHECK([check_logs $1])
 125    AT_CHECK([ovs-appctl -t ovs-vswitchd exit])
 126    AT_CHECK([ovs-appctl -t ovsdb-server exit])])
 127
 128 m4_define([OVS_VSWITCHD_DISABLE_TUNNEL_PUSH_POP],
 129   [AT_CHECK([ovs-appctl ofproto/tnl-push-pop off], [0], [dnl
 130 Tunnel push-pop off
 131 ])])
 132
 133   [AT_CHECK([ovs-appctl ofproto/tnl-push-pop off])])
 134
 135 # ADD_OF_PORTS(BRIDGE, OF_PORT[, OF_PORT...])
 136 #
 137 # Creates a dummy interface with an OpenFlow port number of OF_PORT and
 138 # name of p{OF_PORT}.  The dummy implementation will treat the OF_PORT
 139 # as the datapath port number, which as the effect of making the
 140 # OpenFlow and datapath numbers the same.
 141 m4_define([ADD_OF_PORTS],
 142  [ovs-vsctl m4_foreach([of_port], m4_cdr($@),
 143     [ \
 144     -- add-port $1 p[]of_port -- set Interface p[]of_port type=dummy ofport_request=of_port])])
 145
 146 # WAIT_FOR_DUMMY_PORTS(NETDEV_DUMMY_PORT[, NETDEV_DUMMY_PORT...])
 147 #
 148 # Wait until the netdev dummy ports are connected to each other
 149 m4_define([WAIT_FOR_DUMMY_PORTS], \
 150   [m4_foreach([dummy_port], [$@],
 151       [  \
 152          OVS_WAIT_WHILE([ovs-appctl netdev-dummy/conn-state dummy_port \
 153                   | grep 'unknown\|disconnected'])])])