AT_BANNER([ofproto])

m4_define([STRIP_XIDS], [[sed 's/ (xid=0x[0-9a-fA-F]*)//']])
m4_define([STRIP_DURATION], [[sed 's/\bduration=[0-9.]*s/duration=?s/']])

m4_define([OFPROTO_START],
  [OVS_RUNDIR=$PWD; export OVS_RUNDIR
   OVS_LOGDIR=$PWD; export OVS_LOGDIR
   trap 'kill `cat ovs-openflowd.pid`' 0
   AT_CAPTURE_FILE([ovs-openflowd.log])
   AT_CHECK(
     [ovs-openflowd --detach --pidfile --enable-dummy --log-file dummy@br0 none --datapath-id=fedcba9876543210 $1],
     [0], [ignore], [ignore])
])

m4_define([OFPROTO_STOP],
  [AT_CHECK([ovs-appctl -t ovs-openflowd exit])
   trap '' 0])

AT_SETUP([ofproto - echo request])
OFPROTO_START
AT_CHECK([ovs-ofctl -vANY:ANY:WARN probe br0])
OFPROTO_STOP
AT_CLEANUP

AT_SETUP([ofproto - feature request, config request])
OFPROTO_START
AT_CHECK([ovs-ofctl -vANY:ANY:WARN show br0], [0], [stdout])
AT_CHECK([STRIP_XIDS stdout], [0], [dnl
OFPT_FEATURES_REPLY: ver:0x1, dpid:fedcba9876543210
n_tables:2, n_buffers:256
features: capabilities:0x87, actions:0xfff
 LOCAL(br0): addr:aa:55:aa:55:00:00, config: 0x1, state:0x1
OFPT_GET_CONFIG_REPLY: miss_send_len=0
])
OFPROTO_STOP
AT_CLEANUP

AT_SETUP([ofproto - mod-port])
OFPROTO_START
for command_config_state in \
    'up 0 0' \
    'noflood 0x10 0' \
    'down 0x11 0x1' \
    'flood 0x1 0x1'
do
    set $command_config_state
    command=$[1] config=$[2] state=$[3]
    AT_CHECK([ovs-ofctl -vANY:ANY:WARN mod-port br0 br0 $command])
    AT_CHECK([ovs-ofctl -vANY:ANY:WARN show br0], [0], [stdout])
    AT_CHECK_UNQUOTED([STRIP_XIDS stdout], [0], [dnl
OFPT_FEATURES_REPLY: ver:0x1, dpid:fedcba9876543210
n_tables:2, n_buffers:256
features: capabilities:0x87, actions:0xfff
 LOCAL(br0): addr:aa:55:aa:55:00:00, config: $config, state:$state
OFPT_GET_CONFIG_REPLY: miss_send_len=0
])
done
OFPROTO_STOP
AT_CLEANUP

AT_SETUP([ofproto - basic flow_mod commands])
OFPROTO_START
AT_CHECK([ovs-ofctl dump-flows br0 | STRIP_XIDS], [0], [NXST_FLOW reply:
])
AT_CHECK([ovs-ofctl add-flow br0 in_port=1,actions=0])
AT_CHECK([ovs-ofctl add-flow br0 in_port=0,actions=1])
AT_CHECK([ovs-ofctl dump-flows br0 | STRIP_XIDS | STRIP_DURATION], [0], [dnl
NXST_FLOW reply:
 cookie=0x0, duration=?s, table_id=0, n_packets=0, n_bytes=0, in_port=1 actions=output:0
 cookie=0x0, duration=?s, table_id=0, n_packets=0, n_bytes=0, in_port=65534 actions=output:1
])
AT_CHECK([ovs-ofctl del-flows br0])
AT_CHECK([ovs-ofctl dump-flows br0 | STRIP_XIDS], [0], [NXST_FLOW reply:
])
OFPROTO_STOP
AT_CLEANUP