4 m4_define([OVN_NBCTL_TEST_START],
5 [dnl Create ovn-nb database.
6 AT_CHECK([ovsdb-tool create ovn-nb.db $abs_top_srcdir/ovn/ovn-nb.ovsschema])
8 dnl Start ovsdb-server.
9 AT_CHECK([ovsdb-server --detach --no-chdir --pidfile --log-file --remote=punix:$OVS_RUNDIR/db.sock ovn-nb.db], [0], [], [stderr])
10 on_exit "kill `cat ovsdb-server.pid`"
11 AT_CHECK([[sed < stderr '
12 /vlog|INFO|opened log file/d
13 /ovsdb_server|INFO|ovsdb-server (Open vSwitch)/d']])
14 AT_CAPTURE_FILE([ovsdb-server.log])
18 m4_define([OVN_NBCTL_TEST_STOP],
19 [AT_CHECK([check_logs $1])
20 AT_CHECK([ovs-appctl -t ovsdb-server exit])])
23 AT_SETUP([ovn-nbctl - basic lswitch commands])
26 AT_CHECK([ovn-nbctl lswitch-add ls0])
27 AT_CHECK([ovn-nbctl lswitch-list | ${PERL} $srcdir/uuidfilt.pl], [0], [dnl
31 AT_CHECK([ovn-nbctl lswitch-add ls1])
32 AT_CHECK([ovn-nbctl lswitch-list | ${PERL} $srcdir/uuidfilt.pl], [0], [dnl
37 AT_CHECK([ovn-nbctl lswitch-del ls0])
38 AT_CHECK([ovn-nbctl lswitch-list | ${PERL} $srcdir/uuidfilt.pl], [0], [dnl
45 dnl ---------------------------------------------------------------------
47 AT_SETUP([ovn-nbctl - basic lport commands])
50 AT_CHECK([ovn-nbctl lswitch-add ls0])
51 AT_CHECK([ovn-nbctl lport-add ls0 lp0])
52 AT_CHECK([ovn-nbctl lport-list ls0 | ${PERL} $srcdir/uuidfilt.pl], [0], [dnl
56 AT_CHECK([ovn-nbctl lport-add ls0 lp1])
57 AT_CHECK([ovn-nbctl lport-list ls0 | ${PERL} $srcdir/uuidfilt.pl], [0], [dnl
62 AT_CHECK([ovn-nbctl lport-del lp1])
63 AT_CHECK([ovn-nbctl lport-list ls0 | ${PERL} $srcdir/uuidfilt.pl], [0], [dnl
70 dnl ---------------------------------------------------------------------
72 AT_SETUP([ovn-nbctl - addresses])
75 AT_CHECK([ovn-nbctl lswitch-add ls0])
76 AT_CHECK([ovn-nbctl lport-add ls0 lp0])
77 AT_CHECK([ovn-nbctl lport-get-addresses lp0], [0], [dnl
80 AT_CHECK([ovn-nbctl lport-set-addresses lp0 00:11:22:33:44:55 unknown])
81 AT_CHECK([ovn-nbctl lport-get-addresses lp0], [0], [dnl
86 AT_CHECK([ovn-nbctl lport-set-addresses lp0])
87 AT_CHECK([ovn-nbctl lport-get-addresses lp0], [0], [dnl
93 dnl ---------------------------------------------------------------------
95 AT_SETUP([ovn-nbctl - port security])
98 AT_CHECK([ovn-nbctl lswitch-add ls0])
99 AT_CHECK([ovn-nbctl lport-add ls0 lp0])
100 AT_CHECK([ovn-nbctl lport-get-addresses lp0], [0], [dnl
103 AT_CHECK([ovn-nbctl lport-set-port-security lp0 aa:bb:cc:dd:ee:ff 00:11:22:33:44:55])
104 AT_CHECK([ovn-nbctl lport-get-port-security lp0], [0], [dnl
109 AT_CHECK([ovn-nbctl lport-set-port-security lp0])
110 AT_CHECK([ovn-nbctl lport-get-port-security lp0], [0], [dnl
116 dnl ---------------------------------------------------------------------
118 AT_SETUP([ovn-nbctl - ACLs])
121 AT_CHECK([ovn-nbctl lswitch-add ls0])
122 AT_CHECK([ovn-nbctl --log acl-add ls0 from-lport 600 udp drop])
123 AT_CHECK([ovn-nbctl --log acl-add ls0 to-lport 500 udp drop])
124 AT_CHECK([ovn-nbctl acl-add ls0 from-lport 400 tcp drop])
125 AT_CHECK([ovn-nbctl acl-add ls0 to-lport 300 tcp drop])
126 AT_CHECK([ovn-nbctl acl-add ls0 from-lport 200 ip drop])
127 AT_CHECK([ovn-nbctl acl-add ls0 to-lport 100 ip drop])
129 AT_CHECK([ovn-nbctl acl-list ls0], [0], [dnl
130 from-lport 600 (udp) drop log
131 from-lport 400 (tcp) drop
132 from-lport 200 (ip) drop
133 to-lport 500 (udp) drop log
134 to-lport 300 (tcp) drop
135 to-lport 100 (ip) drop
138 dnl Delete in one direction.
139 AT_CHECK([ovn-nbctl acl-del ls0 to-lport])
140 AT_CHECK([ovn-nbctl acl-list ls0], [0], [dnl
141 from-lport 600 (udp) drop log
142 from-lport 400 (tcp) drop
143 from-lport 200 (ip) drop
147 AT_CHECK([ovn-nbctl acl-del ls0])
148 AT_CHECK([ovn-nbctl acl-list ls0], [0], [dnl
151 AT_CHECK([ovn-nbctl acl-add ls0 from-lport 600 udp drop])
152 AT_CHECK([ovn-nbctl acl-add ls0 from-lport 400 tcp drop])
153 AT_CHECK([ovn-nbctl acl-add ls0 from-lport 200 ip drop])
155 dnl Delete a single flow.
156 AT_CHECK([ovn-nbctl acl-del ls0 from-lport 400 tcp])
157 AT_CHECK([ovn-nbctl acl-list ls0], [0], [dnl
158 from-lport 600 (udp) drop
159 from-lport 200 (ip) drop