tests/ovn.at

   1 AT_BANNER([OVN components])
   2
   3 AT_SETUP([ovn -- lexer])
   4 dnl For lines without =>, input and expected output are identical.
   5 dnl For lines with =>, input precedes => and expected output follows =>.
   6 AT_DATA([test-cases.txt], [dnl
   7 foo bar baz quuxquuxquux _abcd_ a.b.c.d a123_.456
   8 "abc\u0020def" => "abc def"
   9 " => error("Input ends inside quoted string.")dnl "
  10
  11 a/*b*/c => a c
  12 a//b c => a
  13 a/**/b => a b
  14 a/*/b => a error("`/*' without matching `*/'.")
  15 a/*/**/b => a b
  16 a/b => a error("`/' is only valid as part of `//' or `/*'.") b
  17
  18 0 1 12345 18446744073709551615
  19 18446744073709551616 => error("Decimal constants must be less than 2**64.")
  20 9999999999999999999999 => error("Decimal constants must be less than 2**64.")
  21 01 => error("Decimal constants must not have leading zeros.")
  22
  23 0/0
  24 0/1
  25 1/0 => error("Value contains unmasked 1-bits.")
  26 1/1
  27 128/384
  28 1/3
  29 1/ => error("Integer constant expected.")
  30
  31 1/0x123 => error("Value and mask have incompatible formats.")
  32
  33 0x1234
  34 0x01234 => 0x1234
  35 0x0 => 0
  36 0x000 => 0
  37 0xfedcba9876543210
  38 0XFEDCBA9876543210 => 0xfedcba9876543210
  39 0xfedcba9876543210fedcba9876543210
  40 0x0000fedcba9876543210fedcba9876543210 => 0xfedcba9876543210fedcba9876543210
  41 0x => error("Hex digits expected following 0x.")
  42 0X => error("Hex digits expected following 0X.")
  43 0x0/0x0 => 0/0
  44 0x0/0x1 => 0/0x1
  45 0x1/0x0 => error("Value contains unmasked 1-bits.")
  46 0xffff/0x1ffff
  47 0x. => error("Invalid syntax in hexadecimal constant.")
  48
  49 192.168.128.1 1.2.3.4 255.255.255.255 0.0.0.0
  50 256.1.2.3 => error("Invalid numeric constant.")
  51 192.168.0.0/16
  52 192.168.0.0/255.255.0.0 => 192.168.0.0/16
  53 192.168.0.0/255.255.255.0 => 192.168.0.0/24
  54 192.168.0.0/255.255.0.255
  55 192.168.0.0/255.0.0.0 => error("Value contains unmasked 1-bits.")
  56 192.168.0.0/32
  57 192.168.0.0/255.255.255.255 => 192.168.0.0/32
  58
  59 ::
  60 ::1
  61 ff00::1234 => ff00::1234
  62 2001:db8:85a3::8a2e:370:7334
  63 2001:db8:85a3:0:0:8a2e:370:7334 => 2001:db8:85a3::8a2e:370:7334
  64 2001:0db8:85a3:0000:0000:8a2e:0370:7334 => 2001:db8:85a3::8a2e:370:7334
  65 ::ffff:192.0.2.128
  66 ::ffff:c000:0280 => ::ffff:192.0.2.128
  67 ::1/::1
  68 ::1/ffff:ffff:ffff:ffff:ffff:ffff:ffff:ffff => ::1/128
  69 ::1/128
  70 ff00::/8
  71 ff00::/ff00:: => ff00::/8
  72
  73 01:23:45:67:ab:cd
  74 01:23:45:67:AB:CD => 01:23:45:67:ab:cd
  75 fe:dc:ba:98:76:54
  76 FE:DC:ba:98:76:54 => fe:dc:ba:98:76:54
  77 01:00:00:00:00:00/01:00:00:00:00:00
  78 ff:ff:ff:ff:ff:ff/ff:ff:ff:ff:ff:ff
  79 fe:ff:ff:ff:ff:ff/ff:ff:ff:ff:ff:ff
  80 ff:ff:ff:ff:ff:ff/fe:ff:ff:ff:ff:ff => error("Value contains unmasked 1-bits.")
  81 fe:x => error("Invalid numeric constant.")
  82 00:01:02:03:04:x => error("Invalid numeric constant.")
  83
  84 # Test that operators are tokenized as expected, even without white space.
  85 (){}[[]]==!=<<=>>=!&&||..,;=<->-- => ( ) { } [[ ]] == != < <= > >= ! && || .. , ; = <-> --
  86 & => error("`&' is only valid as part of `&&'.")
  87 | => error("`|' is only valid as part of `||'.")
  88 - => error("`-' is only valid as part of `--'.")
  89
  90 ^ => error("Invalid character `^' in input.")
  91 ])
  92 AT_CAPTURE_FILE([input.txt])
  93 sed 's/ =>.*//' test-cases.txt > input.txt
  94 sed 's/.* => //' test-cases.txt > expout
  95 AT_CHECK([ovstest test-ovn lex < input.txt], [0], [expout])
  96 AT_CLEANUP
  97
  98 AT_SETUP([ovn -- expression parser])
  99 dnl For lines without =>, input and expected output are identical.
 100 dnl For lines with =>, input precedes => and expected output follows =>.
 101 AT_DATA([test-cases.txt], [[
 102 eth.type == 0x800
 103 eth.type==0x800 => eth.type == 0x800
 104 eth.type[0..15] == 0x800 => eth.type == 0x800
 105
 106 vlan.present
 107 vlan.present == 1 => vlan.present
 108 !(vlan.present == 0) => vlan.present
 109 !(vlan.present != 1) => vlan.present
 110 !vlan.present
 111 vlan.present == 0 => !vlan.present
 112 vlan.present != 1 => !vlan.present
 113 !(vlan.present == 1) => !vlan.present
 114 !(vlan.present != 0) => !vlan.present
 115
 116 eth.dst[0]
 117 eth.dst[0] == 1 => eth.dst[0]
 118 eth.dst[0] != 0 => eth.dst[0]
 119 !(eth.dst[0] == 0) => eth.dst[0]
 120 !(eth.dst[0] != 1) => eth.dst[0]
 121
 122 !eth.dst[0]
 123 eth.dst[0] == 0 => !eth.dst[0]
 124 eth.dst[0] != 1 => !eth.dst[0]
 125 !(eth.dst[0] == 1) => !eth.dst[0]
 126 !(eth.dst[0] != 0) => !eth.dst[0]
 127
 128 vlan.tci[12..15] == 0x3
 129 vlan.tci == 0x3000/0xf000 => vlan.tci[12..15] == 0x3
 130 vlan.tci[12..15] != 0x3
 131 vlan.tci != 0x3000/0xf000 => vlan.tci[12..15] != 0x3
 132
 133 !vlan.pcp => vlan.pcp == 0
 134 !(vlan.pcp) => vlan.pcp == 0
 135 vlan.pcp == 0x4
 136 vlan.pcp != 0x4
 137 vlan.pcp > 0x4
 138 vlan.pcp >= 0x4
 139 vlan.pcp < 0x4
 140 vlan.pcp <= 0x4
 141 !(vlan.pcp != 0x4) => vlan.pcp == 0x4
 142 !(vlan.pcp == 0x4) => vlan.pcp != 0x4
 143 !(vlan.pcp <= 0x4) => vlan.pcp > 0x4
 144 !(vlan.pcp < 0x4) => vlan.pcp >= 0x4
 145 !(vlan.pcp >= 0x4) => vlan.pcp < 0x4
 146 !(vlan.pcp > 0x4) => vlan.pcp <= 0x4
 147 0x4 == vlan.pcp => vlan.pcp == 0x4
 148 0x4 != vlan.pcp => vlan.pcp != 0x4
 149 0x4 < vlan.pcp => vlan.pcp > 0x4
 150 0x4 <= vlan.pcp => vlan.pcp >= 0x4
 151 0x4 > vlan.pcp => vlan.pcp < 0x4
 152 0x4 >= vlan.pcp => vlan.pcp <= 0x4
 153 !(0x4 != vlan.pcp) => vlan.pcp == 0x4
 154 !(0x4 == vlan.pcp) => vlan.pcp != 0x4
 155 !(0x4 >= vlan.pcp) => vlan.pcp > 0x4
 156 !(0x4 > vlan.pcp) => vlan.pcp >= 0x4
 157 !(0x4 <= vlan.pcp) => vlan.pcp < 0x4
 158 !(0x4 < vlan.pcp) => vlan.pcp <= 0x4
 159
 160 1 < vlan.pcp < 4 => vlan.pcp > 0x1 && vlan.pcp < 0x4
 161 1 <= vlan.pcp <= 4 => vlan.pcp >= 0x1 && vlan.pcp <= 0x4
 162 1 < vlan.pcp <= 4 => vlan.pcp > 0x1 && vlan.pcp <= 0x4
 163 1 <= vlan.pcp < 4 => vlan.pcp >= 0x1 && vlan.pcp < 0x4
 164 1 <= vlan.pcp <= 4 => vlan.pcp >= 0x1 && vlan.pcp <= 0x4
 165 4 > vlan.pcp > 1 => vlan.pcp < 0x4 && vlan.pcp > 0x1
 166 4 >= vlan.pcp > 1 => vlan.pcp <= 0x4 && vlan.pcp > 0x1
 167 4 > vlan.pcp >= 1 => vlan.pcp < 0x4 && vlan.pcp >= 0x1
 168 4 >= vlan.pcp >= 1 => vlan.pcp <= 0x4 && vlan.pcp >= 0x1
 169 !(1 < vlan.pcp < 4) => vlan.pcp <= 0x1 || vlan.pcp >= 0x4
 170 !(1 <= vlan.pcp <= 4) => vlan.pcp < 0x1 || vlan.pcp > 0x4
 171 !(1 < vlan.pcp <= 4) => vlan.pcp <= 0x1 || vlan.pcp > 0x4
 172 !(1 <= vlan.pcp < 4) => vlan.pcp < 0x1 || vlan.pcp >= 0x4
 173 !(1 <= vlan.pcp <= 4) => vlan.pcp < 0x1 || vlan.pcp > 0x4
 174 !(4 > vlan.pcp > 1) => vlan.pcp >= 0x4 || vlan.pcp <= 0x1
 175 !(4 >= vlan.pcp > 1) => vlan.pcp > 0x4 || vlan.pcp <= 0x1
 176 !(4 > vlan.pcp >= 1) => vlan.pcp >= 0x4 || vlan.pcp < 0x1
 177 !(4 >= vlan.pcp >= 1) => vlan.pcp > 0x4 || vlan.pcp < 0x1
 178
 179 vlan.pcp == {1, 2, 3, 4} => vlan.pcp == 0x1 || vlan.pcp == 0x2 || vlan.pcp == 0x3 || vlan.pcp == 0x4
 180 vlan.pcp == 1 || ((vlan.pcp == 2 || vlan.pcp == 3) || vlan.pcp == 4) => vlan.pcp == 0x1 || vlan.pcp == 0x2 || vlan.pcp == 0x3 || vlan.pcp == 0x4
 181
 182 vlan.pcp != {1, 2, 3, 4} => vlan.pcp != 0x1 && vlan.pcp != 0x2 && vlan.pcp != 0x3 && vlan.pcp != 0x4
 183 vlan.pcp == 1 && ((vlan.pcp == 2 && vlan.pcp == 3) && vlan.pcp == 4) => vlan.pcp == 0x1 && vlan.pcp == 0x2 && vlan.pcp == 0x3 && vlan.pcp == 0x4
 184
 185 vlan.pcp == 1 && !((vlan.pcp == 2 && vlan.pcp == 3) && vlan.pcp == 4) => vlan.pcp == 0x1 && (vlan.pcp != 0x2 || vlan.pcp != 0x3 || vlan.pcp != 0x4)
 186 vlan.pcp == 1 && (!(vlan.pcp == 2 && vlan.pcp == 3) && vlan.pcp == 4) => vlan.pcp == 0x1 && (vlan.pcp != 0x2 || vlan.pcp != 0x3) && vlan.pcp == 0x4
 187 vlan.pcp == 1 && !(!(vlan.pcp == 2 && vlan.pcp == 3) && vlan.pcp == 4) => vlan.pcp == 0x1 && ((vlan.pcp == 0x2 && vlan.pcp == 0x3) || vlan.pcp != 0x4)
 188
 189 ip4.src == {10.0.0.0/8, 192.168.0.0/16, 172.16.20.0/24, 8.8.8.8} => ip4.src[24..31] == 0xa || ip4.src[16..31] == 0xc0a8 || ip4.src[8..31] == 0xac1014 || ip4.src == 0x8080808
 190 ip6.src == ::1 => ip6.src == 0x1
 191
 192 ip4.src == 1.2.3.4 => ip4.src == 0x1020304
 193 ip4.src == ::1.2.3.4/::ffff:ffff => ip4.src == 0x1020304
 194 ip6.src == ::1 => ip6.src == 0x1
 195
 196 1
 197 0
 198 !1 => 0
 199 !0 => 1
 200
 201 inport == "eth0"
 202 !(inport != "eth0") => inport == "eth0"
 203
 204 ip4.src == "eth0" => Integer field ip4.src is not compatible with string constant.
 205 inport == 1 => String field inport is not compatible with integer constant.
 206
 207 ip4.src > {1, 2, 3} => Only == and != operators may be used with value sets.
 208 eth.type > 0x800 => Only == and != operators may be used with nominal field eth.type.
 209 vlan.present > 0 => Only == and != operators may be used with Boolean field vlan.present.
 210
 211 inport != "eth0" => Nominal field inport may only be tested for equality (taking enclosing `!' operators into account).
 212 !(inport == "eth0") => Nominal field inport may only be tested for equality (taking enclosing `!' operators into account).
 213 eth.type != 0x800 => Nominal field eth.type may only be tested for equality (taking enclosing `!' operators into account).
 214 !(eth.type == 0x800) => Nominal field eth.type may only be tested for equality (taking enclosing `!' operators into account).
 215
 216 123 == 123 => Syntax error at `123' expecting field name.
 217
 218 123 == xyzzy => Syntax error at `xyzzy' expecting field name.
 219 xyzzy == 1 => Syntax error at `xyzzy' expecting field name.
 220
 221 inport[1] == 1 => Cannot select subfield of string field inport.
 222
 223 eth.type[] == 1 => Syntax error at `@:>@' expecting small integer.
 224 eth.type[::1] == 1 => Syntax error at `::1' expecting small integer.
 225 eth.type[18446744073709551615] == 1 => Syntax error at `18446744073709551615' expecting small integer.
 226
 227 eth.type[5!] => Syntax error at `!' expecting `@:>@'.
 228
 229 eth.type[5..1] => Invalid bit range 5 to 1.
 230
 231 eth.type[12..16] => Cannot select bits 12 to 16 of 16-bit field eth.type.
 232
 233 eth.type[10] == 1 => Cannot select subfield of nominal field eth.type.
 234
 235 eth.type => Explicit `!= 0' is required for inequality test of multibit field against 0.
 236
 237 !(!(vlan.pcp)) => Explicit `!= 0' is required for inequality test of multibit field against 0.
 238
 239 123 => Syntax error at end of input expecting relational operator.
 240
 241 123 x => Syntax error at `x' expecting relational operator.
 242
 243 {1, "eth0"} => Syntax error at `"eth0"' expecting integer.
 244
 245 eth.type == xyzzy => Syntax error at `xyzzy' expecting constant.
 246
 247 (1 x) => Syntax error at `x' expecting `)'.
 248
 249 !0x800 != eth.type => Missing parentheses around operand of !.
 250
 251 eth.type == 0x800 || eth.type == 0x86dd && ip.proto == 17 => && and || must be parenthesized when used together.
 252
 253 eth.dst == {} => Syntax error at `}' expecting constant.
 254
 255 eth.src > 00:00:00:00:11:11/00:00:00:00:ff:ff => Only == and != operators may be used with masked constants.  Consider using subfields instead (e.g. eth.src[0..15] > 0x1111 in place of eth.src > 00:00:00:00:11:11/00:00:00:00:ff:ff).
 256
 257 ip4.src == ::1 => 128-bit constant is not compatible with 32-bit field ip4.src.
 258
 259 1 == eth.type == 2 => Range expressions must have the form `x < field < y' or `x > field > y', with each `<' optionally replaced by `<=' or `>' by `>=').
 260
 261 eth.dst[40] x => Extra tokens at end of input.
 262 ]])
 263 sed 's/ =>.*//' test-cases.txt > input.txt
 264 sed 's/.* => //' test-cases.txt > expout
 265 AT_CHECK([ovstest test-ovn parse-expr < input.txt], [0], [expout])
 266 AT_CLEANUP
 267
 268 AT_SETUP([ovn -- expression annotation])
 269 dnl Input precedes =>, expected output follows =>.
 270 AT_DATA([test-cases.txt], [[
 271 ip4.src == 1.2.3.4 => ip4.src == 0x1020304 && eth.type == 0x800
 272 ip4.src != 1.2.3.4 => ip4.src != 0x1020304 && eth.type == 0x800
 273 ip.proto == 123 => ip.proto == 0x7b && (eth.type == 0x800 || eth.type == 0x86dd)
 274 ip.proto == {123, 234} => (ip.proto == 0x7b && (eth.type == 0x800 || eth.type == 0x86dd)) || (ip.proto == 0xea && (eth.type == 0x800 || eth.type == 0x86dd))
 275 ip4.src == 1.2.3.4 && ip4.dst == 5.6.7.8 => ip4.src == 0x1020304 && eth.type == 0x800 && ip4.dst == 0x5060708 && eth.type == 0x800
 276
 277 ip => eth.type == 0x800 || eth.type == 0x86dd
 278 ip == 1 => eth.type == 0x800 || eth.type == 0x86dd
 279 ip[0] == 1 => eth.type == 0x800 || eth.type == 0x86dd
 280 ip > 0 => Only == and != operators may be used with nominal field ip.
 281 !ip => Nominal predicate ip may only be tested positively, e.g. `ip' or `ip == 1' but not `!ip' or `ip == 0'.
 282 ip == 0 => Nominal predicate ip may only be tested positively, e.g. `ip' or `ip == 1' but not `!ip' or `ip == 0'.
 283
 284 vlan.present => vlan.tci[12]
 285 !vlan.present => !vlan.tci[12]
 286
 287 !vlan.pcp => vlan.tci[13..15] == 0 && vlan.tci[12]
 288 vlan.pcp == 1 && vlan.vid == 2 => vlan.tci[13..15] == 0x1 && vlan.tci[12] && vlan.tci[0..11] == 0x2 && vlan.tci[12]
 289 !reg0 && !reg1 && !reg2 && !reg3 => xreg0[32..63] == 0 && xreg0[0..31] == 0 && xreg1[32..63] == 0 && xreg1[0..31] == 0
 290
 291 ip.first_frag => ip.frag[0] && (eth.type == 0x800 || eth.type == 0x86dd) && (!ip.frag[1] || (eth.type != 0x800 && eth.type != 0x86dd))
 292 !ip.first_frag => !ip.frag[0] || (eth.type != 0x800 && eth.type != 0x86dd) || (ip.frag[1] && (eth.type == 0x800 || eth.type == 0x86dd))
 293 ip.later_frag => ip.frag[1] && (eth.type == 0x800 || eth.type == 0x86dd)
 294
 295 bad_prereq != 0 => Error parsing expression `xyzzy' encountered as prerequisite or predicate of initial expression: Syntax error at `xyzzy' expecting field name.
 296 self_recurse != 0 => Error parsing expression `self_recurse != 0' encountered as prerequisite or predicate of initial expression: Recursive expansion of symbol `self_recurse'.
 297 mutual_recurse_1 != 0 => Error parsing expression `mutual_recurse_2 != 0' encountered as prerequisite or predicate of initial expression: Error parsing expression `mutual_recurse_1 != 0' encountered as prerequisite or predicate of initial expression: Recursive expansion of symbol `mutual_recurse_1'.
 298 mutual_recurse_2 != 0 => Error parsing expression `mutual_recurse_1 != 0' encountered as prerequisite or predicate of initial expression: Error parsing expression `mutual_recurse_2 != 0' encountered as prerequisite or predicate of initial expression: Recursive expansion of symbol `mutual_recurse_2'.
 299 ]])
 300 sed 's/ =>.*//' test-cases.txt > input.txt
 301 sed 's/.* => //' test-cases.txt > expout
 302 AT_CHECK([ovstest test-ovn annotate-expr < input.txt], [0], [expout])
 303 AT_CLEANUP
 304
 305 AT_SETUP([ovn -- 1-term expression conversion])
 306 AT_CHECK([ovstest test-ovn exhaustive --operation=convert 1], [0],
 307   [Tested converting all 1-terminal expressions with 2 numeric vars (each 3 bits) in terms of operators == != < <= > >= and 2 string vars.
 308 ])
 309 AT_CLEANUP
 310
 311 AT_SETUP([ovn -- 2-term expression conversion])
 312 AT_CHECK([ovstest test-ovn exhaustive --operation=convert 2], [0],
 313   [Tested converting 570 expressions of 2 terminals with 2 numeric vars (each 3 bits) in terms of operators == != < <= > >= and 2 string vars.
 314 ])
 315 AT_CLEANUP
 316
 317 AT_SETUP([ovn -- 3-term expression conversion])
 318 AT_CHECK([ovstest test-ovn exhaustive --operation=convert --bits=2 3], [0],
 319   [Tested converting 62418 expressions of 3 terminals with 2 numeric vars (each 2 bits) in terms of operators == != < <= > >= and 2 string vars.
 320 ])
 321 AT_CLEANUP
 322
 323 AT_SETUP([ovn -- 3-term numeric expression simplification])
 324 AT_CHECK([ovstest test-ovn exhaustive --operation=simplify --nvars=2 --svars=0 3], [0],
 325   [Tested simplifying 477138 expressions of 3 terminals with 2 numeric vars (each 3 bits) in terms of operators == != < <= > >=.
 326 ])
 327 AT_CLEANUP
 328
 329 AT_SETUP([ovn -- 4-term string expression simplification])
 330 AT_CHECK([ovstest test-ovn exhaustive --operation=simplify --nvars=0 --svars=4 4], [0],
 331   [Tested simplifying 21978 expressions of 4 terminals with 4 string vars.
 332 ])
 333 AT_CLEANUP
 334
 335 AT_SETUP([ovn -- 3-term mixed expression simplification])
 336 AT_CHECK([ovstest test-ovn exhaustive --operation=simplify --nvars=1 --svars=1 3], [0],
 337   [Tested simplifying 124410 expressions of 3 terminals with 1 numeric vars (each 3 bits) in terms of operators == != < <= > >= and 1 string vars.
 338 ])
 339 AT_CLEANUP
 340
 341 AT_SETUP([ovn -- 4-term numeric expression normalization])
 342 AT_CHECK([ovstest test-ovn exhaustive --operation=normalize --nvars=3 --svars=0 --bits=1 4], [0],
 343   [Tested normalizing 1207162 expressions of 4 terminals with 3 numeric vars (each 1 bits) in terms of operators == != < <= > >=.
 344 ])
 345 AT_CLEANUP
 346
 347 AT_SETUP([ovn -- 4-term string expression normalization])
 348 AT_CHECK([ovstest test-ovn exhaustive --operation=normalize --nvars=0 --svars=3 --bits=1 4], [0],
 349   [Tested normalizing 11242 expressions of 4 terminals with 3 string vars.
 350 ])
 351 AT_CLEANUP
 352
 353 AT_SETUP([ovn -- 4-term mixed expression normalization])
 354 AT_CHECK([ovstest test-ovn exhaustive --operation=normalize --nvars=1 --bits=1 --svars=2 4], [0],
 355   [Tested normalizing 128282 expressions of 4 terminals with 1 numeric vars (each 1 bits) in terms of operators == != < <= > >= and 2 string vars.
 356 ])
 357 AT_CLEANUP
 358
 359 AT_SETUP([ovn -- 5-term numeric expression normalization])
 360 AT_CHECK([ovstest test-ovn exhaustive --operation=normalize --nvars=3 --svars=0 --bits=1 --relops='==' 5], [0],
 361   [Tested normalizing 368550 expressions of 5 terminals with 3 numeric vars (each 1 bits) in terms of operators ==.
 362 ])
 363 AT_CLEANUP
 364
 365 AT_SETUP([ovn -- 5-term string expression normalization])
 366 AT_CHECK([ovstest test-ovn exhaustive --operation=normalize --nvars=0 --svars=3 --bits=1 --relops='==' 5], [0],
 367   [Tested normalizing 368550 expressions of 5 terminals with 3 string vars.
 368 ])
 369 AT_CLEANUP
 370
 371 AT_SETUP([ovn -- 5-term mixed expression normalization])
 372 AT_CHECK([ovstest test-ovn exhaustive --operation=normalize --nvars=1 --svars=1 --bits=1 --relops='==' 5], [0],
 373   [Tested normalizing 116550 expressions of 5 terminals with 1 numeric vars (each 1 bits) in terms of operators == and 1 string vars.
 374 ])
 375 AT_CLEANUP
 376
 377 AT_SETUP([ovn -- 4-term numeric expressions to flows])
 378 AT_CHECK([ovstest test-ovn exhaustive --operation=flow --nvars=2 --svars=0 --bits=2 --relops='==' 4], [0],
 379   [Tested converting to flows 128282 expressions of 4 terminals with 2 numeric vars (each 2 bits) in terms of operators ==.
 380 ])
 381 AT_CLEANUP
 382
 383 AT_SETUP([ovn -- 4-term string expressions to flows])
 384 AT_CHECK([ovstest test-ovn exhaustive --operation=flow --nvars=0 --svars=4 4], [0],
 385   [Tested converting to flows 21978 expressions of 4 terminals with 4 string vars.
 386 ])
 387 AT_CLEANUP
 388
 389 AT_SETUP([ovn -- 4-term mixed expressions to flows])
 390 AT_CHECK([ovstest test-ovn exhaustive --operation=flow --nvars=1 --bits=2 --svars=1 --relops='==' 4], [0],
 391   [Tested converting to flows 37994 expressions of 4 terminals with 1 numeric vars (each 2 bits) in terms of operators == and 1 string vars.
 392 ])
 393 AT_CLEANUP
 394
 395 AT_SETUP([ovn -- 3-term numeric expressions to flows])
 396 AT_CHECK([ovstest test-ovn exhaustive --operation=flow --nvars=3 --svars=0 --bits=3 --relops='==' 3], [0],
 397   [Tested converting to flows 38394 expressions of 3 terminals with 3 numeric vars (each 3 bits) in terms of operators ==.
 398 ])
 399 AT_CLEANUP
 400
 401 AT_SETUP([ovn -- converting expressions to flows -- string fields])
 402 expr_to_flow () {
 403     echo "$1" | ovstest test-ovn expr-to-flows | sort
 404 }
 405 AT_CHECK([expr_to_flow 'inport == "eth0"'], [0], [reg6=0x5
 406 ])
 407 AT_CHECK([expr_to_flow 'inport == "eth1"'], [0], [reg6=0x6
 408 ])
 409 AT_CHECK([expr_to_flow 'inport == "eth2"'], [0], [(no flows)
 410 ])
 411 AT_CHECK([expr_to_flow 'inport == "eth0" && ip'], [0], [dnl
 412 ip,reg6=0x5
 413 ipv6,reg6=0x5
 414 ])
 415 AT_CHECK([expr_to_flow 'inport == "eth1" && ip'], [0], [dnl
 416 ip,reg6=0x6
 417 ipv6,reg6=0x6
 418 ])
 419 AT_CHECK([expr_to_flow 'inport == "eth2" && ip'], [0], [(no flows)
 420 ])
 421 AT_CHECK([expr_to_flow 'inport == {"eth0", "eth1", "eth2", "LOCAL"}'], [0],
 422 [reg6=0x5
 423 reg6=0x6
 424 reg6=0xfffe
 425 ])
 426 AT_CHECK([expr_to_flow 'inport == {"eth0", "eth1", "eth2"} && ip'], [0], [dnl
 427 ip,reg6=0x5
 428 ip,reg6=0x6
 429 ipv6,reg6=0x5
 430 ipv6,reg6=0x6
 431 ])
 432 AT_CHECK([expr_to_flow 'inport == "eth0" && inport == "eth1"'], [0], [dnl
 433 (no flows)
 434 ])
 435 AT_CLEANUP
 436
 437 AT_SETUP([ovn -- action parsing])
 438 dnl Text before => is input, text after => is expected output.
 439 AT_DATA([test-cases.txt], [[
 440 # drop
 441 drop; => actions=drop, prereqs=1
 442 drop; next; => Syntax error at `next' expecting end of input.
 443 next; drop; => Syntax error at `drop' expecting action.
 444
 445 # output
 446 output; => actions=resubmit(,64), prereqs=1
 447
 448 # next
 449 next; => actions=resubmit(,27), prereqs=1
 450 next(0); => actions=resubmit(,16), prereqs=1
 451 next(15); => actions=resubmit(,31), prereqs=1
 452
 453 next(); => Syntax error at `)' expecting small integer.
 454 next(10; => Syntax error at `;' expecting `)'.
 455 next(16); => "next" argument must be in range 0 to 15.
 456
 457 # Loading a constant value.
 458 tcp.dst=80; => actions=set_field:80->tcp_dst, prereqs=ip.proto == 0x6 && (eth.type == 0x800 || eth.type == 0x86dd)
 459 eth.dst[40] = 1; => actions=set_field:01:00:00:00:00:00/01:00:00:00:00:00->eth_dst, prereqs=1
 460 vlan.pcp = 2; => actions=set_field:0x4000/0xe000->vlan_tci, prereqs=vlan.tci[12]
 461 vlan.tci[13..15] = 2; => actions=set_field:0x4000/0xe000->vlan_tci, prereqs=1
 462 inport = ""; => actions=set_field:0->reg6,set_field:0->in_port, prereqs=1
 463 ip.ttl = 4; => actions=set_field:4->nw_ttl, prereqs=eth.type == 0x800 || eth.type == 0x86dd
 464 outport="eth0"; next; outport="LOCAL"; next; => actions=set_field:0x5->reg7,resubmit(,27),set_field:0xfffe->reg7,resubmit(,27), prereqs=1
 465
 466 inport[1] = 1; => Cannot select subfield of string field inport.
 467 ip.proto[1] = 1; => Cannot select subfield of nominal field ip.proto.
 468 eth.dst[40] == 1; => Syntax error at `==' expecting `='.
 469 ip = 1; => Predicate symbol ip used where lvalue required.
 470 ip.proto = 6; => Field ip.proto is not modifiable.
 471 inport = {"a", "b"}; => Assignments require a single value.
 472 inport = {}; => Syntax error at `}' expecting constant.
 473 bad_prereq = 123; => Error parsing expression `xyzzy' encountered as prerequisite or predicate of initial expression: Syntax error at `xyzzy' expecting field name.
 474 self_recurse = 123; => Error parsing expression `self_recurse != 0' encountered as prerequisite or predicate of initial expression: Error parsing expression `self_recurse != 0' encountered as prerequisite or predicate of initial expression: Recursive expansion of symbol `self_recurse'.
 475 vlan.present = 0; => Predicate symbol vlan.present used where lvalue required.
 476
 477 # Moving one field into another.
 478 reg0 = reg1; => actions=move:OXM_OF_PKT_REG0[0..31]->OXM_OF_PKT_REG0[32..63], prereqs=1
 479 vlan.pcp = reg0[0..2]; => actions=move:OXM_OF_PKT_REG0[32..34]->NXM_OF_VLAN_TCI[13..15], prereqs=vlan.tci[12]
 480 reg0[10] = vlan.pcp[1]; => actions=move:NXM_OF_VLAN_TCI[14]->OXM_OF_PKT_REG0[42], prereqs=vlan.tci[12]
 481 outport = inport; => actions=move:NXM_NX_REG6[]->NXM_NX_REG7[], prereqs=1
 482
 483 reg0[0] = vlan.present; => Predicate symbol vlan.present used where lvalue required.
 484 reg0 = reg1[0..10]; => Can't assign 11-bit value to 32-bit destination.
 485 inport = reg0; => Can't assign integer field (reg0) to string field (inport).
 486 inport = big_string; => String fields inport and big_string are incompatible for assignment.
 487 ip.proto = reg0[0..7]; => Field ip.proto is not modifiable.
 488
 489 # Exchanging fields.
 490 reg0 <-> reg1; => actions=push:OXM_OF_PKT_REG0[0..31],push:OXM_OF_PKT_REG0[32..63],pop:OXM_OF_PKT_REG0[0..31],pop:OXM_OF_PKT_REG0[32..63], prereqs=1
 491 vlan.pcp <-> reg0[0..2]; => actions=push:OXM_OF_PKT_REG0[32..34],push:NXM_OF_VLAN_TCI[13..15],pop:OXM_OF_PKT_REG0[32..34],pop:NXM_OF_VLAN_TCI[13..15], prereqs=vlan.tci[12]
 492 reg0[10] <-> vlan.pcp[1]; => actions=push:NXM_OF_VLAN_TCI[14],push:OXM_OF_PKT_REG0[42],pop:NXM_OF_VLAN_TCI[14],pop:OXM_OF_PKT_REG0[42], prereqs=vlan.tci[12]
 493 outport <-> inport; => actions=push:NXM_NX_REG6[],push:NXM_NX_REG7[],pop:NXM_NX_REG6[],pop:NXM_NX_REG7[], prereqs=1
 494
 495 reg0[0] <-> vlan.present; => Predicate symbol vlan.present used where lvalue required.
 496 reg0 <-> reg1[0..10]; => Can't exchange 32-bit field with 11-bit field.
 497 inport <-> reg0; => Can't exchange string field (inport) with integer field (reg0).
 498 inport <-> big_string; => String fields inport and big_string are incompatible for exchange.
 499 ip.proto <-> reg0[0..7]; => Field ip.proto is not modifiable.
 500 reg0[0..7] <-> ip.proto; => Field ip.proto is not modifiable.
 501
 502 # TTL decrement.
 503 ip.ttl--; => actions=dec_ttl, prereqs=ip
 504 ip.ttl => Syntax error at end of input expecting `--'.
 505
 506 # conntrack
 507 ct_next; => actions=ct(table=27,zone=NXM_NX_REG5[0..15]), prereqs=ip
 508 ct_commit; => actions=ct(commit,zone=NXM_NX_REG5[0..15]), prereqs=ip
 509
 510 # arp
 511 arp { eth.dst = ff:ff:ff:ff:ff:ff; output; }; => actions=controller(userdata=00.00.00.00.00.00.00.00.00.19.00.10.80.00.06.06.ff.ff.ff.ff.ff.ff.00.00.ff.ff.00.10.00.00.23.20.00.0e.ff.f8.40.00.00.00), prereqs=ip4
 512
 513 # get_arp
 514 get_arp(outport, ip4.dst); => actions=push:NXM_NX_REG0[],push:NXM_OF_IP_DST[],pop:NXM_NX_REG0[],set_field:00:00:00:00:00:00->eth_dst,resubmit(,65),pop:NXM_NX_REG0[], prereqs=eth.type == 0x800
 515 get_arp(inport, reg0); => actions=push:NXM_NX_REG7[],push:NXM_NX_REG0[],push:OXM_OF_PKT_REG0[32..63],push:NXM_NX_REG6[],pop:NXM_NX_REG7[],pop:NXM_NX_REG0[],set_field:00:00:00:00:00:00->eth_dst,resubmit(,65),pop:NXM_NX_REG0[],pop:NXM_NX_REG7[], prereqs=1
 516 get_arp; => Syntax error at `;' expecting `('.
 517 get_arp(); => Syntax error at `)' expecting field name.
 518 get_arp(inport); => Syntax error at `)' expecting `,'.
 519 get_arp(inport ip4.dst); => Syntax error at `ip4.dst' expecting `,'.
 520 get_arp(inport, ip4.dst; => Syntax error at `;' expecting `)'.
 521 get_arp(inport, eth.dst); => Cannot use 48-bit field eth.dst[0..47] where 32-bit field is required.
 522 get_arp(inport, outport); => Cannot use string field outport where numeric field is required.
 523 get_arp(reg0, ip4.dst); => Cannot use numeric field reg0 where string field is required.
 524
 525 # put_arp
 526 put_arp(inport, arp.spa, arp.sha); => actions=push:NXM_NX_REG0[],push:NXM_OF_ETH_SRC[],push:NXM_NX_ARP_SHA[],push:NXM_OF_ARP_SPA[],pop:NXM_NX_REG0[],pop:NXM_OF_ETH_SRC[],controller(userdata=00.00.00.01.00.00.00.00),pop:NXM_OF_ETH_SRC[],pop:NXM_NX_REG0[], prereqs=eth.type == 0x806 && eth.type == 0x806
 527
 528 # Contradictionary prerequisites (allowed but not useful):
 529 ip4.src = ip6.src[0..31]; => actions=move:NXM_NX_IPV6_SRC[0..31]->NXM_OF_IP_SRC[], prereqs=eth.type == 0x800 && eth.type == 0x86dd
 530 ip4.src <-> ip6.src[0..31]; => actions=push:NXM_NX_IPV6_SRC[0..31],push:NXM_OF_IP_SRC[],pop:NXM_NX_IPV6_SRC[0..31],pop:NXM_OF_IP_SRC[], prereqs=eth.type == 0x800 && eth.type == 0x86dd
 531
 532 ## Miscellaneous negative tests.
 533 ; => Syntax error at `;'.
 534 xyzzy; => Syntax error at `xyzzy' expecting action.
 535 next; 123; => Syntax error at `123'.
 536 next; xyzzy; => Syntax error at `xyzzy' expecting action.
 537 next => Syntax error at end of input expecting ';'.
 538 ]])
 539 sed 's/ =>.*//' test-cases.txt > input.txt
 540 sed 's/.* => //' test-cases.txt > expout
 541 AT_CHECK([ovstest test-ovn parse-actions < input.txt], [0], [expout])
 542 AT_CLEANUP
 543
 544 AT_BANNER([OVN end-to-end tests])
 545
 546 # 3 hypervisors, one logical switch, 3 logical ports per hypervisor
 547 AT_SETUP([ovn -- 3 HVs, 1 LS, 3 lports/HV])
 548 AT_KEYWORDS([ovnarp])
 549 AT_SKIP_IF([test $HAVE_PYTHON = no])
 550 ovn_start
 551
 552 # Create hypervisors hv[123].
 553 # Add vif1[123] to hv1, vif2[123] to hv2, vif3[123] to hv3.
 554 # Add all of the vifs to a single logical switch lsw0.
 555 # Turn on port security on all the vifs except vif[123]1.
 556 # Make vif13, vif2[23], vif3[123] destinations for unknown MACs.
 557 # Add some ACLs for Ethertypes 1234, 1235, 1236.
 558 ovn-nbctl lswitch-add lsw0
 559 net_add n1
 560 for i in 1 2 3; do
 561     sim_add hv$i
 562     as hv$i
 563     ovs-vsctl add-br br-phys
 564     ovn_attach n1 br-phys 192.168.0.$i
 565
 566     for j in 1 2 3; do
 567         ovs-vsctl add-port br-int vif$i$j -- set Interface vif$i$j external-ids:iface-id=lp$i$j options:tx_pcap=hv$i/vif$i$j-tx.pcap options:rxq_pcap=hv$i/vif$i$j-rx.pcap ofport-request=$i$j
 568         ovn-nbctl lport-add lsw0 lp$i$j
 569         if test $j = 1; then
 570             ovn-nbctl lport-set-addresses lp$i$j "f0:00:00:00:00:$i$j 192.168.0.$i$j" unknown
 571         else
 572             if test $j = 3; then
 573                 ip_addrs="192.168.0.$i$j fe80::ea2a:eaff:fe28:$i$j/64 192.169.0.$i$j"
 574             else
 575                 ip_addrs="192.168.0.$i$j"
 576             fi
 577             ovn-nbctl lport-set-addresses lp$i$j "f0:00:00:00:00:$i$j $ip_addrs"
 578             ovn-nbctl lport-set-port-security lp$i$j f0:00:00:00:00:$i$j
 579         fi
 580     done
 581 done
 582 ovn-nbctl acl-add lsw0 from-lport 1000 'eth.type == 0x1234' drop
 583 ovn-nbctl acl-add lsw0 from-lport 1000 'eth.type == 0x1235 && inport == "lp11"' drop
 584 ovn-nbctl acl-add lsw0 to-lport 1000 'eth.type == 0x1236 && outport == "lp33"' drop
 585
 586 # Pre-populate the hypervisors' ARP tables so that we don't lose any
 587 # packets for ARP resolution (native tunneling doesn't queue packets
 588 # for ARP resolution).
 589 ovn_populate_arp
 590
 591 # Allow some time for ovn-northd and ovn-controller to catch up.
 592 # XXX This should be more systematic.
 593 sleep 1
 594
 595 # Given the name of a logical port, prints the name of the hypervisor
 596 # on which it is located.
 597 vif_to_hv() {
 598     echo hv${1%?}
 599 }
 600
 601 # test_packet INPORT DST SRC ETHTYPE OUTPORT...
 602 #
 603 # This shell function causes a packet to be received on INPORT.  The packet's
 604 # content has Ethernet destination DST and source SRC (each exactly 12 hex
 605 # digits) and Ethernet type ETHTYPE (4 hex digits).  The OUTPORTs (zero or
 606 # more) list the VIFs on which the packet should be received.  INPORT and the
 607 # OUTPORTs are specified as lport numbers, e.g. 11 for vif11.
 608 trim_zeros() {
 609     sed 's/\(00\)\{1,\}$//'
 610 }
 611 for i in 1 2 3; do
 612     for j in 1 2 3; do
 613         : > $i$j.expected
 614     done
 615 done
 616 test_packet() {
 617     local inport=$1 packet=$2$3$4; shift; shift; shift; shift
 618     hv=`vif_to_hv $inport`
 619     vif=vif$inport
 620     as $hv ovs-appctl netdev-dummy/receive $vif $packet
 621     for outport; do
 622         echo $packet | trim_zeros >> $outport.expected
 623     done
 624 }
 625
 626 # test_arp INPORT SHA SPA TPA [REPLY_HA]
 627 #
 628 # Causes a packet to be received on INPORT.  The packet is an ARP
 629 # request with SHA, SPA, and TPA as specified.  If REPLY_HA is provided, then
 630 # it should be the hardware address of the target to expect to receive in an
 631 # ARP reply; otherwise no reply is expected.
 632 #
 633 # INPORT is an lport number, e.g. 11 for vif11.
 634 # SHA and REPLY_HA are each 12 hex digits.
 635 # SPA and TPA are each 8 hex digits.
 636 test_arp() {
 637     local inport=$1 sha=$2 spa=$3 tpa=$4 reply_ha=$5
 638     local request=ffffffffffff${sha}08060001080006040001${sha}${spa}ffffffffffff${tpa}
 639     hv=`vif_to_hv $inport`
 640     as $hv ovs-appctl netdev-dummy/receive vif$inport $request
 641
 642     if test X$reply_ha = X; then
 643         # Expect to receive the broadcast ARP on the other logical switch ports
 644         # if no reply is expected.
 645         local i j
 646         for i in 1 2 3; do
 647             for j in 1 2 3; do
 648                 if test $i$j != $inport; then
 649                     echo $request >> $i$j.expected
 650                 fi
 651             done
 652         done
 653     else
 654         # Expect to receive the reply, if any.
 655         local reply=${sha}${reply_ha}08060001080006040002${reply_ha}${tpa}${sha}${spa}
 656         echo $reply >> $inport.expected
 657     fi
 658 }
 659
 660 ip_to_hex() {
 661     printf "%02x%02x%02x%02x" "$@"
 662 }
 663
 664 # Send packets between all pairs of source and destination ports:
 665 #
 666 # 1. Unicast packets are delivered to exactly one lport (except that packets
 667 #    destined to their input ports are dropped).
 668 #
 669 # 2. Broadcast and multicast are delivered to all lports except the input port.
 670 #
 671 # 3. When port security is turned on, the lswitch drops packets from the wrong
 672 #    MAC address.
 673 #
 674 # 4. The lswitch drops all packets with a VLAN tag.
 675 #
 676 # 5. The lswitch drops all packets with a multicast source address.  (This only
 677 #    affects behavior when port security is turned off, since otherwise port
 678 #    security would drop the packet anyway.)
 679 #
 680 # 6. The lswitch delivers packets with an unknown destination to lports with
 681 #    "unknown" among their MAC addresses (and port security disabled).
 682 #
 683 # 7. The lswitch drops unicast packets that violate an ACL.
 684 #
 685 # 8. The lswitch drops multicast and broadcast packets that violate an ACL.
 686 #
 687 # 9. ARP requests to known IPs are responded directly.
 688 #
 689 # 10. No response to ARP requests for unknown IPs.
 690 for is in 1 2 3; do
 691     for js in 1 2 3; do
 692         s=$is$js
 693         bcast=
 694         unknown=
 695         bacl2=
 696         bacl3=
 697         for id in 1 2 3; do
 698             for jd in 1 2 3; do
 699                 d=$id$jd
 700
 701                 if test $d != $s; then unicast=$d; else unicast=; fi
 702                 test_packet $s f000000000$d f000000000$s $s$d $unicast     #1
 703
 704                 if test $d != $s && test $js = 1; then
 705                     impersonate=$d
 706                 else
 707                     impersonate=
 708                 fi
 709                 test_packet $s f000000000$d f00000000055 55$d $impersonate #3
 710
 711                 if test $d != $s && test $s != 11; then acl2=$d; else acl2=; fi
 712                 if test $d != $s && test $d != 33; then acl3=$d; else acl3=; fi
 713                 test_packet $s f000000000$d f000000000$s 1234        #7, acl1
 714                 test_packet $s f000000000$d f000000000$s 1235 $acl2  #7, acl2
 715                 test_packet $s f000000000$d f000000000$s 1236 $acl3  #7, acl3
 716
 717                 test_packet $s f000000000$d f00000000055 810000091234      #4
 718                 test_packet $s f000000000$d 0100000000$s $s$d              #5
 719
 720                 if test $d != $s && test $jd = 1; then
 721                     unknown="$unknown $d"
 722                 fi
 723                 bcast="$bcast $unicast"
 724                 bacl2="$bacl2 $acl2"
 725                 bacl3="$bacl3 $acl3"
 726
 727                 sip=`ip_to_hex 192 168 0 $i$j`
 728                 tip=`ip_to_hex 192 168 0 $id$jd`
 729                 tip_unknown=`ip_to_hex 11 11 11 11`
 730                 test_arp $s f000000000$s $sip $tip f000000000$d            #9
 731                 test_arp $s f000000000$s $sip $tip_unknown                 #10
 732
 733                 if test $jd = 3; then
 734                     # lport[123]3 has an additional ip 192.169.0.[123]3.
 735                     tip=`ip_to_hex 192 169 0 $id$jd`
 736                     test_arp $s f000000000$s $sip $tip f000000000$d        #9
 737                 fi
 738             done
 739         done
 740
 741         # Broadcast and multicast.
 742         test_packet $s ffffffffffff f000000000$s ${s}ff $bcast             #2
 743         test_packet $s 010000000000 f000000000$s ${s}ff $bcast             #2
 744         if test $js = 1; then
 745             bcast_impersonate=$bcast
 746         else
 747             bcast_impersonate=
 748         fi
 749         test_packet $s 010000000000 f00000000044 44ff $bcast_impersonate   #3
 750
 751         test_packet $s f0000000ffff f000000000$s ${s}66 $unknown           #6
 752
 753         test_packet $s ffffffffffff f000000000$s 1234                #8, acl1
 754         test_packet $s ffffffffffff f000000000$s 1235 $bacl2         #8, acl2
 755         test_packet $s ffffffffffff f000000000$s 1236 $bacl3         #8, acl3
 756         test_packet $s 010000000000 f000000000$s 1234                #8, acl1
 757         test_packet $s 010000000000 f000000000$s 1235 $bacl2         #8, acl2
 758         test_packet $s 010000000000 f000000000$s 1236 $bacl3         #8, acl3
 759     done
 760 done
 761
 762 # set address for lp13 with invalid characters.
 763 # lp13 should be configured with only 192.168.0.13.
 764 ovn-nbctl lport-set-addresses lp13 "f0:00:00:00:00:13 192.168.0.13 invalid 192.169.0.13"
 765 sip=`ip_to_hex 192 168 0 11`
 766 tip=`ip_to_hex 192 168 0 13`
 767 test_arp 11 f00000000011  $sip $tip f00000000013
 768
 769 tip=`ip_to_hex 192 169 0 13`
 770 #arp request for 192.169.0.13 should be flooded
 771 test_arp 11 f00000000011  $sip $tip
 772
 773 # Allow some time for packet forwarding.
 774 # XXX This can be improved.
 775 sleep 1
 776
 777 # dump infomration and flows with counters
 778 ovn-sbctl dump-flows -- list multicast_group
 779
 780 echo "------ hv1 dump ------"
 781 as hv1 ovs-vsctl show
 782 as hv1 ovs-ofctl -O OpenFlow13 dump-flows br-int
 783
 784 echo "------ hv2 dump ------"
 785 as hv2 ovs-vsctl show
 786 as hv2 ovs-ofctl -O OpenFlow13 dump-flows br-int
 787
 788 echo "------ hv3 dump ------"
 789 as hv3 ovs-vsctl show
 790 as hv3 ovs-ofctl -O OpenFlow13 dump-flows br-int
 791 # Now check the packets actually received against the ones expected.
 792 for i in 1 2 3; do
 793     for j in 1 2 3; do
 794         file=hv$i/vif$i$j-tx.pcap
 795         echo $file
 796         $PYTHON "$top_srcdir/utilities/ovs-pcap.in" $file | trim_zeros > $i$j.packets
 797         sort $i$j.expected > expout
 798         AT_CHECK([sort $i$j.packets], [0], [expout])
 799         echo
 800     done
 801 done
 802
 803 # Gracefully terminate daemons
 804 for sim in hv1 hv2 hv3; do
 805     as $sim
 806     OVS_APP_EXIT_AND_WAIT([ovn-controller])
 807     OVS_APP_EXIT_AND_WAIT([ovs-vswitchd])
 808     OVS_APP_EXIT_AND_WAIT([ovsdb-server])
 809 done
 810
 811 as ovn-sb
 812 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
 813
 814 as ovn-nb
 815 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
 816
 817 as northd
 818 OVS_APP_EXIT_AND_WAIT([ovn-northd])
 819
 820 as main
 821 OVS_APP_EXIT_AND_WAIT([ovs-vswitchd])
 822 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
 823
 824 AT_CLEANUP
 825
 826 # 2 hypervisors, 4 logical ports per HV
 827 # 2 locally attached networks (one flat, one vlan tagged over same device)
 828 # 2 ports per HV on each network
 829 AT_SETUP([ovn -- 2 HVs, 4 lports/HV, localnet ports])
 830 AT_KEYWORDS([ovn-localnet])
 831 AT_SKIP_IF([test $HAVE_PYTHON = no])
 832 ovn_start
 833
 834 # In this test cases we create 3 lswitches, all connected to same
 835 # physical network (through br-phys on each HV). Each lswitch has
 836 # VIF ports across 2 HVs. Each HV has 5 VIF ports. The first digit
 837 # of VIF port name indicates the hypervisor it is bound to, e.g.
 838 # lp23 means VIF 3 on hv2.
 839 #
 840 # lswitch's VLAN tag and their lports are:
 841 #   - ls1:
 842 #       - untagged
 843 #       - lports: lp11, lp12, lp21, lp22
 844 #
 845 #   - ls2:
 846 #       - tagged with VLAN 101
 847 #       - lports: lp13, lp14, lp23, lp24
 848 #   - ls3:
 849 #       - untagged
 850 #       - lports: lp15, lp25
 851 #
 852 # Note: a localnet port is created for each lswitch to connect to
 853 # physical network.
 854
 855 for i in 1 2 3; do
 856     lswitch_name=ls$i
 857     ovn-nbctl lswitch-add $lswitch_name
 858     ln_port_name=ln$i
 859     if test $i -eq 2; then
 860         ovn-nbctl lport-add $lswitch_name $ln_port_name "" 101
 861     else
 862         ovn-nbctl lport-add $lswitch_name $ln_port_name
 863     fi
 864     ovn-nbctl lport-set-addresses $ln_port_name unknown
 865     ovn-nbctl lport-set-type $ln_port_name localnet
 866     ovn-nbctl lport-set-options $ln_port_name network_name=phys
 867 done
 868
 869 net_add n1
 870 for i in 1 2; do
 871     sim_add hv$i
 872     as hv$i
 873     ovs-vsctl add-br br-phys
 874     ovs-vsctl set open . external-ids:ovn-bridge-mappings=phys:br-phys
 875     ovn_attach n1 br-phys 192.168.0.$i
 876
 877     for j in 1 2 3 4 5; do
 878         ovs-vsctl add-port br-int vif$i$j -- \
 879             set Interface vif$i$j external-ids:iface-id=lp$i$j \
 880                                   options:tx_pcap=hv$i/vif$i$j-tx.pcap \
 881                                   options:rxq_pcap=hv$i/vif$i$j-rx.pcap \
 882                                   ofport-request=$i$j
 883
 884         lport_name=lp$i$j
 885         if test $j -le 2; then
 886             lswitch_name=ls1
 887         elif test $j -le 4; then
 888             lswitch_name=ls2
 889         else
 890             lswitch_name=ls3
 891         fi
 892
 893         ovn-nbctl lport-add $lswitch_name $lport_name
 894         ovn-nbctl lport-set-addresses $lport_name f0:00:00:00:00:$i$j
 895         ovn-nbctl lport-set-port-security $lport_name f0:00:00:00:00:$i$j
 896
 897         OVS_WAIT_UNTIL([test x`ovn-nbctl lport-get-up $lport_name` = xup])
 898     done
 899 done
 900
 901 ovn_populate_arp
 902
 903 # XXX This is now the 3rd copy of these functions in this file ...
 904
 905 # Given the name of a logical port, prints the name of the hypervisor
 906 # on which it is located.
 907 vif_to_hv() {
 908     echo hv${1%?}
 909 }
 910 #
 911 # test_packet INPORT DST SRC ETHTYPE OUTPORT...
 912 #
 913 # This shell function causes a packet to be received on INPORT.  The packet's
 914 # content has Ethernet destination DST and source SRC (each exactly 12 hex
 915 # digits) and Ethernet type ETHTYPE (4 hex digits).  The OUTPORTs (zero or
 916 # more) list the VIFs on which the packet should be received.  INPORT and the
 917 # OUTPORTs are specified as lport numbers, e.g. 11 for vif11.
 918 trim_zeros() {
 919     sed 's/\(00\)\{1,\}$//'
 920 }
 921 for i in 1 2; do
 922     for j in 1 2 3 4 5; do
 923         : > $i$j.expected
 924     done
 925 done
 926 test_packet() {
 927     local inport=$1 src=$2 dst=$3 eth=$4; shift; shift; shift; shift
 928     local packet=${src}${dst}${eth}
 929     hv=`vif_to_hv $inport`
 930     vif=vif$inport
 931     as $hv ovs-appctl netdev-dummy/receive $vif $packet
 932     for outport; do
 933         echo $packet | trim_zeros >> $outport.expected
 934     done
 935 }
 936
 937 # lp11 and lp21 are on the same network (phys, untagged)
 938 # and on different hypervisors
 939 test_packet 11 f00000000021 f00000000011 1121 21
 940 test_packet 21 f00000000011 f00000000021 2111 11
 941
 942 # lp11 and lp12 are on the same network (phys, untagged)
 943 # and on the same hypervisor
 944 test_packet 11 f00000000012 f00000000011 1112 12
 945 test_packet 12 f00000000011 f00000000012 1211 11
 946
 947 # lp13 and lp23 are on the same network (phys, VLAN 101)
 948 # and on different hypervisors
 949 test_packet 13 f00000000023 f00000000013 1323 23
 950 test_packet 23 f00000000013 f00000000023 2313 13
 951
 952 # lp13 and lp14 are on the same network (phys, VLAN 101)
 953 # and on the same hypervisor
 954 test_packet 13 f00000000014 f00000000013 1314 14
 955 test_packet 14 f00000000013 f00000000014 1413 13
 956
 957 # lp11 and lp15 are on the same network (phys, untagged),
 958 # same hypervisor, and on different lswitches
 959 test_packet 11 f00000000015 f00000000011 1115 15
 960 test_packet 15 f00000000011 f00000000015 1511 11
 961
 962 # lp11 and lp25 are on the same network (phys, untagged),
 963 # different hypervisors, and on different lswitches
 964 test_packet 11 f00000000025 f00000000011 1125 25
 965 test_packet 25 f00000000011 f00000000025 2511 11
 966
 967 # Ports that should not be able to communicate
 968 test_packet 11 f00000000013 f00000000011 1113
 969 test_packet 11 f00000000023 f00000000011 1123
 970 test_packet 21 f00000000013 f00000000021 2113
 971 test_packet 21 f00000000023 f00000000021 2123
 972 test_packet 13 f00000000011 f00000000013 1311
 973 test_packet 13 f00000000021 f00000000013 1321
 974 test_packet 23 f00000000011 f00000000023 2311
 975 test_packet 23 f00000000021 f00000000023 2321
 976
 977 # Allow some time for packet forwarding.
 978 # XXX This can be improved.
 979 sleep 1
 980
 981 # Dump a bunch of info helpful for debugging if there's a failure.
 982
 983 echo "------ OVN dump ------"
 984 ovn-nbctl show
 985 ovn-sbctl show
 986
 987 echo "------ hv1 dump ------"
 988 as hv1 ovs-vsctl show
 989 as hv1 ovs-ofctl -O OpenFlow13 dump-flows br-int
 990
 991 echo "------ hv2 dump ------"
 992 as hv2 ovs-vsctl show
 993 as hv2 ovs-ofctl -O OpenFlow13 dump-flows br-int
 994
 995 # Now check the packets actually received against the ones expected.
 996 for i in 1 2; do
 997     for j in 1 2 3 4 5; do
 998         file=hv$i/vif$i$j-tx.pcap
 999         echo $file
1000         $PYTHON "$top_srcdir/utilities/ovs-pcap.in" $file | trim_zeros > $i$j.packets
1001         sort $i$j.expected > expout
1002         AT_CHECK([sort $i$j.packets], [0], [expout])
1003         echo
1004     done
1005 done
1006
1007 # Gracefully terminate daemons
1008 for sim in hv1 hv2; do
1009     as $sim
1010     OVS_APP_EXIT_AND_WAIT([ovn-controller])
1011     OVS_APP_EXIT_AND_WAIT([ovs-vswitchd])
1012     OVS_APP_EXIT_AND_WAIT([ovsdb-server])
1013 done
1014
1015 as ovn-sb
1016 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
1017
1018 as ovn-nb
1019 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
1020
1021 as northd
1022 OVS_APP_EXIT_AND_WAIT([ovn-northd])
1023
1024 as main
1025 OVS_APP_EXIT_AND_WAIT([ovs-vswitchd])
1026 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
1027 AT_CLEANUP
1028
1029 AT_SETUP([ovn -- 3 HVs, 1 VIFs/HV, 1 GW, 1 LS])
1030 AT_SKIP_IF([test $HAVE_PYTHON = no])
1031 ovn_start
1032
1033 # Configure the Northbound database
1034 ovn-nbctl lswitch-add lsw0
1035
1036 ovn-nbctl lport-add lsw0 lp1
1037 ovn-nbctl lport-set-addresses lp1 f0:00:00:00:00:01
1038
1039 ovn-nbctl lport-add lsw0 lp2
1040 ovn-nbctl lport-set-addresses lp2 f0:00:00:00:00:02
1041
1042 ovn-nbctl lport-add lsw0 lp-vtep
1043 ovn-nbctl lport-set-type lp-vtep vtep
1044 ovn-nbctl lport-set-options lp-vtep vtep-physical-switch=br-vtep vtep-logical-switch=lsw0
1045 ovn-nbctl lport-set-addresses lp-vtep unknown
1046
1047 net_add n1               # Network to connect hv1, hv2, and vtep
1048 net_add n2               # Network to connect vtep and hv3
1049
1050 # Create hypervisor hv1 connected to n1
1051 sim_add hv1
1052 as hv1
1053 ovs-vsctl add-br br-phys
1054 ovn_attach n1 br-phys 192.168.0.1
1055 ovs-vsctl add-port br-int vif1 -- set Interface vif1 external-ids:iface-id=lp1 options:tx_pcap=hv1/vif1-tx.pcap options:rxq_pcap=hv1/vif1-rx.pcap ofport-request=1
1056
1057 # Create hypervisor hv2 connected to n1
1058 sim_add hv2
1059 as hv2
1060 ovs-vsctl add-br br-phys
1061 ovn_attach n1 br-phys 192.168.0.2
1062 ovs-vsctl add-port br-int vif2 -- set Interface vif2 external-ids:iface-id=lp2 options:tx_pcap=hv2/vif2-tx.pcap options:rxq_pcap=hv2/vif2-rx.pcap ofport-request=1
1063
1064
1065 # Start the vtep emulator with a leg in both networks
1066 sim_add vtep
1067 as vtep
1068
1069 ovsdb-tool create "$ovs_base"/vtep/vtep.db "$abs_top_srcdir"/vtep/vtep.ovsschema || return 1
1070 ovs-appctl -t ovsdb-server ovsdb-server/add-db "$ovs_base"/vtep/vtep.db
1071
1072 ovs-vsctl add-br br-phys
1073 net_attach n1 br-phys
1074
1075 mac=`ovs-vsctl get Interface br-phys mac_in_use | sed s/\"//g`
1076 arp_table="$arp_table $sandbox,br-phys,192.168.0.3,$mac"
1077 ovs-appctl netdev-dummy/ip4addr br-phys 192.168.0.3/24 >/dev/null || return 1
1078 ovs-appctl ovs/route/add 192.168.0.3/24 br-phys >/dev/null || return 1
1079
1080 ovs-vsctl add-br br-vtep
1081 net_attach n2 br-vtep
1082
1083 vtep-ctl add-ps br-vtep
1084 vtep-ctl set Physical_Switch br-vtep tunnel_ips=192.168.0.3
1085 vtep-ctl add-ls lsw0
1086
1087 start_daemon ovs-vtep br-vtep
1088 start_daemon ovn-controller-vtep --vtep-db=unix:"$ovs_base"/vtep/db.sock --ovnsb-db=unix:"$ovs_base"/ovn-sb/ovn-sb.sock
1089
1090 sleep 1
1091
1092 vtep-ctl bind-ls br-vtep br-vtep_n2 0 lsw0
1093
1094 sleep 1
1095
1096 # Add hv3 on the other side of the vtep
1097 sim_add hv3
1098 as hv3
1099 ovs-vsctl add-br br-phys
1100 net_attach n2 br-phys
1101
1102 ovs-vsctl add-port br-phys vif3 -- set Interface vif3 options:tx_pcap=hv3/vif3-tx.pcap options:rxq_pcap=hv3/vif3-rx.pcap ofport-request=1
1103
1104 # Pre-populate the hypervisors' ARP tables so that we don't lose any
1105 # packets for ARP resolution (native tunneling doesn't queue packets
1106 # for ARP resolution).
1107 ovn_populate_arp
1108
1109 # Allow some time for ovn-northd and ovn-controller to catch up.
1110 # XXX This should be more systematic.
1111 sleep 1
1112
1113 # test_packet INPORT DST SRC ETHTYPE OUTPORT...
1114 #
1115 # This shell function causes a packet to be received on INPORT.  The packet's
1116 # content has Ethernet destination DST and source SRC (each exactly 12 hex
1117 # digits) and Ethernet type ETHTYPE (4 hex digits).  The OUTPORTs (zero or
1118 # more) list the VIFs on which the packet should be received.  INPORT and the
1119 # OUTPORTs are specified as lport numbers, e.g. 1 for vif1.
1120 trim_zeros() {
1121     sed 's/\(00\)\{1,\}$//'
1122 }
1123 for i in 1 2 3; do
1124     : > $i.expected
1125 done
1126 test_packet() {
1127     local inport=$1 packet=$2$3$4; shift; shift; shift; shift
1128     #hv=hv`echo $inport | sed 's/^\(.\).*/\1/'`
1129     hv=hv$inport
1130     vif=vif$inport
1131     as $hv ovs-appctl netdev-dummy/receive $vif $packet
1132     for outport; do
1133         echo $packet | trim_zeros >> $outport.expected
1134     done
1135 }
1136
1137 # Send packets between all pairs of source and destination ports:
1138 #
1139 # 1. Unicast packets are delivered to exactly one lport (except that packets
1140 #    destined to their input ports are dropped).
1141 #
1142 # 2. Broadcast and multicast are delivered to all lports except the input port.
1143 #
1144 # 3. The lswitch delivers packets with an unknown destination to lports with
1145 #    "unknown" among their MAC addresses (and port security disabled).
1146 for s in 1 2 3; do
1147     bcast=
1148     unknown=
1149     for d in 1 2 3; do
1150         if test $d != $s; then unicast=$d; else unicast=; fi
1151         test_packet $s f0000000000$d f0000000000$s 00$s$d $unicast       #1
1152
1153         # The vtep (vif3) is the only one configured for "unknown"
1154         if test $d != $s && test $d = 3; then
1155             unknown="$unknown $d"
1156         fi
1157         bcast="$bcast $unicast"
1158     done
1159
1160     # Broadcast and multicast.
1161     # xxx ovn-controller-vtep doesn't handle multicast traffic that is
1162     # xxx sourced from the gateway properly.
1163     #test_packet $s ffffffffffff f0000000000$s 0${s}ff $bcast             #2
1164     #test_packet $s 010000000000 f0000000000$s 0${s}ff $bcast             #2
1165
1166     test_packet $s f0000000ffff f0000000000$s 0${s}66 $unknown           #3
1167 done
1168
1169 # Allow some time for packet forwarding.
1170 # XXX This can be improved.
1171 sleep 1
1172
1173 # dump information with counters
1174 echo "------ OVN dump ------"
1175 ovn-nbctl show
1176 ovn-sbctl show
1177
1178 echo "------ hv1 dump ------"
1179 as hv1 ovs-vsctl show
1180 as hv1 ovs-ofctl -O OpenFlow13 dump-flows br-int
1181
1182 echo "------ hv2 dump ------"
1183 as hv2 ovs-vsctl show
1184 as hv2 ovs-ofctl -O OpenFlow13 dump-flows br-int
1185
1186 echo "------ hv3 dump ------"
1187 as hv3 ovs-vsctl show
1188 as hv3 ovs-ofctl -O OpenFlow13 dump-flows br-int
1189
1190 # Now check the packets actually received against the ones expected.
1191 for i in 1 2 3; do
1192     file=hv$i/vif$i-tx.pcap
1193     echo $file
1194     $PYTHON "$top_srcdir/utilities/ovs-pcap.in" $file | trim_zeros > $i.packets
1195     sort $i.expected > expout
1196     AT_CHECK([sort $i.packets], [0], [expout])
1197     echo
1198 done
1199
1200 # Gracefully terminate daemons
1201 as vtep
1202 OVS_APP_EXIT_AND_WAIT([ovn-controller-vtep])
1203 OVS_APP_EXIT_AND_WAIT([ovs-vtep])
1204
1205 as hv1
1206 OVS_APP_EXIT_AND_WAIT([ovn-controller])
1207
1208 as hv2
1209 OVS_APP_EXIT_AND_WAIT([ovn-controller])
1210
1211 as ovn-sb
1212 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
1213
1214 as ovn-nb
1215 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
1216
1217 as northd
1218 OVS_APP_EXIT_AND_WAIT([ovn-northd])
1219
1220 for sim in hv1 hv2 hv3 vtep main; do
1221     as $sim
1222     for daemon in ovs-vswitchd ovsdb-server; do
1223         OVS_APP_EXIT_AND_WAIT([$daemon])
1224     done
1225 done
1226 AT_CLEANUP
1227
1228 # 3 hypervisors, 3 logical switches with 3 logical ports each, 1 logical router
1229 AT_SETUP([ovn -- 3 HVs, 3 LS, 3 lports/LS, 1 LR])
1230 AT_SKIP_IF([test $HAVE_PYTHON = no])
1231 ovn_start
1232
1233 # Logical network:
1234 #
1235 # Three logical switches ls1, ls2, ls3.
1236 # One logical router lr0 connected to ls[123],
1237 # with nine subnets, three per logical switch:
1238 #
1239 #    lrp11 on ls1 for subnet 192.168.11.0/24
1240 #    lrp12 on ls1 for subnet 192.168.12.0/24
1241 #    lrp13 on ls1 for subnet 192.168.13.0/24
1242 #    ...
1243 #    lrp33 on ls3 for subnet 192.168.33.0/24
1244 #
1245 # 27 VIFs, 9 per LS, 3 per subnet: lp[123][123][123], where the first two
1246 # digits are the subnet and the last digit distinguishes the VIF.
1247 for i in 1 2 3; do
1248     ovn-nbctl lswitch-add ls$i
1249     for j in 1 2 3; do
1250         for k in 1 2 3; do
1251             # Add "unknown" to MAC addresses for lp?11, so packets for
1252             # MAC-IP bindings discovered via ARP later have somewhere to go.
1253             if test $j$k = 11; then unknown=unknown; else unknown=; fi
1254
1255             ovn-nbctl \
1256                 -- lport-add ls$i lp$i$j$k \
1257                 -- lport-set-addresses lp$i$j$k "f0:00:00:00:0$i:$j$k 192.168.$i$j.$k" $unknown
1258         done
1259     done
1260 done
1261
1262 ovn-nbctl create Logical_Router name=lr0
1263 for i in 1 2 3; do
1264     for j in 1 2 3; do
1265         lrp_uuid=`ovn-nbctl \
1266             -- --id=@lrp create Logical_Router_Port name=lrp$i$j \
1267                network=192.168.$i$j.254/24 mac='"00:00:00:00:ff:'$i$j'"' \
1268             -- add Logical_Router lr0 ports @lrp \
1269             -- lport-add ls$i lrp$i$j-attachment`
1270         ovn-nbctl \
1271             set Logical_Port lrp$i$j-attachment type=router \
1272                              options:router-port=lrp$i$j \
1273                              addresses='"00:00:00:00:ff:'$i$j'"'
1274     done
1275 done
1276
1277 ovn-nbctl set Logical_Port lrp33-attachment \
1278     addresses='"00:00:00:00:ff:33 192.168.33.254"'
1279
1280 # Physical network:
1281 #
1282 # Three hypervisors hv[123].
1283 # lp?1[123] spread across hv[123]: lp?11 on hv1, lp?12 on hv2, lp?13 on hv3.
1284 # lp?2[123] spread across hv[23]: lp?21 and lp?22 on hv2, lp?23 on hv3.
1285 # lp?3[123] all on hv3.
1286
1287
1288 # Given the name of a logical port, prints the name of the hypervisor
1289 # on which it is located.
1290 vif_to_hv() {
1291     case $1 in dnl (
1292         ?11) echo 1 ;; dnl (
1293         ?12 | ?21 | ?22) echo 2 ;; dnl (
1294         ?13 | ?23 | ?3?) echo 3 ;;
1295     esac
1296 }
1297
1298 # Given the name of a logical port, prints the name of its logical router
1299 # port, e.g. "vif_to_lrp 123" yields 12.
1300 vif_to_lrp() {
1301     echo ${1%?}
1302 }
1303
1304 # Given the name of a logical port, prints the name of its logical
1305 # switch, e.g. "vif_to_ls 123" yields 1.
1306 vif_to_ls() {
1307     echo ${1%??}
1308 }
1309
1310 net_add n1
1311 for i in 1 2 3; do
1312     sim_add hv$i
1313     as hv$i
1314     ovs-vsctl add-br br-phys
1315     ovn_attach n1 br-phys 192.168.0.$i
1316 done
1317 for i in 1 2 3; do
1318     for j in 1 2 3; do
1319         for k in 1 2 3; do
1320             hv=`vif_to_hv $i$j$k`
1321             as hv$hv ovs-vsctl \
1322                 -- add-port br-int vif$i$j$k \
1323                 -- set Interface vif$i$j$k \
1324                        external-ids:iface-id=lp$i$j$k \
1325                        options:tx_pcap=hv$hv/vif$i$j$k-tx.pcap \
1326                        options:rxq_pcap=hv$hv/vif$i$j$k-rx.pcap \
1327                        ofport-request=$i$j$k
1328         done
1329     done
1330 done
1331
1332 # Pre-populate the hypervisors' ARP tables so that we don't lose any
1333 # packets for ARP resolution (native tunneling doesn't queue packets
1334 # for ARP resolution).
1335 ovn_populate_arp
1336
1337 # Allow some time for ovn-northd and ovn-controller to catch up.
1338 # XXX This should be more systematic.
1339 sleep 1
1340
1341 # test_ip INPORT SRC_MAC DST_MAC SRC_IP DST_IP OUTPORT...
1342 #
1343 # This shell function causes a packet to be received on INPORT.  The packet's
1344 # content has Ethernet destination DST and source SRC (each exactly 12 hex
1345 # digits) and Ethernet type ETHTYPE (4 hex digits).  The OUTPORTs (zero or
1346 # more) list the VIFs on which the packet should be received.  INPORT and the
1347 # OUTPORTs are specified as lport numbers, e.g. 123 for vif123.
1348 trim_zeros() {
1349     sed 's/\(00\)\{1,\}$//'
1350 }
1351 for i in 1 2 3; do
1352     for j in 1 2 3; do
1353         for k in 1 2 3; do
1354             : > $i$j$k.expected
1355         done
1356     done
1357 done
1358 test_ip() {
1359     # This packet has bad checksums but logical L3 routing doesn't check.
1360     local inport=$1 src_mac=$2 dst_mac=$3 src_ip=$4 dst_ip=$5
1361     local packet=${dst_mac}${src_mac}08004500001c0000000040110000${src_ip}${dst_ip}0035111100080000
1362     shift; shift; shift; shift; shift
1363     hv=hv`vif_to_hv $inport`
1364     as $hv ovs-appctl netdev-dummy/receive vif$inport $packet
1365     #as $hv ovs-appctl ofproto/trace br-int in_port=$inport $packet
1366     in_ls=`vif_to_ls $inport`
1367     in_lrp=`vif_to_lrp $inport`
1368     for outport; do
1369         out_ls=`vif_to_ls $outport`
1370         if test $in_ls = $out_ls; then
1371             # Ports on the same logical switch receive exactly the same packet.
1372             echo $packet
1373         else
1374             # Routing decrements TTL and updates source and dest MAC
1375             # (and checksum).
1376             out_lrp=`vif_to_lrp $outport`
1377             echo f00000000${outport}00000000ff${out_lrp}08004500001c00000000"3f1101"00${src_ip}${dst_ip}0035111100080000
1378         fi | trim_zeros >> $outport.expected
1379     done
1380 }
1381
1382 as hv1 ovs-vsctl --columns=name,ofport list interface
1383 as hv1 ovn-sbctl list port_binding
1384 as hv1 ovn-sbctl list datapath_binding
1385 as hv1 ovn-sbctl dump-flows
1386 as hv1 ovs-ofctl dump-flows br-int
1387
1388 # Send IP packets between all pairs of source and destination ports:
1389 #
1390 # 1. Unicast IP packets are delivered to exactly one lport (except
1391 #    that packets destined to their input ports are dropped).
1392 #
1393 # 2. Broadcast IP packets are delivered to all lports except the input port.
1394 ip_to_hex() {
1395     printf "%02x%02x%02x%02x" "$@"
1396 }
1397 for is in 1 2 3; do
1398     for js in 1 2 3; do
1399         for ks in 1 2 3; do
1400             bcast=
1401             s=$is$js$ks
1402             smac=f00000000$s
1403             sip=`ip_to_hex 192 168 $is$js $ks`
1404             for id in 1 2 3; do
1405                 for jd in 1 2 3; do
1406                     for kd in 1 2 3; do
1407                         d=$id$jd$kd
1408                         dip=`ip_to_hex 192 168 $id$jd $kd`
1409                         if test $is = $id; then dmac=f00000000$d; else dmac=00000000ff$is$js; fi
1410                         if test $d != $s; then unicast=$d; else unicast=; fi
1411
1412                         test_ip $s $smac $dmac $sip $dip $unicast #1
1413
1414                         if test $id = $is && test $d != $s; then bcast="$bcast $d"; fi
1415                     done
1416                 done
1417             done
1418             test_ip $s $smac ffffffffffff $sip ffffffff $bcast #2
1419         done
1420     done
1421 done
1422
1423 # 3. Send an IP packet from every logical port to every other subnet,
1424 #    to an IP address that does not have a static IP-MAC binding.
1425 #    This should generate a broadcast ARP request for the destination
1426 #    IP address in the destination subnet.
1427 for is in 1 2 3; do
1428     for js in 1 2 3; do
1429         for ks in 1 2 3; do
1430             s=$is$js$ks
1431             smac=f00000000$s
1432             sip=`ip_to_hex 192 168 $is$js $ks`
1433             for id in 1 2 3; do
1434                 for jd in 1 2 3; do
1435                     if test $is$js = $id$jd; then
1436                         continue
1437                     fi
1438
1439                     # Send the packet.
1440                     dmac=00000000ff$is$js
1441                     # Calculate a 4th octet for the destination that is
1442                     # unique per $s, avoids the .1 .2 .3 and .254 IP addresses
1443                     # that have static MAC bindings, and fits in the range
1444                     # 0-255.
1445                     o4=`expr $is '*' 9 + $js '*' 3 + $ks + 10`
1446                     dip=`ip_to_hex 192 168 $id$jd $o4`
1447                     test_ip $s $smac $dmac $sip $dip
1448
1449                     # Every LP on the destination subnet's lswitch should
1450                     # receive the ARP request.
1451                     lrmac=00000000ff$id$jd
1452                     lrip=`ip_to_hex 192 168 $id$jd 254`
1453                     arp=ffffffffffff${lrmac}08060001080006040001${lrmac}${lrip}000000000000${dip}
1454                     for jd2 in 1 2 3; do
1455                         for kd in 1 2 3; do
1456                             echo $arp | trim_zeros >> $id$jd2$kd.expected
1457                         done
1458                     done
1459                 done
1460             done
1461         done
1462     done
1463 done
1464
1465 # test_arp INPORT SHA SPA TPA [REPLY_HA]
1466 #
1467 # Causes a packet to be received on INPORT.  The packet is an ARP
1468 # request with SHA, SPA, and TPA as specified.  If REPLY_HA is provided, then
1469 # it should be the hardware address of the target to expect to receive in an
1470 # ARP reply; otherwise no reply is expected.
1471 #
1472 # INPORT is an lport number, e.g. 11 for vif11.
1473 # SHA and REPLY_HA are each 12 hex digits.
1474 # SPA and TPA are each 8 hex digits.
1475 test_arp() {
1476     local inport=$1 sha=$2 spa=$3 tpa=$4 reply_ha=$5
1477     local request=ffffffffffff${sha}08060001080006040001${sha}${spa}ffffffffffff${tpa}
1478     hv=hv`vif_to_hv $inport`
1479     as $hv ovs-appctl netdev-dummy/receive vif$inport $request
1480     #as $hv ovs-appctl ofproto/trace br-int in_port=$inport $request
1481
1482     # Expect to receive the broadcast ARP on the other logical switch ports if
1483     # IP address is not configured to the lswitch patch port.
1484     local i=`vif_to_ls $inport`
1485     local j k
1486     for j in 1 2 3; do
1487         for k in 1 2 3; do
1488             # 192.168.33.254 is configured to the lswitch patch port for lrp33,
1489             # so no ARP flooding expected for it.
1490             if test $i$j$k != $inport && test $tpa != `ip_to_hex 192 168 33 254`; then
1491                 echo $request >> $i$j$k.expected
1492             fi
1493         done
1494     done
1495
1496     # Expect to receive the reply, if any.
1497     if test X$reply_ha != X; then
1498         lrp=`vif_to_lrp $inport`
1499         local reply=${sha}00000000ff${lrp}08060001080006040002${reply_ha}${tpa}${sha}${spa}
1500         echo $reply >> $inport.expected
1501     fi
1502 }
1503
1504 # Test router replies to ARP requests from all source ports:
1505 #
1506 # 4. Router replies to query for its MAC address from port's own IP address.
1507 #
1508 # 5. Router replies to query for its MAC address from any random IP address
1509 #    in its subnet.
1510 #
1511 # 6. Router replies to query for its MAC address from another subnet.
1512 #
1513 # 7. No reply to query for IP address other than router IP.
1514 for i in 1 2 3; do
1515     for j in 1 2 3; do
1516         for k in 1 2 3; do
1517             smac=f00000000$i$j$k               # Source MAC
1518             sip=`ip_to_hex 192 168 $i$j $k`    # Source IP
1519             rip=`ip_to_hex 192 168 $i$j 254`   # Router IP
1520             rmac=00000000ff$i$j                # Router MAC
1521             otherip=`ip_to_hex 192 168 $i$j 55` # Some other IP in subnet
1522             test_arp $i$j$k $smac $sip        $rip        $rmac #4
1523             test_arp $i$j$k $smac $otherip    $rip        $rmac #5
1524             test_arp $i$j$k $smac 0a123456    $rip        $rmac #6
1525             test_arp $i$j$k $smac $sip        $otherip          #7
1526         done
1527     done
1528 done
1529
1530 # Allow some time for packet forwarding.
1531 # XXX This can be improved.
1532 sleep 1
1533
1534 # 8. Generate an ARP reply for each of the IP addresses ARPed for
1535 #    earlier as #3.
1536 #
1537 #    Here, the $s is the VIF that originated the ARP request and $d is
1538 #    the VIF that sends the ARP reply, which is somewhat backward but
1539 #    it means that $s and $d are the same as #3.
1540 : > mac_bindings.expected
1541 for is in 1 2 3; do
1542     for js in 1 2 3; do
1543         for ks in 1 2 3; do
1544             s=$is$js$ks
1545             for id in 1 2 3; do
1546                 for jd in 1 2 3; do
1547                     if test $is$js = $id$jd; then
1548                         continue
1549                     fi
1550
1551                     kd=1
1552                     d=$id$jd$kd
1553
1554                     o4=`expr $is '*' 9 + $js '*' 3 + $ks + 10`
1555                     host_ip=`ip_to_hex 192 168 $id$jd $o4`
1556                     host_mac=8000000000$o4
1557
1558                     lrmac=00000000ff$id$jd
1559                     lrip=`ip_to_hex 192 168 $id$jd 254`
1560
1561                     arp=${lrmac}${host_mac}08060001080006040002${host_mac}${host_ip}${lrmac}${lrip}
1562
1563                     echo
1564                     echo
1565                     echo
1566                     hv=hv`vif_to_hv $d`
1567                     as $hv ovs-appctl netdev-dummy/receive vif$d $arp
1568                     #as $hv ovs-appctl ofproto/trace br-int in_port=$d $arp
1569                     #as $hv ovs-ofctl dump-flows br-int table=19
1570
1571                     host_ip_pretty=192.168.$id$jd.$o4
1572                     host_mac_pretty=80:00:00:00:00:$o4
1573                     echo lrp$id$jd,$host_ip_pretty,$host_mac_pretty >> mac_bindings.expected
1574                 done
1575             done
1576         done
1577     done
1578 done
1579
1580 # Allow some time for packet forwarding.
1581 # XXX This can be improved.
1582 sleep 1
1583
1584 # 9. Send an IP packet from every logical port to every other subnet.  These
1585 #    are the same packets already sent as #3, but now the destinations' IP-MAC
1586 #    bindings have been discovered via ARP, so instead of provoking an ARP
1587 #    request, these packets now get routed to their destinations (which don't
1588 #    have static MAC bindings, so they go to the port we've designated as
1589 #    accepting "unknown" MACs.)
1590 for is in 1 2 3; do
1591     for js in 1 2 3; do
1592         for ks in 1 2 3; do
1593             s=$is$js$ks
1594             smac=f00000000$s
1595             sip=`ip_to_hex 192 168 $is$js $ks`
1596             for id in 1 2 3; do
1597                 for jd in 1 2 3; do
1598                     if test $is$js = $id$jd; then
1599                         continue
1600                     fi
1601
1602                     # Send the packet.
1603                     dmac=00000000ff$is$js
1604                     # Calculate a 4th octet for the destination that is
1605                     # unique per $s, avoids the .1 .2 .3 and .254 IP addresses
1606                     # that have static MAC bindings, and fits in the range
1607                     # 0-255.
1608                     o4=`expr $is '*' 9 + $js '*' 3 + $ks + 10`
1609                     dip=`ip_to_hex 192 168 $id$jd $o4`
1610                     test_ip $s $smac $dmac $sip $dip
1611
1612                     # Expect the packet egress.
1613                     host_mac=8000000000$o4
1614                     outport=${id}11
1615                     out_lrp=$id$jd
1616                     echo ${host_mac}00000000ff${out_lrp}08004500001c00000000"3f1101"00${sip}${dip}0035111100080000 | trim_zeros >> $outport.expected
1617                 done
1618             done
1619         done
1620     done
1621 done
1622
1623 # Allow some time for packet forwarding.
1624 # XXX This can be improved.
1625 sleep 1
1626
1627 ovn-sbctl -f csv -d bare --no-heading \
1628     -- --columns=logical_port,ip,mac list mac_binding > mac_bindings
1629
1630 # Now check the packets actually received against the ones expected.
1631 for i in 1 2 3; do
1632     for j in 1 2 3; do
1633         for k in 1 2 3; do
1634             file=hv`vif_to_hv $i$j$k`/vif$i$j$k-tx.pcap
1635             echo $file
1636             $PYTHON "$top_srcdir/utilities/ovs-pcap.in" $file | trim_zeros > $i$j$k.packets
1637             sort $i$j$k.expected > expout
1638             AT_CHECK([sort $i$j$k.packets], [0], [expout])
1639             echo
1640         done
1641     done
1642 done
1643
1644 # Check the MAC bindings against those expected.
1645 AT_CHECK_UNQUOTED([sort < mac_bindings], [0], [`sort < mac_bindings.expected`
1646 ])
1647
1648 # Gracefully terminate daemons
1649 for daemon in ovn-controller ovn-northd ovsdb-server; do
1650     ovs-appctl -t $daemon exit
1651 done
1652 AT_CLEANUP
1653
1654 # 3 hypervisors, one logical switch, 3 logical ports per hypervisor
1655 AT_SETUP([ovn -- portsecurity : 3 HVs, 1 LS, 3 lports/HV])
1656 AT_KEYWORDS([portsecurity])
1657 AT_SKIP_IF([test $HAVE_PYTHON = no])
1658 ovn_start
1659
1660 # Create hypervisors hv[123].
1661 # Add vif1[123] to hv1, vif2[123] to hv2, vif3[123] to hv3.
1662 # Add all of the vifs to a single logical switch lsw0.
1663 # Turn off port security on vifs vif[123]1
1664 # Turn on l2 port security on vifs vif[123]2
1665 # Turn of l2 and l3 port security on vifs vif[123]3
1666 # Make vif13, vif2[23], vif3[123] destinations for unknown MACs.
1667 ovn-nbctl lswitch-add lsw0
1668 net_add n1
1669 for i in 1 2 3; do
1670     sim_add hv$i
1671     as hv$i
1672     ovs-vsctl add-br br-phys
1673     ovn_attach n1 br-phys 192.168.0.$i
1674
1675     for j in 1 2 3; do
1676         ovs-vsctl add-port br-int vif$i$j -- set Interface vif$i$j external-ids:iface-id=lp$i$j options:tx_pcap=hv$i/vif$i$j-tx.pcap options:rxq_pcap=hv$i/vif$i$j-rx.pcap ofport-request=$i$j
1677         ovn-nbctl lport-add lsw0 lp$i$j
1678         if test $j = 1; then
1679             ovn-nbctl lport-set-addresses lp$i$j "f0:00:00:00:00:$i$j 192.168.0.$i$j" unknown
1680         elif test $j = 2; then
1681             ovn-nbctl lport-set-addresses lp$i$j "f0:00:00:00:00:$i$j 192.168.0.$i$j"
1682             ovn-nbctl lport-set-port-security lp$i$j f0:00:00:00:00:$i$j
1683         else
1684             extra_addr="f0:00:00:00:0$i:$i$j fe80::ea2a:eaff:fe28:$i$j"
1685             ovn-nbctl lport-set-addresses lp$i$j "f0:00:00:00:00:$i$j 192.168.0.$i$j" "$extra_addr"
1686             ovn-nbctl lport-set-port-security lp$i$j "f0:00:00:00:00:$i$j 192.168.0.$i$j" "$extra_addr"
1687         fi
1688     done
1689 done
1690
1691 # Pre-populate the hypervisors' ARP tables so that we don't lose any
1692 # packets for ARP resolution (native tunneling doesn't queue packets
1693 # for ARP resolution).
1694 ovn_populate_arp
1695
1696 # Allow some time for ovn-northd and ovn-controller to catch up.
1697 # XXX This should be more systematic.
1698 sleep 1
1699
1700 # Given the name of a logical port, prints the name of the hypervisor
1701 # on which it is located.
1702 vif_to_hv() {
1703     echo hv${1%?}
1704 }
1705
1706
1707 trim_zeros() {
1708     sed 's/\(00\)\{1,\}$//'
1709 }
1710 for i in 1 2 3; do
1711     for j in 1 2 3; do
1712         : > $i$j.expected
1713     done
1714 done
1715
1716 # test_ip INPORT SRC_MAC DST_MAC SRC_IP DST_IP OUTPORT...
1717 #
1718 # This shell function causes an ip packet to be received on INPORT.
1719 # The packet's content has Ethernet destination DST and source SRC
1720 # (each exactly 12 hex digits) and Ethernet type ETHTYPE (4 hex digits).
1721 # The OUTPORTs (zero or more) list the VIFs on which the packet should
1722 # be received.  INPORT and the OUTPORTs are specified as lport numbers,
1723 # e.g. 11 for vif11.
1724 test_ip() {
1725     # This packet has bad checksums but logical L3 routing doesn't check.
1726     local inport=$1 src_mac=$2 dst_mac=$3 src_ip=$4 dst_ip=$5
1727     local packet=${dst_mac}${src_mac}08004500001c0000000040110000${src_ip}${dst_ip}003511110008
1728     shift; shift; shift; shift; shift
1729     hv=`vif_to_hv $inport`
1730     as $hv ovs-appctl netdev-dummy/receive vif$inport $packet
1731     #as $hv ovs-appctl ofproto/trace br-int in_port=$inport $packet
1732     for outport; do
1733         echo $packet | trim_zeros >> $outport.expected
1734     done
1735 }
1736
1737 # test_arp INPORT SHA SPA TPA DROP [REPLY_HA]
1738 #
1739 # Causes a packet to be received on INPORT.  The packet is an ARP
1740 # request with SHA, SPA, and TPA as specified.  If REPLY_HA is provided, then
1741 # it should be the hardware address of the target to expect to receive in an
1742 # ARP reply; otherwise no reply is expected.
1743 #
1744 # INPORT is an lport number, e.g. 11 for vif11.
1745 # SHA and REPLY_HA are each 12 hex digits.
1746 # SPA and TPA are each 8 hex digits.
1747 test_arp() {
1748     local inport=$1 smac=$2 sha=$3 spa=$4 tpa=$5 drop=$6 reply_ha=$7
1749     local request=ffffffffffff${smac}08060001080006040001${sha}${spa}ffffffffffff${tpa}
1750     hv=`vif_to_hv $inport`
1751     as $hv ovs-appctl netdev-dummy/receive vif$inport $request
1752     #as $hv ovs-appctl ofproto/trace br-int in_port=$inport $request
1753     if test $drop != 1; then
1754         if test X$reply_ha == X; then
1755             # Expect to receive the broadcast ARP on the other logical switch ports
1756             # if no reply is expected.
1757             local i j
1758             for i in 1 2 3; do
1759                 for j in 1 2 3; do
1760                     if test $i$j != $inport; then
1761                         echo $request >> $i$j.expected
1762                     fi
1763                 done
1764             done
1765         else
1766             # Expect to receive the reply, if any.
1767             local reply=${smac}${reply_ha}08060001080006040002${reply_ha}${tpa}${sha}${spa}
1768             echo $reply >> $inport.expected
1769         fi
1770     fi
1771 }
1772
1773 # test_ipv6 INPORT SRC_MAC DST_MAC SRC_IP DST_IP OUTPORT...
1774 # This function is similar to test_ip() except that it sends
1775 # ipv6 packet
1776 test_ipv6() {
1777     local inport=$1 src_mac=$2 dst_mac=$3 src_ip=$4 dst_ip=$5
1778     local packet=${dst_mac}${src_mac}86dd6000000000083aff${src_ip}${dst_ip}0000000000000000
1779     shift; shift; shift; shift; shift
1780     hv=`vif_to_hv $inport`
1781     as $hv ovs-appctl netdev-dummy/receive vif$inport $packet
1782     #as $hv ovs-appctl ofproto/trace br-int in_port=$inport $packet
1783     for outport; do
1784         echo $packet | trim_zeros >> $outport.expected
1785     done
1786 }
1787
1788 ip_to_hex() {
1789     printf "%02x%02x%02x%02x" "$@"
1790 }
1791
1792 # no port security
1793 sip=`ip_to_hex 192 168 0 12`
1794 tip=`ip_to_hex 192 168 0 13`
1795 # the arp packet should be allowed even if lp[123]1 is
1796 # not configured with mac f00000000023 and ip 192.168.0.12
1797 for i in 1 2 3; do
1798     test_arp ${i}1 f00000000023 f00000000023 $sip $tip 0 f00000000013
1799     for j in 1 2 3; do
1800         if test $i != $j; then
1801             test_ip ${i}1 f000000000${i}1 f000000000${j}1 $sip $tip ${j}1
1802         fi
1803     done
1804 done
1805
1806 # l2 port security
1807 sip=`ip_to_hex 192 168 0 12`
1808 tip=`ip_to_hex 192 168 0 13`
1809
1810 # arp packet should be allowed since lp22 is configured with
1811 # mac f00000000022
1812 test_arp 22 f00000000022 f00000000022 $sip $tip 0 f00000000013
1813
1814 # arp packet should not be allowed since lp32 is not configured with
1815 # mac f00000000021
1816 test_arp 32 f00000000021 f00000000021 $sip $tip 1
1817
1818 # arp packet with sha set to f00000000021 should not be allowed
1819 # for lp12
1820 test_arp 12 f00000000012 f00000000021 $sip $tip 1
1821
1822 # ip packets should be allowed and received since lp[123]2 do not
1823 # have l3 port security
1824 sip=`ip_to_hex 192 168 0 55`
1825 tip=`ip_to_hex 192 168 0 66`
1826 for i in 1 2 3; do
1827     for j in 1 2 3; do
1828         if test $i != $j; then
1829             test_ip ${i}2 f000000000${i}2 f000000000${j}2 $sip $tip ${j}2
1830         fi
1831     done
1832 done
1833
1834 # ipv6 packets should be received by lp[123]2
1835 # lp[123]1 can send ipv6 traffic as there is no port security
1836 sip=fe800000000000000000000000000000
1837 tip=ff020000000000000000000000000000
1838
1839 for i in 1 2 3; do
1840     test_ipv6 ${i}1 f000000000${i}1 f000000000${i}2 $sip $tip ${i}2
1841 done
1842
1843
1844 # l2 and l3 port security
1845 sip=`ip_to_hex 192 168 0 13`
1846 tip=`ip_to_hex 192 168 0 22`
1847 # arp packet should be allowed since lp13 is configured with
1848 # f00000000013 and 192.168.0.13
1849 test_arp 13 f00000000013 f00000000013 $sip $tip 0 f00000000022
1850
1851 # the arp packet should be dropped because lp23 is not configured
1852 # with mac f00000000022
1853 sip=`ip_to_hex 192 168 0 13`
1854 tip=`ip_to_hex 192 168 0 22`
1855 test_arp 23 f00000000022 f00000000022 $sip $tip 1
1856
1857 # the arp packet should be dropped because lp33 is not configured
1858 # with ip 192.168.0.55
1859 spa=`ip_to_hex 192 168 0 55`
1860 tpa=`ip_to_hex 192 168 0 22`
1861 test_arp 33 f00000000031 f00000000031 $spa $tpa 1
1862
1863 # ip packets should not be received by lp[123]3 since
1864 # l3 port security is enabled
1865 sip=`ip_to_hex 192 168 0 55`
1866 tip=`ip_to_hex 192 168 0 66`
1867 for i in 1 2 3; do
1868     for j in 1 2 3; do
1869         test_ip ${i}2 f000000000${i}2 f000000000${j}3 $sip $tip
1870     done
1871 done
1872
1873 # ipv6 packets should be dropped for lp[123]3 since
1874 # it is configured with only ipv4 address
1875 sip=fe800000000000000000000000000000
1876 tip=ff020000000000000000000000000000
1877
1878 for i in 1 2 3; do
1879     test_ipv6 ${i}3 f000000000${i}3 f00000000022 $sip $tip
1880 done
1881
1882 # ipv6 packets should not be received by lp[123]3 with mac f000000000$[123]3
1883 # lp[123]1 can send ipv6 traffic as there is no port security
1884 for i in 1 2 3; do
1885     test_ipv6 ${i}1 f000000000${i}1 f000000000${i}3 $sip $tip
1886 done
1887
1888 # lp13 has extra port security with mac f0000000113 and ipv6 addr
1889 # fe80::ea2a:eaff:fe28:0012
1890
1891 # ipv4 packet should be dropped for lp13 with mac f0000000113
1892 sip=`ip_to_hex 192 168 0 13`
1893 tip=`ip_to_hex 192 168 0 23`
1894 test_ip 13 f00000000113 f00000000023 $sip $tip
1895
1896 # ipv6 packet should be received by lp[123]3 with mac f0000000{i}{i}3
1897 # and ip6.dst as fe80::ea2a:eaff:fe28:0{i}{i}3.
1898 # lp11 can send ipv6 traffic as there is no port security
1899 sip=ee800000000000000000000000000000
1900 for i in 1 2 3; do
1901     tip=fe80000000000000ea2aeafffe2800{i}3
1902     test_ipv6 11 f00000000011 f000000000{i}${i}3 $sip $tip {i}3
1903 done
1904
1905
1906 # ipv6 packet should not be received by lp33 with mac f0000000333
1907 # and ip6.dst as fe80::ea2a:eaff:fe28:0023 as it is
1908 # configured with fe80::ea2a:eaff:fe28:0033
1909 # lp11 can send ipv6 traffic as there is no port security
1910
1911 sip=ee800000000000000000000000000000
1912 tip=fe80000000000000ea2aeafffe280023
1913 test_ipv6 11 f00000000011 f00000000333 $sip $tip
1914
1915 # ipv6 packet should be allowed for lp[123]3 with mac f0000000{i}{i}3
1916 # and ip6.src fe80::ea2a:eaff:fe28:0{i}{i}3 and ip6.src ::.
1917 # and should be dropped for any other ip6.src
1918 # lp21 can receive ipv6 traffic as there is no port security
1919
1920 tip=ee800000000000000000000000000000
1921 for i in 1 2 3; do
1922     sip=fe80000000000000ea2aeafffe2800${i}3
1923     test_ipv6 ${i}3 f00000000${i}${i}3 f00000000021 $sip $tip 21
1924
1925     sip=00000000000000000000000000000000
1926     test_ipv6 ${i}3 f00000000${i}${i}3 f00000000021 $sip $tip 21
1927
1928     # should be dropped
1929     sip=ae80000000000000ea2aeafffe2800aa
1930     test_ipv6 ${i}3 f00000000${i}${i}3 f00000000021 $sip $tip
1931 done
1932
1933 # configure lport13 to send and received IPv4 packets with an address range
1934 ovn-nbctl lport-set-port-security lp13 "f0:00:00:00:00:13 192.168.0.13 20.0.0.4/24 10.0.0.0/24"
1935
1936 sip=`ip_to_hex 10 0 0 13`
1937 tip=`ip_to_hex 192 168 0 22`
1938 # arp packet with inner ip 10.0.0.13 should be allowed for lport13
1939 test_arp 13 f00000000013 f00000000013 $sip $tip 0 f00000000022
1940
1941 sip=`ip_to_hex 10 0 0 14`
1942 tip=`ip_to_hex 192 168 0 23`
1943 # IPv4 packet from lport13 with src ip 10.0.0.14 destined to lport23
1944 # with dst ip 192.168.0.23 should be allowed
1945 test_ip 13 f00000000013 f00000000023 $sip $tip 23
1946
1947 sip=`ip_to_hex 192 168 0 33`
1948 tip=`ip_to_hex 10 0 0 15`
1949 # IPv4 packet from lport33 with src ip 192.168.0.33 destined to lport13
1950 # with dst ip 10.0.0.15 should be received by lport13
1951 test_ip 33 f00000000033 f00000000013 $sip $tip 13
1952
1953 sip=`ip_to_hex 192 168 0 33`
1954 tip=`ip_to_hex 20 0 0 4`
1955 # IPv4 packet from lport33 with src ip 192.168.0.33 destined to lport13
1956 # with dst ip 20.0.0.4 should be received by lport13
1957 test_ip 33 f00000000033 f00000000013 $sip $tip 13
1958
1959 sip=`ip_to_hex 192 168 0 33`
1960 tip=`ip_to_hex 20 0 0 5`
1961 # IPv4 packet from lport33 with src ip 192.168.0.33 destined to lport13
1962 # with dst ip 20.0.0.5 should not be received by lport13
1963 test_ip 33 f00000000033 f00000000013 $sip $tip
1964
1965 sip=`ip_to_hex 192 168 0 33`
1966 tip=`ip_to_hex 20 0 0 255`
1967 # IPv4 packet from lport33 with src ip 192.168.0.33 destined to lport13
1968 # with dst ip 20.0.0.255 should be received by lport13
1969 test_ip 33 f00000000033 f00000000013 $sip $tip 13
1970
1971 sip=`ip_to_hex 192 168 0 33`
1972 tip=`ip_to_hex 192 168 0 255`
1973 # IPv4 packet from lport33 with src ip 192.168.0.33 destined to lport13
1974 # with dst ip 192.168.0.255 should not be received by lport13
1975 test_ip 33 f00000000033 f00000000013 $sip $tip
1976
1977 sip=`ip_to_hex 192 168 0 33`
1978 tip=`ip_to_hex 224 0 0 4`
1979 # IPv4 packet from lport33 with src ip 192.168.0.33 destined to lport13
1980 # with dst ip 224.0.0.4  should be received by lport13
1981 test_ip 33 f00000000033 f00000000013 $sip $tip 13
1982
1983 # Allow some time for packet forwarding.
1984
1985 # XXX This can be improved.
1986 sleep 1
1987
1988 #dump information including flow counters
1989 ovn-nbctl show
1990 ovn-sbctl dump-flows -- list multicast_group
1991
1992 echo "------ hv1 dump ------"
1993 as hv1 ovs-vsctl show
1994 as hv1 ovs-ofctl -O OpenFlow13 dump-flows br-int
1995
1996 echo "------ hv2 dump ------"
1997 as hv2 ovs-vsctl show
1998 as hv2 ovs-ofctl -O OpenFlow13 dump-flows br-int
1999
2000 echo "------ hv3 dump ------"
2001 as hv3 ovs-vsctl show
2002 as hv3 ovs-ofctl -O OpenFlow13 dump-flows br-int
2003
2004 # Now check the packets actually received against the ones expected.
2005 for i in 1 2 3; do
2006     for j in 1 2 3; do
2007         file=hv$i/vif$i$j-tx.pcap
2008         echo $file
2009         $PYTHON "$top_srcdir/utilities/ovs-pcap.in" $file | trim_zeros > $i$j.packets
2010         sort $i$j.expected > expout
2011         AT_CHECK([sort $i$j.packets], [0], [expout])
2012         echo
2013     done
2014 done
2015
2016 # Gracefully terminate daemons
2017 for sim in hv1 hv2 hv3; do
2018     as $sim
2019     OVS_APP_EXIT_AND_WAIT([ovn-controller])
2020     OVS_APP_EXIT_AND_WAIT([ovs-vswitchd])
2021     OVS_APP_EXIT_AND_WAIT([ovsdb-server])
2022 done
2023
2024 as ovn-sb
2025 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
2026
2027 as ovn-nb
2028 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
2029
2030 as northd
2031 OVS_APP_EXIT_AND_WAIT([ovn-northd])
2032
2033 as main
2034 OVS_APP_EXIT_AND_WAIT([ovs-vswitchd])
2035 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
2036
2037 AT_CLEANUP
2038
2039 AT_SETUP([ovn -- 2 HVs, 2 LS, 1 lport/LS, 2 peer LRs])
2040 AT_KEYWORDS([ovnpeer])
2041 AT_SKIP_IF([test $HAVE_PYTHON = no])
2042 ovn_start
2043
2044 # Logical network:
2045 # Two LRs - R1 and R2 that are connected to each other as peers in 20.0.0.0/24
2046 # network. R1 has a switchs ls1 (191.168.1.0/24) connected to it.
2047 # R2 has ls2 (172.16.1.0/24) connected to it.
2048
2049 ovn-nbctl create Logical_Router name=R1
2050 ovn-nbctl create Logical_Router name=R2
2051
2052 ovn-nbctl lswitch-add ls1
2053 ovn-nbctl lswitch-add ls2
2054
2055 # Connect ls1 to R1
2056 ovn-nbctl -- --id=@lrp create Logical_Router_port name=ls1 \
2057 network=192.168.1.1/24 mac=\"00:00:00:01:02:03\" -- add Logical_Router R1 \
2058 ports @lrp -- lport-add ls1 rp-ls1
2059
2060 ovn-nbctl set Logical_port rp-ls1 type=router options:router-port=ls1 \
2061 addresses=\"00:00:00:01:02:03\"
2062
2063 # Connect ls2 to R2
2064 ovn-nbctl -- --id=@lrp create Logical_Router_port name=ls2 \
2065 network=172.16.1.1/24 mac=\"00:00:00:01:02:04\" -- add Logical_Router R2 \
2066 ports @lrp -- lport-add ls2 rp-ls2
2067
2068 ovn-nbctl set Logical_port rp-ls2 type=router options:router-port=ls2 \
2069 addresses=\"00:00:00:01:02:04\"
2070
2071 # Connect R1 to R2
2072 lrp1_uuid=`ovn-nbctl -- --id=@lrp create Logical_Router_port name=R1_R2 \
2073 network="20.0.0.1/24" mac=\"00:00:00:02:03:04\" \
2074 -- add Logical_Router R1 ports @lrp`
2075
2076 lrp2_uuid=`ovn-nbctl -- --id=@lrp create Logical_Router_port name=R2_R1 \
2077 network="20.0.0.2/24" mac=\"00:00:00:02:03:05\" \
2078 -- add Logical_Router R2 ports @lrp`
2079
2080 ovn-nbctl set logical_router_port $lrp1_uuid peer="R2_R1"
2081 ovn-nbctl set logical_router_port $lrp2_uuid peer="R1_R2"
2082
2083 ovn-nbctl set Logical_Router R1 default_gw="20.0.0.2"
2084 ovn-nbctl set Logical_Router R2 default_gw="20.0.0.1"
2085
2086 # Create logical port ls1-lp1 in ls1
2087 ovn-nbctl lport-add ls1 ls1-lp1 \
2088 -- lport-set-addresses ls1-lp1 "f0:00:00:01:02:03 192.168.1.2"
2089
2090 # Create logical port ls2-lp1 in ls2
2091 ovn-nbctl lport-add ls2 ls2-lp1 \
2092 -- lport-set-addresses ls2-lp1 "f0:00:00:01:02:04 172.16.1.2"
2093
2094 # Create two hypervisor and create OVS ports corresponding to logical ports.
2095 net_add n1
2096
2097 sim_add hv1
2098 as hv1
2099 ovs-vsctl add-br br-phys
2100 ovn_attach n1 br-phys 192.168.0.1
2101 ovs-vsctl -- add-port br-int hv1-vif1 -- \
2102     set interface hv1-vif1 external-ids:iface-id=ls1-lp1 \
2103     options:tx_pcap=hv1/vif1-tx.pcap \
2104     options:rxq_pcap=hv1/vif1-rx.pcap \
2105     ofport-request=1
2106
2107 sim_add hv2
2108 as hv2
2109 ovs-vsctl add-br br-phys
2110 ovn_attach n1 br-phys 192.168.0.2
2111 ovs-vsctl -- add-port br-int hv2-vif1 -- \
2112     set interface hv2-vif1 external-ids:iface-id=ls2-lp1 \
2113     options:tx_pcap=hv2/vif1-tx.pcap \
2114     options:rxq_pcap=hv2/vif1-rx.pcap \
2115     ofport-request=1
2116
2117
2118 # Pre-populate the hypervisors' ARP tables so that we don't lose any
2119 # packets for ARP resolution (native tunneling doesn't queue packets
2120 # for ARP resolution).
2121 ovn_populate_arp
2122
2123 # Allow some time for ovn-northd and ovn-controller to catch up.
2124 # XXX This should be more systematic.
2125 sleep 1
2126
2127 # Send ip packets between the two ports.
2128 ip_to_hex() {
2129     printf "%02x%02x%02x%02x" "$@"
2130 }
2131 trim_zeros() {
2132     sed 's/\(00\)\{1,\}$//'
2133 }
2134
2135 # Packet to send.
2136 src_mac="f00000010203"
2137 dst_mac="000000010203"
2138 src_ip=`ip_to_hex 192 168 1 2`
2139 dst_ip=`ip_to_hex 172 16 1 2`
2140 packet=${dst_mac}${src_mac}08004500001c0000000040110000${src_ip}${dst_ip}0035111100080000
2141 as hv1 ovs-appctl netdev-dummy/receive hv1-vif1 $packet
2142
2143
2144 echo "---------NB dump-----"
2145 ovn-nbctl show
2146 echo "---------------------"
2147 ovn-nbctl list logical_router
2148 echo "---------------------"
2149 ovn-nbctl list logical_router_port
2150 echo "---------------------"
2151
2152 echo "---------SB dump-----"
2153 ovn-sbctl list datapath_binding
2154 echo "---------------------"
2155 ovn-sbctl list port_binding
2156 echo "---------------------"
2157
2158 echo "------ hv1 dump ----------"
2159 as hv1 ovs-ofctl dump-flows br-int
2160 echo "------ hv2 dump ----------"
2161 as hv2 ovs-ofctl dump-flows br-int
2162
2163 # Packet to Expect
2164 src_mac="000000010204"
2165 dst_mac="f00000010204"
2166 expected=${dst_mac}${src_mac}08004500001c000000003e110200${src_ip}${dst_ip}0035111100080000
2167
2168 $PYTHON "$top_srcdir/utilities/ovs-pcap.in" hv2/vif1-tx.pcap | trim_zeros > received.packets
2169 echo $expected | trim_zeros > expout
2170 AT_CHECK([cat received.packets], [0], [expout])
2171
2172 for sim in hv1 hv2; do
2173     as $sim
2174     OVS_APP_EXIT_AND_WAIT([ovn-controller])
2175     OVS_APP_EXIT_AND_WAIT([ovs-vswitchd])
2176     OVS_APP_EXIT_AND_WAIT([ovsdb-server])
2177 done
2178
2179 as ovn-sb
2180 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
2181
2182 as ovn-nb
2183 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
2184
2185 as northd
2186 OVS_APP_EXIT_AND_WAIT([ovn-northd])
2187
2188 as main
2189 OVS_APP_EXIT_AND_WAIT([ovs-vswitchd])
2190 OVS_APP_EXIT_AND_WAIT([ovsdb-server])
2191
2192 AT_CLEANUP