tests/ovsdb-idl.at

   1 AT_BANNER([OVSDB -- interface description language (IDL)])
   2
   3 # OVSDB_CHECK_IDL(TITLE, [PRE-IDL-TXN], TRANSACTIONS, OUTPUT, [KEYWORDS],
   4 #                 [FILTER])
   5 #
   6 # Creates a database with a schema derived from idltest.ovsidl, runs
   7 # each PRE-IDL-TXN (if any), starts an ovsdb-server on that database,
   8 # and runs "test-ovsdb idl" passing each of the TRANSACTIONS along.
   9 #
  10 # Checks that the overall output is OUTPUT.  Before comparison, the
  11 # output is sorted (using "sort") and UUIDs in the output are replaced
  12 # by markers of the form <N> where N is a number.  The first unique
  13 # UUID is replaced by <0>, the next by <1>, and so on.  If a given
  14 # UUID appears more than once it is always replaced by the same
  15 # marker.  If FILTER is supplied then the output is also filtered
  16 # through the specified program.
  17 #
  18 # TITLE is provided to AT_SETUP and KEYWORDS to AT_KEYWORDS.
  19 m4_define([OVSDB_CHECK_IDL],
  20   [AT_SETUP([$1])
  21    AT_KEYWORDS([ovsdb server idl positive $5])
  22    AT_CHECK([ovsdb-tool create db $abs_srcdir/idltest.ovsschema],
  23                   [0], [stdout], [ignore])
  24    AT_CHECK([ovsdb-server '-vPATTERN:console:ovsdb-server|%c|%m' --detach --pidfile=$PWD/pid --remote=punix:socket --unixctl=$PWD/unixctl db], [0], [ignore], [ignore])
  25    m4_if([$2], [], [],
  26      [AT_CHECK([ovsdb-client transact unix:socket $2], [0], [ignore], [ignore], [kill `cat pid`])])
  27    AT_CHECK([test-ovsdb '-vPATTERN:console:test-ovsdb|%c|%m' -vjsonrpc -t10 idl unix:socket $3],
  28             [0], [stdout], [ignore], [kill `cat pid`])
  29    AT_CHECK([sort stdout | perl $srcdir/uuidfilt.pl]m4_if([$6],,, [[| $6]]),
  30             [0], [$4], [], [kill `cat pid`])
  31    OVSDB_SERVER_SHUTDOWN
  32    AT_CLEANUP])
  33
  34 OVSDB_CHECK_IDL([simple idl, initially empty, no ops],
  35   [],
  36   [],
  37   [000: empty
  38 001: done
  39 ])
  40
  41 OVSDB_CHECK_IDL([simple idl, initially empty, various ops],
  42   [],
  43   [['["idltest",
  44       {"op": "insert",
  45        "table": "simple",
  46        "row": {"i": 1,
  47                "r": 2.0,
  48                "b": true,
  49                "s": "mystring",
  50                "u": ["uuid", "84f5c8f5-ac76-4dbc-a24f-8860eb407fc1"],
  51                "ia": ["set", [1, 2, 3]],
  52                "ra": ["set", [-0.5]],
  53                "ba": ["set", [true, false]],
  54                "sa": ["set", ["abc", "def"]],
  55                "ua": ["set", [["uuid", "69443985-7806-45e2-b35f-574a04e720f9"],
  56                               ["uuid", "aad11ef0-816a-4b01-93e6-03b8b4256b98"]]]}},
  57       {"op": "insert",
  58        "table": "simple",
  59        "row": {}}]' \
  60     '["idltest",
  61       {"op": "update",
  62        "table": "simple",
  63        "where": [],
  64        "row": {"b": true}}]' \
  65     '["idltest",
  66       {"op": "update",
  67        "table": "simple",
  68        "where": [],
  69        "row": {"r": 123.5}}]' \
  70     '["idltest",
  71       {"op": "insert",
  72        "table": "simple",
  73        "row": {"i": -1,
  74                "r": 125,
  75                "b": false,
  76                "s": "",
  77                "ia": ["set", [1]],
  78                "ra": ["set", [1.5]],
  79                "ba": ["set", [false]],
  80                "sa": ["set", []],
  81                "ua": ["set", []]}}]' \
  82     '["idltest",
  83       {"op": "update",
  84        "table": "simple",
  85        "where": [["i", "<", 1]],
  86        "row": {"s": "newstring"}}]' \
  87     '["idltest",
  88       {"op": "delete",
  89        "table": "simple",
  90        "where": [["i", "==", 0]]}]' \
  91     'reconnect']],
  92   [[000: empty
  93 001: {"error":null,"result":[{"uuid":["uuid","<0>"]},{"uuid":["uuid","<1>"]}]}
  94 002: i=0 r=0 b=false s= u=<2> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
  95 002: i=1 r=2 b=true s=mystring u=<3> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<4> <5>] uuid=<0>
  96 003: {"error":null,"result":[{"count":2}]}
  97 004: i=0 r=0 b=true s= u=<2> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
  98 004: i=1 r=2 b=true s=mystring u=<3> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<4> <5>] uuid=<0>
  99 005: {"error":null,"result":[{"count":2}]}
 100 006: i=0 r=123.5 b=true s= u=<2> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 101 006: i=1 r=123.5 b=true s=mystring u=<3> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<4> <5>] uuid=<0>
 102 007: {"error":null,"result":[{"uuid":["uuid","<6>"]}]}
 103 008: i=-1 r=125 b=false s= u=<2> ia=[1] ra=[1.5] ba=[false] sa=[] ua=[] uuid=<6>
 104 008: i=0 r=123.5 b=true s= u=<2> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 105 008: i=1 r=123.5 b=true s=mystring u=<3> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<4> <5>] uuid=<0>
 106 009: {"error":null,"result":[{"count":2}]}
 107 010: i=-1 r=125 b=false s=newstring u=<2> ia=[1] ra=[1.5] ba=[false] sa=[] ua=[] uuid=<6>
 108 010: i=0 r=123.5 b=true s=newstring u=<2> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 109 010: i=1 r=123.5 b=true s=mystring u=<3> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<4> <5>] uuid=<0>
 110 011: {"error":null,"result":[{"count":1}]}
 111 012: i=-1 r=125 b=false s=newstring u=<2> ia=[1] ra=[1.5] ba=[false] sa=[] ua=[] uuid=<6>
 112 012: i=1 r=123.5 b=true s=mystring u=<3> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<4> <5>] uuid=<0>
 113 013: reconnect
 114 014: i=-1 r=125 b=false s=newstring u=<2> ia=[1] ra=[1.5] ba=[false] sa=[] ua=[] uuid=<6>
 115 014: i=1 r=123.5 b=true s=mystring u=<3> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<4> <5>] uuid=<0>
 116 015: done
 117 ]])
 118
 119 OVSDB_CHECK_IDL([simple idl, initially populated],
 120   [['["idltest",
 121       {"op": "insert",
 122        "table": "simple",
 123        "row": {"i": 1,
 124                "r": 2.0,
 125                "b": true,
 126                "s": "mystring",
 127                "u": ["uuid", "84f5c8f5-ac76-4dbc-a24f-8860eb407fc1"],
 128                "ia": ["set", [1, 2, 3]],
 129                "ra": ["set", [-0.5]],
 130                "ba": ["set", [true, false]],
 131                "sa": ["set", ["abc", "def"]],
 132                "ua": ["set", [["uuid", "69443985-7806-45e2-b35f-574a04e720f9"],
 133                               ["uuid", "aad11ef0-816a-4b01-93e6-03b8b4256b98"]]]}},
 134       {"op": "insert",
 135        "table": "simple",
 136        "row": {}}]']],
 137   [['["idltest",
 138       {"op": "update",
 139        "table": "simple",
 140        "where": [],
 141        "row": {"b": true}}]']],
 142   [[000: i=0 r=0 b=false s= u=<0> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 143 000: i=1 r=2 b=true s=mystring u=<2> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<3> <4>] uuid=<5>
 144 001: {"error":null,"result":[{"count":2}]}
 145 002: i=0 r=0 b=true s= u=<0> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 146 002: i=1 r=2 b=true s=mystring u=<2> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<3> <4>] uuid=<5>
 147 003: done
 148 ]])
 149
 150 OVSDB_CHECK_IDL([simple idl, writing via IDL],
 151   [['["idltest",
 152       {"op": "insert",
 153        "table": "simple",
 154        "row": {"i": 1,
 155                "r": 2.0,
 156                "b": true,
 157                "s": "mystring",
 158                "u": ["uuid", "84f5c8f5-ac76-4dbc-a24f-8860eb407fc1"],
 159                "ia": ["set", [1, 2, 3]],
 160                "ra": ["set", [-0.5]],
 161                "ba": ["set", [true, false]],
 162                "sa": ["set", ["abc", "def"]],
 163                "ua": ["set", [["uuid", "69443985-7806-45e2-b35f-574a04e720f9"],
 164                               ["uuid", "aad11ef0-816a-4b01-93e6-03b8b4256b98"]]]}},
 165       {"op": "insert",
 166        "table": "simple",
 167        "row": {}}]']],
 168   [['set 0 b 1, set 1 r 3.5' \
 169     'insert 2, delete 1']],
 170   [[000: i=0 r=0 b=false s= u=<0> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 171 000: i=1 r=2 b=true s=mystring u=<2> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<3> <4>] uuid=<5>
 172 001: commit, status=success
 173 002: i=0 r=0 b=true s= u=<0> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 174 002: i=1 r=3.5 b=true s=mystring u=<2> ia=[1 2 3] ra=[-0.5] ba=[false true] sa=[abc def] ua=[<3> <4>] uuid=<5>
 175 003: commit, status=success
 176 004: i=0 r=0 b=true s= u=<0> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 177 004: i=2 r=0 b=false s= u=<0> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<6>
 178 005: done
 179 ]])
 180
 181 OVSDB_CHECK_IDL([simple idl, increment operation],
 182   [['["idltest",
 183       {"op": "insert",
 184        "table": "simple",
 185        "row": {}}]']],
 186   [['set 0 r 2.0, increment simple i']],
 187   [[000: i=0 r=0 b=false s= u=<0> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 188 001: commit, status=success, increment=1
 189 002: i=1 r=2 b=false s= u=<0> ia=[] ra=[] ba=[] sa=[] ua=[] uuid=<1>
 190 003: done
 191 ]])
 192
 193 OVSDB_CHECK_IDL([self-linking idl, consistent ops],
 194   [],
 195   [['["idltest",
 196       {"op": "insert",
 197        "table": "link1",
 198        "row": {"i": 0, "k": ["named-uuid", "self"]},
 199        "uuid-name": "self"}]' \
 200     '["idltest",
 201       {"op": "insert",
 202        "table": "link1",
 203        "row": {"i": 1, "k": ["named-uuid", "row2"]},
 204        "uuid-name": "row1"},
 205       {"op": "insert",
 206        "table": "link1",
 207        "row": {"i": 2, "k": ["named-uuid", "row1"]},
 208        "uuid-name": "row2"}]' \
 209     '["idltest",
 210       {"op": "update",
 211        "table": "link1",
 212        "where": [["i", "==", 1]],
 213        "row": {"k": ["uuid", "#1#"]}}]' \
 214     '["idltest",
 215       {"op": "update",
 216        "table": "link1",
 217        "where": [],
 218        "row": {"k": ["uuid", "#0#"]}}]']],
 219   [[000: empty
 220 001: {"error":null,"result":[{"uuid":["uuid","<0>"]}]}
 221 002: i=0 k=0 ka=[] l2= uuid=<0>
 222 003: {"error":null,"result":[{"uuid":["uuid","<1>"]},{"uuid":["uuid","<2>"]}]}
 223 004: i=0 k=0 ka=[] l2= uuid=<0>
 224 004: i=1 k=2 ka=[] l2= uuid=<1>
 225 004: i=2 k=1 ka=[] l2= uuid=<2>
 226 005: {"error":null,"result":[{"count":1}]}
 227 006: i=0 k=0 ka=[] l2= uuid=<0>
 228 006: i=1 k=1 ka=[] l2= uuid=<1>
 229 006: i=2 k=1 ka=[] l2= uuid=<2>
 230 007: {"error":null,"result":[{"count":3}]}
 231 008: i=0 k=0 ka=[] l2= uuid=<0>
 232 008: i=1 k=0 ka=[] l2= uuid=<1>
 233 008: i=2 k=0 ka=[] l2= uuid=<2>
 234 009: done
 235 ]])
 236
 237 OVSDB_CHECK_IDL([self-linking idl, inconsistent ops],
 238   [],
 239   [['["idltest",
 240       {"op": "insert",
 241        "table": "link1",
 242        "row": {"i": 0, "k": ["uuid", "cf197cc5-c8c9-42f5-82d5-c71a9f2cb96b"]}}]' \
 243     '+["idltest",
 244       {"op": "insert",
 245        "table": "link1",
 246        "uuid-name": "one",
 247        "row": {"i": 1, "k": ["named-uuid", "one"]}},
 248       {"op": "insert",
 249        "table": "link1",
 250        "row": {"i": 2, "k": ["named-uuid", "one"]}}]' \
 251      '["idltest",
 252       {"op": "update",
 253        "table": "link1",
 254        "where": [],
 255        "row": {"k": ["uuid", "c2fca39a-e69a-42a4-9c56-5eca85839ce9"]}}]' \
 256      '+["idltest",
 257       {"op": "delete",
 258        "table": "link1",
 259        "where": [["_uuid", "==", ["uuid", "#1#"]]]}]' \
 260      '+["idltest",
 261       {"op": "delete",
 262        "table": "link1",
 263        "where": [["_uuid", "==", ["uuid", "#2#"]]]}]' \
 264      '["idltest",
 265       {"op": "delete",
 266        "table": "link1",
 267        "where": []}]' \
 268 ]],
 269   [[000: empty
 270 001: {"error":null,"result":[{"uuid":["uuid","<0>"]},{"details":"Table link1 column k row <0> references nonexistent row <1> in table link1.","error":"referential integrity violation"}]}
 271 002: {"error":null,"result":[{"uuid":["uuid","<2>"]},{"uuid":["uuid","<3>"]}]}
 272 003: i=1 k=1 ka=[] l2= uuid=<2>
 273 003: i=2 k=1 ka=[] l2= uuid=<3>
 274 004: {"error":null,"result":[{"count":2},{"details":"Table link1 column k row <x> references nonexistent row <4> in table link1.","error":"referential integrity violation"}]}
 275 005: {"error":null,"result":[{"count":1},{"details":"cannot delete link1 row <2> because of 1 remaining reference(s)","error":"referential integrity violation"}]}
 276 006: {"error":null,"result":[{"count":1}]}
 277 007: i=1 k=1 ka=[] l2= uuid=<2>
 278 008: {"error":null,"result":[{"count":1}]}
 279 009: empty
 280 010: done
 281 ]],
 282   [],
 283   [[sed -e '/004:/s/row <[23]> references/row <x> references/']])
 284
 285 OVSDB_CHECK_IDL([self-linking idl, sets],
 286   [],
 287   [['["idltest",
 288       {"op": "insert",
 289        "table": "link1",
 290        "row": {"i": 0, "k": ["named-uuid", "i0"], "ka": ["set", [["named-uuid", "i0"]]]},
 291        "uuid-name": "i0"},
 292       {"op": "insert",
 293        "table": "link1",
 294        "row": {"i": 1, "k": ["named-uuid", "i0"], "ka": ["set", [["named-uuid", "i1"]]]},
 295        "uuid-name": "i1"},
 296       {"op": "insert",
 297        "table": "link1",
 298        "row": {"i": 2, "k": ["named-uuid", "i0"], "ka": ["set", [["named-uuid", "i2"]]]},
 299        "uuid-name": "i2"},
 300       {"op": "insert",
 301        "table": "link1",
 302        "row": {"i": 3, "k": ["named-uuid", "i0"], "ka": ["set", [["named-uuid", "i3"]]]},
 303        "uuid-name": "i3"}]' \
 304     '["idltest",
 305       {"op": "update",
 306        "table": "link1",
 307        "where": [],
 308        "row": {"ka": ["set", [["uuid", "#0#"], ["uuid", "#1#"], ["uuid", "#2#"], ["uuid", "#3#"]]]}}]' \
 309     '["idltest",
 310       {"op": "update",
 311        "table": "link1",
 312        "where": [["i", "==", 2]],
 313        "row": {"ka": ["set", [["uuid", "#0#"], ["uuid", "88702e78-845b-4a6e-ad08-cf68922ae84a"], ["uuid", "#2#"]]]}}]' \
 314     '+["idltest",
 315       {"op": "delete",
 316        "table": "link1",
 317        "where": []}]']],
 318   [[000: empty
 319 001: {"error":null,"result":[{"uuid":["uuid","<0>"]},{"uuid":["uuid","<1>"]},{"uuid":["uuid","<2>"]},{"uuid":["uuid","<3>"]}]}
 320 002: i=0 k=0 ka=[0] l2= uuid=<0>
 321 002: i=1 k=0 ka=[1] l2= uuid=<1>
 322 002: i=2 k=0 ka=[2] l2= uuid=<2>
 323 002: i=3 k=0 ka=[3] l2= uuid=<3>
 324 003: {"error":null,"result":[{"count":4}]}
 325 004: i=0 k=0 ka=[0 1 2 3] l2= uuid=<0>
 326 004: i=1 k=0 ka=[0 1 2 3] l2= uuid=<1>
 327 004: i=2 k=0 ka=[0 1 2 3] l2= uuid=<2>
 328 004: i=3 k=0 ka=[0 1 2 3] l2= uuid=<3>
 329 005: {"error":null,"result":[{"count":1},{"details":"Table link1 column ka row <2> references nonexistent row <4> in table link1.","error":"referential integrity violation"}]}
 330 006: {"error":null,"result":[{"count":4}]}
 331 007: empty
 332 008: done
 333 ]])
 334
 335 OVSDB_CHECK_IDL([external-linking idl, consistent ops],
 336   [],
 337   [['["idltest",
 338       {"op": "insert",
 339        "table": "link2",
 340        "row": {"i": 0},
 341        "uuid-name": "row0"},
 342       {"op": "insert",
 343        "table": "link1",
 344        "row": {"i": 1, "k": ["named-uuid", "row1"], "l2": ["set", [["named-uuid", "row0"]]]},
 345        "uuid-name": "row1"}]']],
 346   [[000: empty
 347 001: {"error":null,"result":[{"uuid":["uuid","<0>"]},{"uuid":["uuid","<1>"]}]}
 348 002: i=0 l1= uuid=<0>
 349 002: i=1 k=1 ka=[] l2=0 uuid=<1>
 350 003: done
 351 ]])