tests/test-ovsdb.c

   1 /*
   2  * Copyright (c) 2009, 2010, 2011, 2012, 2013, 2015 Nicira, Inc.
   3  *
   4  * Licensed under the Apache License, Version 2.0 (the "License");
   5  * you may not use this file except in compliance with the License.
   6  * You may obtain a copy of the License at:
   7  *
   8  *     http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  */
  16
  17 #include <config.h>
  18
  19 #include <assert.h>
  20 #include <fcntl.h>
  21 #include <getopt.h>
  22 #include <inttypes.h>
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25
  26 #include "command-line.h"
  27 #include "dynamic-string.h"
  28 #include "json.h"
  29 #include "jsonrpc.h"
  30 #include "ovsdb-data.h"
  31 #include "ovsdb-error.h"
  32 #include "ovsdb-idl.h"
  33 #include "ovsdb-types.h"
  34 #include "ovsdb/column.h"
  35 #include "ovsdb/condition.h"
  36 #include "ovsdb/file.h"
  37 #include "ovsdb/log.h"
  38 #include "ovsdb/mutation.h"
  39 #include "ovsdb/ovsdb.h"
  40 #include "ovsdb/query.h"
  41 #include "ovsdb/row.h"
  42 #include "ovsdb/server.h"
  43 #include "ovsdb/table.h"
  44 #include "ovsdb/transaction.h"
  45 #include "ovsdb/trigger.h"
  46 #include "poll-loop.h"
  47 #include "stream.h"
  48 #include "svec.h"
  49 #include "tests/idltest.h"
  50 #include "timeval.h"
  51 #include "util.h"
  52 #include "openvswitch/vlog.h"
  53
  54 struct test_ovsdb_pvt_context {
  55     bool track;
  56 };
  57
  58 OVS_NO_RETURN static void usage(void);
  59 static void parse_options(int argc, char *argv[],
  60     struct test_ovsdb_pvt_context *pvt);
  61 static struct ovs_cmdl_command *get_all_commands(void);
  62
  63 int
  64 main(int argc, char *argv[])
  65 {
  66     struct test_ovsdb_pvt_context pvt = {.track = false};
  67     struct ovs_cmdl_context ctx = { .argc = 0, .pvt = &pvt};
  68     set_program_name(argv[0]);
  69     parse_options(argc, argv, &pvt);
  70     ctx.argc = argc - optind;
  71     ctx.argv = argv + optind;
  72     ovs_cmdl_run_command(&ctx, get_all_commands());
  73     return 0;
  74 }
  75
  76 static void
  77 parse_options(int argc, char *argv[], struct test_ovsdb_pvt_context *pvt)
  78 {
  79     static const struct option long_options[] = {
  80         {"timeout", required_argument, NULL, 't'},
  81         {"verbose", optional_argument, NULL, 'v'},
  82         {"change-track", optional_argument, NULL, 'c'},
  83         {"help", no_argument, NULL, 'h'},
  84         {NULL, 0, NULL, 0},
  85     };
  86     char *short_options = ovs_cmdl_long_options_to_short_options(long_options);
  87
  88     for (;;) {
  89         unsigned long int timeout;
  90         int c;
  91
  92         c = getopt_long(argc, argv, short_options, long_options, NULL);
  93         if (c == -1) {
  94             break;
  95         }
  96
  97         switch (c) {
  98         case 't':
  99             timeout = strtoul(optarg, NULL, 10);
 100             if (timeout <= 0) {
 101                 ovs_fatal(0, "value %s on -t or --timeout is not at least 1",
 102                           optarg);
 103             } else {
 104                 time_alarm(timeout);
 105             }
 106             break;
 107
 108         case 'h':
 109             usage();
 110
 111         case 'v':
 112             vlog_set_verbosity(optarg);
 113             break;
 114
 115         case 'c':
 116             pvt->track = true;
 117             break;
 118
 119         case '?':
 120             exit(EXIT_FAILURE);
 121
 122         default:
 123             abort();
 124         }
 125     }
 126     free(short_options);
 127 }
 128
 129 static void
 130 usage(void)
 131 {
 132     printf("%s: Open vSwitch database test utility\n"
 133            "usage: %s [OPTIONS] COMMAND [ARG...]\n\n"
 134            "  log-io FILE FLAGS COMMAND...\n"
 135            "    open FILE with FLAGS, run COMMANDs\n"
 136            "  default-atoms\n"
 137            "    test ovsdb_atom_default()\n"
 138            "  default-data\n"
 139            "    test ovsdb_datum_default()\n"
 140            "  parse-atomic-type TYPE\n"
 141            "    parse TYPE as OVSDB atomic type, and re-serialize\n"
 142            "  parse-base-type TYPE\n"
 143            "    parse TYPE as OVSDB base type, and re-serialize\n"
 144            "  parse-type JSON\n"
 145            "    parse JSON as OVSDB type, and re-serialize\n"
 146            "  parse-atoms TYPE ATOM...\n"
 147            "    parse JSON ATOMs as atoms of TYPE, and re-serialize\n"
 148            "  parse-atom-strings TYPE ATOM...\n"
 149            "    parse string ATOMs as atoms of given TYPE, and re-serialize\n"
 150            "  sort-atoms TYPE ATOM...\n"
 151            "    print JSON ATOMs in sorted order\n"
 152            "  parse-data TYPE DATUM...\n"
 153            "    parse JSON DATUMs as data of given TYPE, and re-serialize\n"
 154            "  parse-data-strings TYPE DATUM...\n"
 155            "    parse string DATUMs as data of given TYPE, and re-serialize\n"
 156            "  parse-column NAME OBJECT\n"
 157            "    parse column NAME with info OBJECT, and re-serialize\n"
 158            "  parse-table NAME OBJECT [DEFAULT-IS-ROOT]\n"
 159            "    parse table NAME with info OBJECT\n"
 160            "  parse-row TABLE ROW..., and re-serialize\n"
 161            "    parse each ROW of defined TABLE\n"
 162            "  compare-row TABLE ROW...\n"
 163            "    mutually compare all of the ROWs, print those that are equal\n"
 164            "  parse-conditions TABLE CONDITION...\n"
 165            "    parse each CONDITION on TABLE, and re-serialize\n"
 166            "  evaluate-conditions TABLE [CONDITION,...] [ROW,...]\n"
 167            "    test CONDITIONS on TABLE against each ROW, print results\n"
 168            "  parse-mutations TABLE MUTATION...\n"
 169            "    parse each MUTATION on TABLE, and re-serialize\n"
 170            "  execute-mutations TABLE [MUTATION,...] [ROW,...]\n"
 171            "    execute MUTATIONS on TABLE on each ROW, print results\n"
 172            "  query TABLE [ROW,...] [CONDITION,...]\n"
 173            "    add each ROW to TABLE, then query and print the rows that\n"
 174            "    satisfy each CONDITION.\n"
 175            "  query-distinct TABLE [ROW,...] [CONDITION,...] COLUMNS\n"
 176            "    add each ROW to TABLE, then query and print the rows that\n"
 177            "    satisfy each CONDITION and have distinct COLUMNS.\n"
 178            "  parse-schema JSON\n"
 179            "    parse JSON as an OVSDB schema, and re-serialize\n"
 180            "  transact COMMAND\n"
 181            "    execute each specified transactional COMMAND:\n"
 182            "      commit\n"
 183            "      abort\n"
 184            "      insert UUID I J\n"
 185            "      delete UUID\n"
 186            "      modify UUID I J\n"
 187            "      print\n"
 188            "  execute SCHEMA TRANSACTION...\n"
 189            "    executes each TRANSACTION on an initially empty database\n"
 190            "    the specified SCHEMA\n"
 191            "  trigger SCHEMA TRANSACTION...\n"
 192            "    executes each TRANSACTION on an initially empty database\n"
 193            "    the specified SCHEMA.   A TRANSACTION of the form\n"
 194            "    [\"advance\", NUMBER] advances NUMBER milliseconds in\n"
 195            "    simulated time, for causing triggers to time out.\n"
 196            "  idl SERVER [TRANSACTION...]\n"
 197            "    connect to SERVER and dump the contents of the database\n"
 198            "    as seen initially by the IDL implementation and after\n"
 199            "    executing each TRANSACTION.  (Each TRANSACTION must modify\n"
 200            "    the database or this command will hang.)\n",
 201            program_name, program_name);
 202     vlog_usage();
 203     printf("\nOther options:\n"
 204            "  -t, --timeout=SECS          give up after SECS seconds\n"
 205            "  -h, --help                  display this help message\n"
 206            "  -c, --change-track          used with the 'idl' command to\n"
 207            "                              enable tracking of IDL changes\n");
 208     exit(EXIT_SUCCESS);
 209 }
 210 \f
 211 /* Command helper functions. */
 212
 213 static struct json *
 214 parse_json(const char *s)
 215 {
 216     struct json *json = json_from_string(s);
 217     if (json->type == JSON_STRING) {
 218         ovs_fatal(0, "\"%s\": %s", s, json->u.string);
 219     }
 220     return json;
 221 }
 222
 223 static struct json *
 224 unbox_json(struct json *json)
 225 {
 226     if (json->type == JSON_ARRAY && json->u.array.n == 1) {
 227         struct json *inner = json->u.array.elems[0];
 228         json->u.array.elems[0] = NULL;
 229         json_destroy(json);
 230         return inner;
 231     } else {
 232         return json;
 233     }
 234 }
 235
 236 static void
 237 print_and_free_json(struct json *json)
 238 {
 239     char *string = json_to_string(json, JSSF_SORT);
 240     json_destroy(json);
 241     puts(string);
 242     free(string);
 243 }
 244
 245 static void
 246 print_and_free_ovsdb_error(struct ovsdb_error *error)
 247 {
 248     char *string = ovsdb_error_to_string(error);
 249     ovsdb_error_destroy(error);
 250     puts(string);
 251     free(string);
 252 }
 253
 254 static void
 255 check_ovsdb_error(struct ovsdb_error *error)
 256 {
 257     if (error) {
 258         char *s = ovsdb_error_to_string(error);
 259         ovsdb_error_destroy(error);
 260         ovs_fatal(0, "%s", s);
 261     }
 262 }
 263
 264 static void
 265 die_if_error(char *error)
 266 {
 267     if (error) {
 268         ovs_fatal(0, "%s", error);
 269     }
 270 }
 271 \f
 272 /* Command implementations. */
 273
 274 static void
 275 do_log_io(struct ovs_cmdl_context *ctx)
 276 {
 277     const char *name = ctx->argv[1];
 278     char *mode_string = ctx->argv[2];
 279
 280     struct ovsdb_error *error;
 281     enum ovsdb_log_open_mode mode;
 282     struct ovsdb_log *log;
 283     int i;
 284
 285     if (!strcmp(mode_string, "read-only")) {
 286         mode = OVSDB_LOG_READ_ONLY;
 287     } else if (!strcmp(mode_string, "read/write")) {
 288         mode = OVSDB_LOG_READ_WRITE;
 289     } else if (!strcmp(mode_string, "create")) {
 290         mode = OVSDB_LOG_CREATE;
 291     } else {
 292         ovs_fatal(0, "unknown log-io open mode \"%s\"", mode_string);
 293     }
 294
 295     check_ovsdb_error(ovsdb_log_open(name, mode, -1, &log));
 296     printf("%s: open successful\n", name);
 297
 298     for (i = 3; i < ctx->argc; i++) {
 299         const char *command = ctx->argv[i];
 300         if (!strcmp(command, "read")) {
 301             struct json *json;
 302
 303             error = ovsdb_log_read(log, &json);
 304             if (!error) {
 305                 printf("%s: read: ", name);
 306                 if (json) {
 307                     print_and_free_json(json);
 308                 } else {
 309                     printf("end of log\n");
 310                 }
 311                 continue;
 312             }
 313         } else if (!strncmp(command, "write:", 6)) {
 314             struct json *json = parse_json(command + 6);
 315             error = ovsdb_log_write(log, json);
 316             json_destroy(json);
 317         } else if (!strcmp(command, "commit")) {
 318             error = ovsdb_log_commit(log);
 319         } else {
 320             ovs_fatal(0, "unknown log-io command \"%s\"", command);
 321         }
 322         if (error) {
 323             char *s = ovsdb_error_to_string(error);
 324             printf("%s: %s failed: %s\n", name, command, s);
 325             free(s);
 326             ovsdb_error_destroy(error);
 327         } else {
 328             printf("%s: %s successful\n", name, command);
 329         }
 330     }
 331
 332     ovsdb_log_close(log);
 333 }
 334
 335 static void
 336 do_default_atoms(struct ovs_cmdl_context *ctx OVS_UNUSED)
 337 {
 338     int type;
 339
 340     for (type = 0; type < OVSDB_N_TYPES; type++) {
 341         union ovsdb_atom atom;
 342
 343         if (type == OVSDB_TYPE_VOID) {
 344             continue;
 345         }
 346
 347         printf("%s: ", ovsdb_atomic_type_to_string(type));
 348
 349         ovsdb_atom_init_default(&atom, type);
 350         if (!ovsdb_atom_equals(&atom, ovsdb_atom_default(type), type)) {
 351             printf("wrong\n");
 352             exit(1);
 353         }
 354         ovsdb_atom_destroy(&atom, type);
 355
 356         printf("OK\n");
 357     }
 358 }
 359
 360 static void
 361 do_default_data(struct ovs_cmdl_context *ctx OVS_UNUSED)
 362 {
 363     unsigned int n_min;
 364     int key, value;
 365
 366     for (n_min = 0; n_min <= 1; n_min++) {
 367         for (key = 0; key < OVSDB_N_TYPES; key++) {
 368             if (key == OVSDB_TYPE_VOID) {
 369                 continue;
 370             }
 371             for (value = 0; value < OVSDB_N_TYPES; value++) {
 372                 struct ovsdb_datum datum;
 373                 struct ovsdb_type type;
 374
 375                 ovsdb_base_type_init(&type.key, key);
 376                 ovsdb_base_type_init(&type.value, value);
 377                 type.n_min = n_min;
 378                 type.n_max = 1;
 379                 assert(ovsdb_type_is_valid(&type));
 380
 381                 printf("key %s, value %s, n_min %u: ",
 382                        ovsdb_atomic_type_to_string(key),
 383                        ovsdb_atomic_type_to_string(value), n_min);
 384
 385                 ovsdb_datum_init_default(&datum, &type);
 386                 if (!ovsdb_datum_equals(&datum, ovsdb_datum_default(&type),
 387                                         &type)) {
 388                     printf("wrong\n");
 389                     exit(1);
 390                 }
 391                 ovsdb_datum_destroy(&datum, &type);
 392                 ovsdb_type_destroy(&type);
 393
 394                 printf("OK\n");
 395             }
 396         }
 397     }
 398 }
 399
 400 static void
 401 do_diff_data(struct ovs_cmdl_context *ctx)
 402 {
 403     struct ovsdb_type type;
 404     struct json *json;
 405     struct ovsdb_datum new, old, diff, reincarnation;
 406
 407     json = unbox_json(parse_json(ctx->argv[1]));
 408     check_ovsdb_error(ovsdb_type_from_json(&type, json));
 409     json_destroy(json);
 410
 411     /* Arguments in pairs of 'old' and 'new'. */
 412     for (int i = 2; i < ctx->argc - 1; i+=2) {
 413         struct ovsdb_error *error;
 414
 415         json = unbox_json(parse_json(ctx->argv[i]));
 416         check_ovsdb_error(ovsdb_datum_from_json(&old, &type, json, NULL));
 417         json_destroy(json);
 418
 419         json = unbox_json(parse_json(ctx->argv[i+1]));
 420         check_ovsdb_error(ovsdb_transient_datum_from_json(&new, &type, json));
 421         json_destroy(json);
 422
 423         /* Generate the diff.  */
 424         ovsdb_datum_diff(&diff, &old, &new, &type);
 425
 426         /* Apply diff to 'old' to create'reincarnation'. */
 427         error = ovsdb_datum_apply_diff(&reincarnation, &old, &diff, &type);
 428         if (error) {
 429             char *string = ovsdb_error_to_string(error);
 430             ovsdb_error_destroy(error);
 431             ovs_fatal(0, "%s", string);
 432         }
 433
 434         /* Test to make sure 'new' equals 'reincarnation'.  */
 435         if (!ovsdb_datum_equals(&new, &reincarnation, &type)) {
 436             ovs_fatal(0, "failed to apply diff");
 437         }
 438
 439         /* Print diff */
 440         json = ovsdb_datum_to_json(&diff, &type);
 441         printf ("diff: ");
 442         print_and_free_json(json);
 443
 444         /* Print reincarnation */
 445         json = ovsdb_datum_to_json(&reincarnation, &type);
 446         printf ("apply diff: ");
 447         print_and_free_json(json);
 448
 449         ovsdb_datum_destroy(&new, &type);
 450         ovsdb_datum_destroy(&old, &type);
 451         ovsdb_datum_destroy(&diff, &type);
 452         ovsdb_datum_destroy(&reincarnation, &type);
 453
 454         printf("OK\n");
 455     }
 456
 457     ovsdb_type_destroy(&type);
 458 }
 459
 460 static void
 461 do_parse_atomic_type(struct ovs_cmdl_context *ctx)
 462 {
 463     enum ovsdb_atomic_type type;
 464     struct json *json;
 465
 466     json = unbox_json(parse_json(ctx->argv[1]));
 467     check_ovsdb_error(ovsdb_atomic_type_from_json(&type, json));
 468     json_destroy(json);
 469     print_and_free_json(ovsdb_atomic_type_to_json(type));
 470 }
 471
 472 static void
 473 do_parse_base_type(struct ovs_cmdl_context *ctx)
 474 {
 475     struct ovsdb_base_type base;
 476     struct json *json;
 477
 478     json = unbox_json(parse_json(ctx->argv[1]));
 479     check_ovsdb_error(ovsdb_base_type_from_json(&base, json));
 480     json_destroy(json);
 481     print_and_free_json(ovsdb_base_type_to_json(&base));
 482     ovsdb_base_type_destroy(&base);
 483 }
 484
 485 static void
 486 do_parse_type(struct ovs_cmdl_context *ctx)
 487 {
 488     struct ovsdb_type type;
 489     struct json *json;
 490
 491     json = unbox_json(parse_json(ctx->argv[1]));
 492     check_ovsdb_error(ovsdb_type_from_json(&type, json));
 493     json_destroy(json);
 494     print_and_free_json(ovsdb_type_to_json(&type));
 495     ovsdb_type_destroy(&type);
 496 }
 497
 498 static void
 499 do_parse_atoms(struct ovs_cmdl_context *ctx)
 500 {
 501     struct ovsdb_base_type base;
 502     struct json *json;
 503     int i;
 504
 505     json = unbox_json(parse_json(ctx->argv[1]));
 506     check_ovsdb_error(ovsdb_base_type_from_json(&base, json));
 507     json_destroy(json);
 508
 509     for (i = 2; i < ctx->argc; i++) {
 510         struct ovsdb_error *error;
 511         union ovsdb_atom atom;
 512
 513         json = unbox_json(parse_json(ctx->argv[i]));
 514         error = ovsdb_atom_from_json(&atom, &base, json, NULL);
 515         json_destroy(json);
 516
 517         if (error) {
 518             print_and_free_ovsdb_error(error);
 519         } else {
 520             print_and_free_json(ovsdb_atom_to_json(&atom, base.type));
 521             ovsdb_atom_destroy(&atom, base.type);
 522         }
 523     }
 524     ovsdb_base_type_destroy(&base);
 525 }
 526
 527 static void
 528 do_parse_atom_strings(struct ovs_cmdl_context *ctx)
 529 {
 530     struct ovsdb_base_type base;
 531     struct json *json;
 532     int i;
 533
 534     json = unbox_json(parse_json(ctx->argv[1]));
 535     check_ovsdb_error(ovsdb_base_type_from_json(&base, json));
 536     json_destroy(json);
 537
 538     for (i = 2; i < ctx->argc; i++) {
 539         union ovsdb_atom atom;
 540         struct ds out;
 541
 542         die_if_error(ovsdb_atom_from_string(&atom, &base, ctx->argv[i], NULL));
 543
 544         ds_init(&out);
 545         ovsdb_atom_to_string(&atom, base.type, &out);
 546         puts(ds_cstr(&out));
 547         ds_destroy(&out);
 548
 549         ovsdb_atom_destroy(&atom, base.type);
 550     }
 551     ovsdb_base_type_destroy(&base);
 552 }
 553
 554 static void
 555 do_parse_data__(int argc, char *argv[],
 556                 struct ovsdb_error *
 557                 (*parse)(struct ovsdb_datum *datum,
 558                          const struct ovsdb_type *type,
 559                          const struct json *json,
 560                          struct ovsdb_symbol_table *symtab))
 561 {
 562     struct ovsdb_type type;
 563     struct json *json;
 564     int i;
 565
 566     json = unbox_json(parse_json(argv[1]));
 567     check_ovsdb_error(ovsdb_type_from_json(&type, json));
 568     json_destroy(json);
 569
 570     for (i = 2; i < argc; i++) {
 571         struct ovsdb_datum datum;
 572
 573         json = unbox_json(parse_json(argv[i]));
 574         check_ovsdb_error(parse(&datum, &type, json, NULL));
 575         json_destroy(json);
 576
 577         print_and_free_json(ovsdb_datum_to_json(&datum, &type));
 578
 579         ovsdb_datum_destroy(&datum, &type);
 580     }
 581     ovsdb_type_destroy(&type);
 582 }
 583
 584 static void
 585 do_parse_data(struct ovs_cmdl_context *ctx)
 586 {
 587     do_parse_data__(ctx->argc, ctx->argv, ovsdb_datum_from_json);
 588 }
 589
 590 static void
 591 do_parse_data_strings(struct ovs_cmdl_context *ctx)
 592 {
 593     struct ovsdb_type type;
 594     struct json *json;
 595     int i;
 596
 597     json = unbox_json(parse_json(ctx->argv[1]));
 598     check_ovsdb_error(ovsdb_type_from_json(&type, json));
 599     json_destroy(json);
 600
 601     for (i = 2; i < ctx->argc; i++) {
 602         struct ovsdb_datum datum;
 603         struct ds out;
 604
 605         die_if_error(ovsdb_datum_from_string(&datum, &type, ctx->argv[i], NULL));
 606
 607         ds_init(&out);
 608         ovsdb_datum_to_string(&datum, &type, &out);
 609         puts(ds_cstr(&out));
 610         ds_destroy(&out);
 611
 612         ovsdb_datum_destroy(&datum, &type);
 613     }
 614     ovsdb_type_destroy(&type);
 615 }
 616
 617 static enum ovsdb_atomic_type compare_atoms_atomic_type;
 618
 619 static int
 620 compare_atoms(const void *a_, const void *b_)
 621 {
 622     const union ovsdb_atom *a = a_;
 623     const union ovsdb_atom *b = b_;
 624
 625     return ovsdb_atom_compare_3way(a, b, compare_atoms_atomic_type);
 626 }
 627
 628 static void
 629 do_sort_atoms(struct ovs_cmdl_context *ctx)
 630 {
 631     struct ovsdb_base_type base;
 632     union ovsdb_atom *atoms;
 633     struct json *json, **json_atoms;
 634     size_t n_atoms;
 635     int i;
 636
 637     json = unbox_json(parse_json(ctx->argv[1]));
 638     check_ovsdb_error(ovsdb_base_type_from_json(&base, json));
 639     json_destroy(json);
 640
 641     json = unbox_json(parse_json(ctx->argv[2]));
 642     if (json->type != JSON_ARRAY) {
 643         ovs_fatal(0, "second argument must be array");
 644     }
 645
 646     /* Convert JSON atoms to internal representation. */
 647     n_atoms = json->u.array.n;
 648     atoms = xmalloc(n_atoms * sizeof *atoms);
 649     for (i = 0; i < n_atoms; i++) {
 650         check_ovsdb_error(ovsdb_atom_from_json(&atoms[i], &base,
 651                                                json->u.array.elems[i], NULL));
 652     }
 653     json_destroy(json);
 654
 655     /* Sort atoms. */
 656     compare_atoms_atomic_type = base.type;
 657     qsort(atoms, n_atoms, sizeof *atoms, compare_atoms);
 658
 659     /* Convert internal representation back to JSON. */
 660     json_atoms = xmalloc(n_atoms * sizeof *json_atoms);
 661     for (i = 0; i < n_atoms; i++) {
 662         json_atoms[i] = ovsdb_atom_to_json(&atoms[i], base.type);
 663         ovsdb_atom_destroy(&atoms[i], base.type);
 664     }
 665     print_and_free_json(json_array_create(json_atoms, n_atoms));
 666     free(atoms);
 667     ovsdb_base_type_destroy(&base);
 668 }
 669
 670 static void
 671 do_parse_column(struct ovs_cmdl_context *ctx)
 672 {
 673     struct ovsdb_column *column;
 674     struct json *json;
 675
 676     json = parse_json(ctx->argv[2]);
 677     check_ovsdb_error(ovsdb_column_from_json(json, ctx->argv[1], &column));
 678     json_destroy(json);
 679     print_and_free_json(ovsdb_column_to_json(column));
 680     ovsdb_column_destroy(column);
 681 }
 682
 683 static void
 684 do_parse_table(struct ovs_cmdl_context *ctx)
 685 {
 686     struct ovsdb_table_schema *ts;
 687     bool default_is_root;
 688     struct json *json;
 689
 690     default_is_root = ctx->argc > 3 && !strcmp(ctx->argv[3], "true");
 691
 692     json = parse_json(ctx->argv[2]);
 693     check_ovsdb_error(ovsdb_table_schema_from_json(json, ctx->argv[1], &ts));
 694     json_destroy(json);
 695     print_and_free_json(ovsdb_table_schema_to_json(ts, default_is_root));
 696     ovsdb_table_schema_destroy(ts);
 697 }
 698
 699 static void
 700 do_parse_rows(struct ovs_cmdl_context *ctx)
 701 {
 702     struct ovsdb_column_set all_columns;
 703     struct ovsdb_table_schema *ts;
 704     struct ovsdb_table *table;
 705     struct json *json;
 706     int i;
 707
 708     json = unbox_json(parse_json(ctx->argv[1]));
 709     check_ovsdb_error(ovsdb_table_schema_from_json(json, "mytable", &ts));
 710     json_destroy(json);
 711
 712     table = ovsdb_table_create(ts);
 713     ovsdb_column_set_init(&all_columns);
 714     ovsdb_column_set_add_all(&all_columns, table);
 715
 716     for (i = 2; i < ctx->argc; i++) {
 717         struct ovsdb_column_set columns;
 718         struct ovsdb_row *row;
 719
 720         ovsdb_column_set_init(&columns);
 721         row = ovsdb_row_create(table);
 722
 723         json = unbox_json(parse_json(ctx->argv[i]));
 724         check_ovsdb_error(ovsdb_row_from_json(row, json, NULL, &columns));
 725         json_destroy(json);
 726
 727         print_and_free_json(ovsdb_row_to_json(row, &all_columns));
 728
 729         if (columns.n_columns) {
 730             struct svec names;
 731             size_t j;
 732             char *s;
 733
 734             svec_init(&names);
 735             for (j = 0; j < columns.n_columns; j++) {
 736                 svec_add(&names, columns.columns[j]->name);
 737             }
 738             svec_sort(&names);
 739             s = svec_join(&names, ", ", "");
 740             puts(s);
 741             free(s);
 742             svec_destroy(&names);
 743         } else {
 744             printf("<none>\n");
 745         }
 746
 747         ovsdb_column_set_destroy(&columns);
 748         ovsdb_row_destroy(row);
 749     }
 750
 751     ovsdb_column_set_destroy(&all_columns);
 752     ovsdb_table_destroy(table); /* Also destroys 'ts'. */
 753 }
 754
 755 static void
 756 do_compare_rows(struct ovs_cmdl_context *ctx)
 757 {
 758     struct ovsdb_column_set all_columns;
 759     struct ovsdb_table_schema *ts;
 760     struct ovsdb_table *table;
 761     struct ovsdb_row **rows;
 762     struct json *json;
 763     char **names;
 764     int n_rows;
 765     int i, j;
 766
 767     json = unbox_json(parse_json(ctx->argv[1]));
 768     check_ovsdb_error(ovsdb_table_schema_from_json(json, "mytable", &ts));
 769     json_destroy(json);
 770
 771     table = ovsdb_table_create(ts);
 772     ovsdb_column_set_init(&all_columns);
 773     ovsdb_column_set_add_all(&all_columns, table);
 774
 775     n_rows = ctx->argc - 2;
 776     rows = xmalloc(sizeof *rows * n_rows);
 777     names = xmalloc(sizeof *names * n_rows);
 778     for (i = 0; i < n_rows; i++) {
 779         rows[i] = ovsdb_row_create(table);
 780
 781         json = parse_json(ctx->argv[i + 2]);
 782         if (json->type != JSON_ARRAY || json->u.array.n != 2
 783             || json->u.array.elems[0]->type != JSON_STRING) {
 784             ovs_fatal(0, "\"%s\" does not have expected form "
 785                       "[\"name\", {data}]", ctx->argv[i]);
 786         }
 787         names[i] = xstrdup(json->u.array.elems[0]->u.string);
 788         check_ovsdb_error(ovsdb_row_from_json(rows[i], json->u.array.elems[1],
 789                                               NULL, NULL));
 790         json_destroy(json);
 791     }
 792     for (i = 0; i < n_rows; i++) {
 793         uint32_t i_hash = ovsdb_row_hash_columns(rows[i], &all_columns, 0);
 794         for (j = i + 1; j < n_rows; j++) {
 795             uint32_t j_hash = ovsdb_row_hash_columns(rows[j], &all_columns, 0);
 796             if (ovsdb_row_equal_columns(rows[i], rows[j], &all_columns)) {
 797                 printf("%s == %s\n", names[i], names[j]);
 798                 if (i_hash != j_hash) {
 799                     printf("but hash(%s) != hash(%s)\n", names[i], names[j]);
 800                     abort();
 801                 }
 802             } else if (i_hash == j_hash) {
 803                 printf("hash(%s) == hash(%s)\n", names[i], names[j]);
 804             }
 805         }
 806     }
 807     for (i = 0; i < n_rows; i++) {
 808         ovsdb_row_destroy(rows[i]);
 809         free(names[i]);
 810     }
 811     free(rows);
 812     free(names);
 813
 814     ovsdb_column_set_destroy(&all_columns);
 815     ovsdb_table_destroy(table); /* Also destroys 'ts'. */
 816 }
 817
 818 static void
 819 do_parse_conditions(struct ovs_cmdl_context *ctx)
 820 {
 821     struct ovsdb_table_schema *ts;
 822     struct json *json;
 823     int exit_code = 0;
 824     int i;
 825
 826     json = unbox_json(parse_json(ctx->argv[1]));
 827     check_ovsdb_error(ovsdb_table_schema_from_json(json, "mytable", &ts));
 828     json_destroy(json);
 829
 830     for (i = 2; i < ctx->argc; i++) {
 831         struct ovsdb_condition cnd;
 832         struct ovsdb_error *error;
 833
 834         json = parse_json(ctx->argv[i]);
 835         error = ovsdb_condition_from_json(ts, json, NULL, &cnd);
 836         if (!error) {
 837             print_and_free_json(ovsdb_condition_to_json(&cnd));
 838         } else {
 839             char *s = ovsdb_error_to_string(error);
 840             ovs_error(0, "%s", s);
 841             free(s);
 842             ovsdb_error_destroy(error);
 843             exit_code = 1;
 844         }
 845         json_destroy(json);
 846
 847         ovsdb_condition_destroy(&cnd);
 848     }
 849     ovsdb_table_schema_destroy(ts);
 850
 851     exit(exit_code);
 852 }
 853
 854 static void
 855 do_evaluate_conditions(struct ovs_cmdl_context *ctx)
 856 {
 857     struct ovsdb_table_schema *ts;
 858     struct ovsdb_table *table;
 859     struct ovsdb_condition *conditions;
 860     size_t n_conditions;
 861     struct ovsdb_row **rows;
 862     size_t n_rows;
 863     struct json *json;
 864     size_t i, j;
 865
 866     /* Parse table schema, create table. */
 867     json = unbox_json(parse_json(ctx->argv[1]));
 868     check_ovsdb_error(ovsdb_table_schema_from_json(json, "mytable", &ts));
 869     json_destroy(json);
 870
 871     table = ovsdb_table_create(ts);
 872
 873     /* Parse conditions. */
 874     json = parse_json(ctx->argv[2]);
 875     if (json->type != JSON_ARRAY) {
 876         ovs_fatal(0, "CONDITION argument is not JSON array");
 877     }
 878     n_conditions = json->u.array.n;
 879     conditions = xmalloc(n_conditions * sizeof *conditions);
 880     for (i = 0; i < n_conditions; i++) {
 881         check_ovsdb_error(ovsdb_condition_from_json(ts, json->u.array.elems[i],
 882                                                     NULL, &conditions[i]));
 883     }
 884     json_destroy(json);
 885
 886     /* Parse rows. */
 887     json = parse_json(ctx->argv[3]);
 888     if (json->type != JSON_ARRAY) {
 889         ovs_fatal(0, "ROW argument is not JSON array");
 890     }
 891     n_rows = json->u.array.n;
 892     rows = xmalloc(n_rows * sizeof *rows);
 893     for (i = 0; i < n_rows; i++) {
 894         rows[i] = ovsdb_row_create(table);
 895         check_ovsdb_error(ovsdb_row_from_json(rows[i], json->u.array.elems[i],
 896                                               NULL, NULL));
 897     }
 898     json_destroy(json);
 899
 900     for (i = 0; i < n_conditions; i++) {
 901         printf("condition %2"PRIuSIZE":", i);
 902         for (j = 0; j < n_rows; j++) {
 903             bool result = ovsdb_condition_evaluate(rows[j], &conditions[i]);
 904             if (j % 5 == 0) {
 905                 putchar(' ');
 906             }
 907             putchar(result ? 'T' : '-');
 908         }
 909         printf("\n");
 910     }
 911
 912     for (i = 0; i < n_conditions; i++) {
 913         ovsdb_condition_destroy(&conditions[i]);
 914     }
 915     free(conditions);
 916     for (i = 0; i < n_rows; i++) {
 917         ovsdb_row_destroy(rows[i]);
 918     }
 919     free(rows);
 920     ovsdb_table_destroy(table); /* Also destroys 'ts'. */
 921 }
 922
 923 static void
 924 do_parse_mutations(struct ovs_cmdl_context *ctx)
 925 {
 926     struct ovsdb_table_schema *ts;
 927     struct json *json;
 928     int exit_code = 0;
 929     int i;
 930
 931     json = unbox_json(parse_json(ctx->argv[1]));
 932     check_ovsdb_error(ovsdb_table_schema_from_json(json, "mytable", &ts));
 933     json_destroy(json);
 934
 935     for (i = 2; i < ctx->argc; i++) {
 936         struct ovsdb_mutation_set set;
 937         struct ovsdb_error *error;
 938
 939         json = parse_json(ctx->argv[i]);
 940         error = ovsdb_mutation_set_from_json(ts, json, NULL, &set);
 941         if (!error) {
 942             print_and_free_json(ovsdb_mutation_set_to_json(&set));
 943         } else {
 944             char *s = ovsdb_error_to_string(error);
 945             ovs_error(0, "%s", s);
 946             free(s);
 947             ovsdb_error_destroy(error);
 948             exit_code = 1;
 949         }
 950         json_destroy(json);
 951
 952         ovsdb_mutation_set_destroy(&set);
 953     }
 954     ovsdb_table_schema_destroy(ts);
 955
 956     exit(exit_code);
 957 }
 958
 959 static void
 960 do_execute_mutations(struct ovs_cmdl_context *ctx)
 961 {
 962     struct ovsdb_table_schema *ts;
 963     struct ovsdb_table *table;
 964     struct ovsdb_mutation_set *sets;
 965     size_t n_sets;
 966     struct ovsdb_row **rows;
 967     size_t n_rows;
 968     struct json *json;
 969     size_t i, j;
 970
 971     /* Parse table schema, create table. */
 972     json = unbox_json(parse_json(ctx->argv[1]));
 973     check_ovsdb_error(ovsdb_table_schema_from_json(json, "mytable", &ts));
 974     json_destroy(json);
 975
 976     table = ovsdb_table_create(ts);
 977
 978     /* Parse mutations. */
 979     json = parse_json(ctx->argv[2]);
 980     if (json->type != JSON_ARRAY) {
 981         ovs_fatal(0, "MUTATION argument is not JSON array");
 982     }
 983     n_sets = json->u.array.n;
 984     sets = xmalloc(n_sets * sizeof *sets);
 985     for (i = 0; i < n_sets; i++) {
 986         check_ovsdb_error(ovsdb_mutation_set_from_json(ts,
 987                                                        json->u.array.elems[i],
 988                                                        NULL, &sets[i]));
 989     }
 990     json_destroy(json);
 991
 992     /* Parse rows. */
 993     json = parse_json(ctx->argv[3]);
 994     if (json->type != JSON_ARRAY) {
 995         ovs_fatal(0, "ROW argument is not JSON array");
 996     }
 997     n_rows = json->u.array.n;
 998     rows = xmalloc(n_rows * sizeof *rows);
 999     for (i = 0; i < n_rows; i++) {
1000         rows[i] = ovsdb_row_create(table);
1001         check_ovsdb_error(ovsdb_row_from_json(rows[i], json->u.array.elems[i],
1002                                               NULL, NULL));
1003     }
1004     json_destroy(json);
1005
1006     for (i = 0; i < n_sets; i++) {
1007         printf("mutation %2"PRIuSIZE":\n", i);
1008         for (j = 0; j < n_rows; j++) {
1009             struct ovsdb_error *error;
1010             struct ovsdb_row *row;
1011
1012             row = ovsdb_row_clone(rows[j]);
1013             error = ovsdb_mutation_set_execute(row, &sets[i]);
1014
1015             printf("row %"PRIuSIZE": ", j);
1016             if (error) {
1017                 print_and_free_ovsdb_error(error);
1018             } else {
1019                 struct ovsdb_column_set columns;
1020                 struct shash_node *node;
1021
1022                 ovsdb_column_set_init(&columns);
1023                 SHASH_FOR_EACH (node, &ts->columns) {
1024                     struct ovsdb_column *c = node->data;
1025                     if (!ovsdb_datum_equals(&row->fields[c->index],
1026                                             &rows[j]->fields[c->index],
1027                                             &c->type)) {
1028                         ovsdb_column_set_add(&columns, c);
1029                     }
1030                 }
1031                 if (columns.n_columns) {
1032                     print_and_free_json(ovsdb_row_to_json(row, &columns));
1033                 } else {
1034                     printf("no change\n");
1035                 }
1036                 ovsdb_column_set_destroy(&columns);
1037             }
1038             ovsdb_row_destroy(row);
1039         }
1040         printf("\n");
1041     }
1042
1043     for (i = 0; i < n_sets; i++) {
1044         ovsdb_mutation_set_destroy(&sets[i]);
1045     }
1046     free(sets);
1047     for (i = 0; i < n_rows; i++) {
1048         ovsdb_row_destroy(rows[i]);
1049     }
1050     free(rows);
1051     ovsdb_table_destroy(table); /* Also destroys 'ts'. */
1052 }
1053
1054 /* Inserts a row, without bothering to update metadata such as refcounts. */
1055 static void
1056 put_row(struct ovsdb_table *table, struct ovsdb_row *row)
1057 {
1058     const struct uuid *uuid = ovsdb_row_get_uuid(row);
1059     if (!ovsdb_table_get_row(table, uuid)) {
1060         hmap_insert(&table->rows, &row->hmap_node, uuid_hash(uuid));
1061     }
1062 }
1063
1064 struct do_query_cbdata {
1065     struct uuid *row_uuids;
1066     int *counts;
1067     size_t n_rows;
1068 };
1069
1070 static bool
1071 do_query_cb(const struct ovsdb_row *row, void *cbdata_)
1072 {
1073     struct do_query_cbdata *cbdata = cbdata_;
1074     size_t i;
1075
1076     for (i = 0; i < cbdata->n_rows; i++) {
1077         if (uuid_equals(ovsdb_row_get_uuid(row), &cbdata->row_uuids[i])) {
1078             cbdata->counts[i]++;
1079         }
1080     }
1081
1082     return true;
1083 }
1084
1085 static void
1086 do_query(struct ovs_cmdl_context *ctx)
1087 {
1088     struct do_query_cbdata cbdata;
1089     struct ovsdb_table_schema *ts;
1090     struct ovsdb_table *table;
1091     struct json *json;
1092     int exit_code = 0;
1093     size_t i;
1094
1095     /* Parse table schema, create table. */
1096     json = unbox_json(parse_json(ctx->argv[1]));
1097     check_ovsdb_error(ovsdb_table_schema_from_json(json, "mytable", &ts));
1098     json_destroy(json);
1099
1100     table = ovsdb_table_create(ts);
1101
1102     /* Parse rows, add to table. */
1103     json = parse_json(ctx->argv[2]);
1104     if (json->type != JSON_ARRAY) {
1105         ovs_fatal(0, "ROW argument is not JSON array");
1106     }
1107     cbdata.n_rows = json->u.array.n;
1108     cbdata.row_uuids = xmalloc(cbdata.n_rows * sizeof *cbdata.row_uuids);
1109     cbdata.counts = xmalloc(cbdata.n_rows * sizeof *cbdata.counts);
1110     for (i = 0; i < cbdata.n_rows; i++) {
1111         struct ovsdb_row *row = ovsdb_row_create(table);
1112         uuid_generate(ovsdb_row_get_uuid_rw(row));
1113         check_ovsdb_error(ovsdb_row_from_json(row, json->u.array.elems[i],
1114                                               NULL, NULL));
1115         if (ovsdb_table_get_row(table, ovsdb_row_get_uuid(row))) {
1116             ovs_fatal(0, "duplicate UUID "UUID_FMT" in table",
1117                       UUID_ARGS(ovsdb_row_get_uuid(row)));
1118         }
1119         cbdata.row_uuids[i] = *ovsdb_row_get_uuid(row);
1120         put_row(table, row);
1121     }
1122     json_destroy(json);
1123
1124     /* Parse conditions and execute queries. */
1125     json = parse_json(ctx->argv[3]);
1126     if (json->type != JSON_ARRAY) {
1127         ovs_fatal(0, "CONDITION argument is not JSON array");
1128     }
1129     for (i = 0; i < json->u.array.n; i++) {
1130         struct ovsdb_condition cnd;
1131         size_t j;
1132
1133         check_ovsdb_error(ovsdb_condition_from_json(ts, json->u.array.elems[i],
1134                                                     NULL, &cnd));
1135
1136         memset(cbdata.counts, 0, cbdata.n_rows * sizeof *cbdata.counts);
1137         ovsdb_query(table, &cnd, do_query_cb, &cbdata);
1138
1139         printf("query %2"PRIuSIZE":", i);
1140         for (j = 0; j < cbdata.n_rows; j++) {
1141             if (j % 5 == 0) {
1142                 putchar(' ');
1143             }
1144             if (cbdata.counts[j]) {
1145                 printf("%d", cbdata.counts[j]);
1146                 if (cbdata.counts[j] > 1) {
1147                     /* Dup! */
1148                     exit_code = 1;
1149                 }
1150             } else {
1151                 putchar('-');
1152             }
1153         }
1154         putchar('\n');
1155
1156         ovsdb_condition_destroy(&cnd);
1157     }
1158     json_destroy(json);
1159
1160     ovsdb_table_destroy(table); /* Also destroys 'ts'. */
1161
1162     exit(exit_code);
1163 }
1164
1165 struct do_query_distinct_class {
1166     struct ovsdb_row *example;
1167     int count;
1168 };
1169
1170 struct do_query_distinct_row {
1171     struct uuid uuid;
1172     struct do_query_distinct_class *class;
1173 };
1174
1175 static void
1176 do_query_distinct(struct ovs_cmdl_context *ctx)
1177 {
1178     struct ovsdb_column_set columns;
1179     struct ovsdb_table_schema *ts;
1180     struct ovsdb_table *table;
1181     struct do_query_distinct_row *rows;
1182     size_t n_rows;
1183     struct do_query_distinct_class *classes;
1184     size_t n_classes;
1185     struct json *json;
1186     int exit_code = 0;
1187     size_t i;
1188
1189     /* Parse table schema, create table. */
1190     json = unbox_json(parse_json(ctx->argv[1]));
1191     check_ovsdb_error(ovsdb_table_schema_from_json(json, "mytable", &ts));
1192     json_destroy(json);
1193
1194     table = ovsdb_table_create(ts);
1195
1196     /* Parse column set. */
1197     json = parse_json(ctx->argv[4]);
1198     check_ovsdb_error(ovsdb_column_set_from_json(json, table->schema,
1199                                                  &columns));
1200     json_destroy(json);
1201
1202     /* Parse rows, add to table. */
1203     json = parse_json(ctx->argv[2]);
1204     if (json->type != JSON_ARRAY) {
1205         ovs_fatal(0, "ROW argument is not JSON array");
1206     }
1207     n_rows = json->u.array.n;
1208     rows = xmalloc(n_rows * sizeof *rows);
1209     classes = xmalloc(n_rows * sizeof *classes);
1210     n_classes = 0;
1211     for (i = 0; i < n_rows; i++) {
1212         struct ovsdb_row *row;
1213         size_t j;
1214
1215         /* Parse row. */
1216         row = ovsdb_row_create(table);
1217         uuid_generate(ovsdb_row_get_uuid_rw(row));
1218         check_ovsdb_error(ovsdb_row_from_json(row, json->u.array.elems[i],
1219                                               NULL, NULL));
1220
1221         /* Initialize row and find equivalence class. */
1222         rows[i].uuid = *ovsdb_row_get_uuid(row);
1223         rows[i].class = NULL;
1224         for (j = 0; j < n_classes; j++) {
1225             if (ovsdb_row_equal_columns(row, classes[j].example, &columns)) {
1226                 rows[i].class = &classes[j];
1227                 break;
1228             }
1229         }
1230         if (!rows[i].class) {
1231             rows[i].class = &classes[n_classes];
1232             classes[n_classes].example = ovsdb_row_clone(row);
1233             n_classes++;
1234         }
1235
1236         /* Add row to table. */
1237         if (ovsdb_table_get_row(table, ovsdb_row_get_uuid(row))) {
1238             ovs_fatal(0, "duplicate UUID "UUID_FMT" in table",
1239                       UUID_ARGS(ovsdb_row_get_uuid(row)));
1240         }
1241         put_row(table, row);
1242
1243     }
1244     json_destroy(json);
1245
1246     /* Parse conditions and execute queries. */
1247     json = parse_json(ctx->argv[3]);
1248     if (json->type != JSON_ARRAY) {
1249         ovs_fatal(0, "CONDITION argument is not JSON array");
1250     }
1251     for (i = 0; i < json->u.array.n; i++) {
1252         struct ovsdb_row_set results;
1253         struct ovsdb_condition cnd;
1254         size_t j;
1255
1256         check_ovsdb_error(ovsdb_condition_from_json(ts, json->u.array.elems[i],
1257                                                     NULL, &cnd));
1258
1259         for (j = 0; j < n_classes; j++) {
1260             classes[j].count = 0;
1261         }
1262         ovsdb_row_set_init(&results);
1263         ovsdb_query_distinct(table, &cnd, &columns, &results);
1264         for (j = 0; j < results.n_rows; j++) {
1265             size_t k;
1266
1267             for (k = 0; k < n_rows; k++) {
1268                 if (uuid_equals(ovsdb_row_get_uuid(results.rows[j]),
1269                                 &rows[k].uuid)) {
1270                     rows[k].class->count++;
1271                 }
1272             }
1273         }
1274         ovsdb_row_set_destroy(&results);
1275
1276         printf("query %2"PRIuSIZE":", i);
1277         for (j = 0; j < n_rows; j++) {
1278             int count = rows[j].class->count;
1279
1280             if (j % 5 == 0) {
1281                 putchar(' ');
1282             }
1283             if (count > 1) {
1284                 /* Dup! */
1285                 printf("%d", count);
1286                 exit_code = 1;
1287             } else if (count == 1) {
1288                 putchar("abcdefghijklmnopqrstuvwxyz"[rows[j].class - classes]);
1289             } else {
1290                 putchar('-');
1291             }
1292         }
1293         putchar('\n');
1294
1295         ovsdb_condition_destroy(&cnd);
1296     }
1297     json_destroy(json);
1298
1299     for (i = 0; i < n_classes; i++) {
1300         ovsdb_row_destroy(classes[i].example);
1301     }
1302
1303     ovsdb_table_destroy(table); /* Also destroys 'ts'. */
1304
1305     free(rows);
1306     free(classes);
1307     exit(exit_code);
1308 }
1309
1310 static void
1311 do_parse_schema(struct ovs_cmdl_context *ctx)
1312 {
1313     struct ovsdb_schema *schema;
1314     struct json *json;
1315
1316     json = parse_json(ctx->argv[1]);
1317     check_ovsdb_error(ovsdb_schema_from_json(json, &schema));
1318     json_destroy(json);
1319     print_and_free_json(ovsdb_schema_to_json(schema));
1320     ovsdb_schema_destroy(schema);
1321 }
1322
1323 static void
1324 do_execute(struct ovs_cmdl_context *ctx)
1325 {
1326     struct ovsdb_schema *schema;
1327     struct json *json;
1328     struct ovsdb *db;
1329     int i;
1330
1331     /* Create database. */
1332     json = parse_json(ctx->argv[1]);
1333     check_ovsdb_error(ovsdb_schema_from_json(json, &schema));
1334     json_destroy(json);
1335     db = ovsdb_create(schema);
1336
1337     for (i = 2; i < ctx->argc; i++) {
1338         struct json *params, *result;
1339         char *s;
1340
1341         params = parse_json(ctx->argv[i]);
1342         result = ovsdb_execute(db, NULL, params, 0, NULL);
1343         s = json_to_string(result, JSSF_SORT);
1344         printf("%s\n", s);
1345         free(s);
1346         json_destroy(params);
1347         json_destroy(result);
1348     }
1349
1350     ovsdb_destroy(db);
1351 }
1352
1353 struct test_trigger {
1354     struct ovsdb_trigger trigger;
1355     int number;
1356 };
1357
1358 static void
1359 do_trigger_dump(struct test_trigger *t, long long int now, const char *title)
1360 {
1361     struct json *result;
1362     char *s;
1363
1364     result = ovsdb_trigger_steal_result(&t->trigger);
1365     s = json_to_string(result, JSSF_SORT);
1366     printf("t=%lld: trigger %d (%s): %s\n", now, t->number, title, s);
1367     free(s);
1368     json_destroy(result);
1369     ovsdb_trigger_destroy(&t->trigger);
1370     free(t);
1371 }
1372
1373 static void
1374 do_trigger(struct ovs_cmdl_context *ctx)
1375 {
1376     struct ovsdb_schema *schema;
1377     struct ovsdb_session session;
1378     struct ovsdb_server server;
1379     struct json *json;
1380     struct ovsdb *db;
1381     long long int now;
1382     int number;
1383     int i;
1384
1385     /* Create database. */
1386     json = parse_json(ctx->argv[1]);
1387     check_ovsdb_error(ovsdb_schema_from_json(json, &schema));
1388     json_destroy(json);
1389     db = ovsdb_create(schema);
1390
1391     ovsdb_server_init(&server);
1392     ovsdb_server_add_db(&server, db);
1393     ovsdb_session_init(&session, &server);
1394
1395     now = 0;
1396     number = 0;
1397     for (i = 2; i < ctx->argc; i++) {
1398         struct json *params = parse_json(ctx->argv[i]);
1399         if (params->type == JSON_ARRAY
1400             && json_array(params)->n == 2
1401             && json_array(params)->elems[0]->type == JSON_STRING
1402             && !strcmp(json_string(json_array(params)->elems[0]), "advance")
1403             && json_array(params)->elems[1]->type == JSON_INTEGER) {
1404             now += json_integer(json_array(params)->elems[1]);
1405             json_destroy(params);
1406         } else {
1407             struct test_trigger *t = xmalloc(sizeof *t);
1408             ovsdb_trigger_init(&session, db, &t->trigger, params, now);
1409             t->number = number++;
1410             if (ovsdb_trigger_is_complete(&t->trigger)) {
1411                 do_trigger_dump(t, now, "immediate");
1412             } else {
1413                 printf("t=%lld: new trigger %d\n", now, t->number);
1414             }
1415         }
1416
1417         ovsdb_trigger_run(db, now);
1418         while (!list_is_empty(&session.completions)) {
1419             do_trigger_dump(CONTAINER_OF(list_pop_front(&session.completions),
1420                                          struct test_trigger, trigger.node),
1421                             now, "delayed");
1422         }
1423
1424         ovsdb_trigger_wait(db, now);
1425         poll_immediate_wake();
1426         poll_block();
1427     }
1428
1429     ovsdb_server_destroy(&server);
1430     ovsdb_destroy(db);
1431 }
1432
1433 static void
1434 do_help(struct ovs_cmdl_context *ctx OVS_UNUSED)
1435 {
1436     usage();
1437 }
1438 \f
1439 /* "transact" command. */
1440
1441 static struct ovsdb *do_transact_db;
1442 static struct ovsdb_txn *do_transact_txn;
1443 static struct ovsdb_table *do_transact_table;
1444
1445 static void
1446 do_transact_commit(struct ovs_cmdl_context *ctx OVS_UNUSED)
1447 {
1448     ovsdb_error_destroy(ovsdb_txn_commit(do_transact_txn, false));
1449     do_transact_txn = NULL;
1450 }
1451
1452 static void
1453 do_transact_abort(struct ovs_cmdl_context *ctx OVS_UNUSED)
1454 {
1455     ovsdb_txn_abort(do_transact_txn);
1456     do_transact_txn = NULL;
1457 }
1458
1459 static void
1460 uuid_from_integer(int integer, struct uuid *uuid)
1461 {
1462     uuid_zero(uuid);
1463     uuid->parts[3] = integer;
1464 }
1465
1466 static const struct ovsdb_row *
1467 do_transact_find_row(const char *uuid_string)
1468 {
1469     const struct ovsdb_row *row;
1470     struct uuid uuid;
1471
1472     uuid_from_integer(atoi(uuid_string), &uuid);
1473     row = ovsdb_table_get_row(do_transact_table, &uuid);
1474     if (!row) {
1475         ovs_fatal(0, "table does not contain row with UUID "UUID_FMT,
1476                   UUID_ARGS(&uuid));
1477     }
1478     return row;
1479 }
1480
1481 static void
1482 do_transact_set_integer(struct ovsdb_row *row, const char *column_name,
1483                         int integer)
1484 {
1485     if (integer != -1) {
1486         const struct ovsdb_column *column;
1487
1488         column = ovsdb_table_schema_get_column(do_transact_table->schema,
1489                                                column_name);
1490         row->fields[column->index].keys[0].integer = integer;
1491     }
1492 }
1493
1494 static int
1495 do_transact_get_integer(const struct ovsdb_row *row, const char *column_name)
1496 {
1497     const struct ovsdb_column *column;
1498
1499     column = ovsdb_table_schema_get_column(do_transact_table->schema,
1500                                            column_name);
1501     return row->fields[column->index].keys[0].integer;
1502 }
1503
1504 static void
1505 do_transact_set_i_j(struct ovsdb_row *row,
1506                     const char *i_string, const char *j_string)
1507 {
1508     do_transact_set_integer(row, "i", atoi(i_string));
1509     do_transact_set_integer(row, "j", atoi(j_string));
1510 }
1511
1512 static void
1513 do_transact_insert(struct ovs_cmdl_context *ctx)
1514 {
1515     struct ovsdb_row *row;
1516     struct uuid *uuid;
1517
1518     row = ovsdb_row_create(do_transact_table);
1519
1520     /* Set UUID. */
1521     uuid = ovsdb_row_get_uuid_rw(row);
1522     uuid_from_integer(atoi(ctx->argv[1]), uuid);
1523     if (ovsdb_table_get_row(do_transact_table, uuid)) {
1524         ovs_fatal(0, "table already contains row with UUID "UUID_FMT,
1525                   UUID_ARGS(uuid));
1526     }
1527
1528     do_transact_set_i_j(row, ctx->argv[2], ctx->argv[3]);
1529
1530     /* Insert row. */
1531     ovsdb_txn_row_insert(do_transact_txn, row);
1532 }
1533
1534 static void
1535 do_transact_delete(struct ovs_cmdl_context *ctx)
1536 {
1537     const struct ovsdb_row *row = do_transact_find_row(ctx->argv[1]);
1538     ovsdb_txn_row_delete(do_transact_txn, row);
1539 }
1540
1541 static void
1542 do_transact_modify(struct ovs_cmdl_context *ctx)
1543 {
1544     const struct ovsdb_row *row_ro;
1545     struct ovsdb_row *row_rw;
1546
1547     row_ro = do_transact_find_row(ctx->argv[1]);
1548     row_rw = ovsdb_txn_row_modify(do_transact_txn, row_ro);
1549     do_transact_set_i_j(row_rw, ctx->argv[2], ctx->argv[3]);
1550 }
1551
1552 static int
1553 compare_rows_by_uuid(const void *a_, const void *b_)
1554 {
1555     struct ovsdb_row *const *ap = a_;
1556     struct ovsdb_row *const *bp = b_;
1557
1558     return uuid_compare_3way(ovsdb_row_get_uuid(*ap), ovsdb_row_get_uuid(*bp));
1559 }
1560
1561 static void
1562 do_transact_print(struct ovs_cmdl_context *ctx OVS_UNUSED)
1563 {
1564     const struct ovsdb_row **rows;
1565     const struct ovsdb_row *row;
1566     size_t n_rows;
1567     size_t i;
1568
1569     n_rows = hmap_count(&do_transact_table->rows);
1570     rows = xmalloc(n_rows * sizeof *rows);
1571     i = 0;
1572     HMAP_FOR_EACH (row, hmap_node, &do_transact_table->rows) {
1573         rows[i++] = row;
1574     }
1575     assert(i == n_rows);
1576
1577     qsort(rows, n_rows, sizeof *rows, compare_rows_by_uuid);
1578
1579     for (i = 0; i < n_rows; i++) {
1580         printf("\n%"PRId32": i=%d, j=%d",
1581                ovsdb_row_get_uuid(rows[i])->parts[3],
1582                do_transact_get_integer(rows[i], "i"),
1583                do_transact_get_integer(rows[i], "j"));
1584     }
1585
1586     free(rows);
1587 }
1588
1589 static void
1590 do_transact(struct ovs_cmdl_context *ctx)
1591 {
1592     static const struct ovs_cmdl_command do_transact_commands[] = {
1593         { "commit", NULL, 0, 0, do_transact_commit },
1594         { "abort", NULL, 0, 0, do_transact_abort },
1595         { "insert", NULL, 2, 3, do_transact_insert },
1596         { "delete", NULL, 1, 1, do_transact_delete },
1597         { "modify", NULL, 2, 3, do_transact_modify },
1598         { "print", NULL, 0, 0, do_transact_print },
1599         { NULL, NULL, 0, 0, NULL },
1600     };
1601
1602     struct ovsdb_schema *schema;
1603     struct json *json;
1604     int i;
1605
1606     /* Create table. */
1607     json = parse_json("{\"name\": \"testdb\", "
1608                       " \"tables\": "
1609                       "  {\"mytable\": "
1610                       "    {\"columns\": "
1611                       "      {\"i\": {\"type\": \"integer\"}, "
1612                       "       \"j\": {\"type\": \"integer\"}}}}}");
1613     check_ovsdb_error(ovsdb_schema_from_json(json, &schema));
1614     json_destroy(json);
1615     do_transact_db = ovsdb_create(schema);
1616     do_transact_table = ovsdb_get_table(do_transact_db, "mytable");
1617     assert(do_transact_table != NULL);
1618
1619     for (i = 1; i < ctx->argc; i++) {
1620         struct json *command;
1621         size_t n_args;
1622         char **args;
1623         int j;
1624         struct ovs_cmdl_context transact_ctx = { .argc = 0, };
1625
1626         command = parse_json(ctx->argv[i]);
1627         if (command->type != JSON_ARRAY) {
1628             ovs_fatal(0, "transaction %d must be JSON array "
1629                       "with at least 1 element", i);
1630         }
1631
1632         n_args = command->u.array.n;
1633         args = xmalloc((n_args + 1) * sizeof *args);
1634         for (j = 0; j < n_args; j++) {
1635             struct json *s = command->u.array.elems[j];
1636             if (s->type != JSON_STRING) {
1637                 ovs_fatal(0, "transaction %d argument %d must be JSON string",
1638                           i, j);
1639             }
1640             args[j] = xstrdup(json_string(s));
1641         }
1642         args[n_args] = NULL;
1643
1644         if (!do_transact_txn) {
1645             do_transact_txn = ovsdb_txn_create(do_transact_db);
1646         }
1647
1648         for (j = 0; j < n_args; j++) {
1649             if (j) {
1650                 putchar(' ');
1651             }
1652             fputs(args[j], stdout);
1653         }
1654         fputs(":", stdout);
1655         transact_ctx.argc = n_args;
1656         transact_ctx.argv = args;
1657         ovs_cmdl_run_command(&transact_ctx, do_transact_commands);
1658         putchar('\n');
1659
1660         for (j = 0; j < n_args; j++) {
1661             free(args[j]);
1662         }
1663         free(args);
1664         json_destroy(command);
1665     }
1666     ovsdb_txn_abort(do_transact_txn);
1667     ovsdb_destroy(do_transact_db); /* Also destroys 'schema'. */
1668 }
1669
1670 static int
1671 compare_link1(const void *a_, const void *b_)
1672 {
1673     const struct idltest_link1 *const *ap = a_;
1674     const struct idltest_link1 *const *bp = b_;
1675     const struct idltest_link1 *a = *ap;
1676     const struct idltest_link1 *b = *bp;
1677
1678     return a->i < b->i ? -1 : a->i > b->i;
1679 }
1680
1681 static void
1682 print_idl_row_updated_simple(const struct idltest_simple *s, int step)
1683 {
1684     size_t i;
1685     bool updated = false;
1686
1687     for (i = 0; i < IDLTEST_SIMPLE_N_COLUMNS; i++) {
1688         if (idltest_simple_is_updated(s, i)) {
1689             if (!updated) {
1690                 printf("%03d: updated columns:", step);
1691                 updated = true;
1692             }
1693             printf(" %s", idltest_simple_columns[i].name);
1694         }
1695     }
1696     if (updated) {
1697         printf("\n");
1698     }
1699 }
1700
1701 static void
1702 print_idl_row_updated_link1(const struct idltest_link1 *l1, int step)
1703 {
1704     size_t i;
1705     bool updated = false;
1706
1707     for (i = 0; i < IDLTEST_LINK1_N_COLUMNS; i++) {
1708         if (idltest_link1_is_updated(l1, i)) {
1709             if (!updated) {
1710                 printf("%03d: updated columns:", step);
1711                 updated = true;
1712             }
1713             printf(" %s", idltest_link1_columns[i].name);
1714         }
1715     }
1716     if (updated) {
1717         printf("\n");
1718     }
1719 }
1720
1721 static void
1722 print_idl_row_updated_link2(const struct idltest_link2 *l2, int step)
1723 {
1724     size_t i;
1725     bool updated = false;
1726
1727     for (i = 0; i < IDLTEST_LINK2_N_COLUMNS; i++) {
1728         if (idltest_link2_is_updated(l2, i)) {
1729             if (!updated) {
1730                 printf("%03d: updated columns:", step);
1731                 updated = true;
1732             }
1733             printf(" %s", idltest_link2_columns[i].name);
1734         }
1735     }
1736     if (updated) {
1737         printf("\n");
1738     }
1739 }
1740
1741 static void
1742 print_idl_row_simple(const struct idltest_simple *s, int step)
1743 {
1744     size_t i;
1745
1746     printf("%03d: i=%"PRId64" r=%g b=%s s=%s u="UUID_FMT" ia=[",
1747            step, s->i, s->r, s->b ? "true" : "false",
1748            s->s, UUID_ARGS(&s->u));
1749     for (i = 0; i < s->n_ia; i++) {
1750         printf("%s%"PRId64, i ? " " : "", s->ia[i]);
1751     }
1752     printf("] ra=[");
1753     for (i = 0; i < s->n_ra; i++) {
1754         printf("%s%g", i ? " " : "", s->ra[i]);
1755     }
1756     printf("] ba=[");
1757     for (i = 0; i < s->n_ba; i++) {
1758         printf("%s%s", i ? " " : "", s->ba[i] ? "true" : "false");
1759     }
1760     printf("] sa=[");
1761     for (i = 0; i < s->n_sa; i++) {
1762         printf("%s%s", i ? " " : "", s->sa[i]);
1763     }
1764     printf("] ua=[");
1765     for (i = 0; i < s->n_ua; i++) {
1766         printf("%s"UUID_FMT, i ? " " : "", UUID_ARGS(&s->ua[i]));
1767     }
1768     printf("] uuid="UUID_FMT"\n", UUID_ARGS(&s->header_.uuid));
1769     print_idl_row_updated_simple(s, step);
1770 }
1771
1772 static void
1773 print_idl_row_link1(const struct idltest_link1 *l1, int step)
1774 {
1775     struct idltest_link1 **links;
1776     size_t i;
1777
1778     printf("%03d: i=%"PRId64" k=", step, l1->i);
1779     if (l1->k) {
1780         printf("%"PRId64, l1->k->i);
1781     }
1782     printf(" ka=[");
1783     links = xmemdup(l1->ka, l1->n_ka * sizeof *l1->ka);
1784     qsort(links, l1->n_ka, sizeof *links, compare_link1);
1785     for (i = 0; i < l1->n_ka; i++) {
1786         printf("%s%"PRId64, i ? " " : "", links[i]->i);
1787     }
1788     free(links);
1789     printf("] l2=");
1790     if (l1->l2) {
1791         printf("%"PRId64, l1->l2->i);
1792     }
1793     printf(" uuid="UUID_FMT"\n", UUID_ARGS(&l1->header_.uuid));
1794     print_idl_row_updated_link1(l1, step);
1795 }
1796
1797 static void
1798 print_idl_row_link2(const struct idltest_link2 *l2, int step)
1799 {
1800     printf("%03d: i=%"PRId64" l1=", step, l2->i);
1801     if (l2->l1) {
1802         printf("%"PRId64, l2->l1->i);
1803     }
1804     printf(" uuid="UUID_FMT"\n", UUID_ARGS(&l2->header_.uuid));
1805     print_idl_row_updated_link2(l2, step);
1806 }
1807
1808 static void
1809 print_idl(struct ovsdb_idl *idl, int step)
1810 {
1811     const struct idltest_simple *s;
1812     const struct idltest_link1 *l1;
1813     const struct idltest_link2 *l2;
1814     int n = 0;
1815
1816     IDLTEST_SIMPLE_FOR_EACH (s, idl) {
1817         print_idl_row_simple(s, step);
1818         n++;
1819     }
1820     IDLTEST_LINK1_FOR_EACH (l1, idl) {
1821         print_idl_row_link1(l1, step);
1822         n++;
1823     }
1824     IDLTEST_LINK2_FOR_EACH (l2, idl) {
1825         print_idl_row_link2(l2, step);
1826         n++;
1827     }
1828     if (!n) {
1829         printf("%03d: empty\n", step);
1830     }
1831 }
1832
1833 static void
1834 print_idl_track(struct ovsdb_idl *idl, int step, unsigned int seqno)
1835 {
1836     const struct idltest_simple *s;
1837     const struct idltest_link1 *l1;
1838     const struct idltest_link2 *l2;
1839     int n = 0;
1840
1841     IDLTEST_SIMPLE_FOR_EACH_TRACKED (s, idl) {
1842         if (idltest_simple_row_get_seqno(s, OVSDB_IDL_CHANGE_DELETE) >= seqno) {
1843             printf("%03d: ##deleted## uuid="UUID_FMT"\n", step, UUID_ARGS(&s->header_.uuid));
1844         } else {
1845             print_idl_row_simple(s, step);
1846         }
1847         n++;
1848     }
1849     IDLTEST_LINK1_FOR_EACH_TRACKED (l1, idl) {
1850         if (idltest_simple_row_get_seqno(s, OVSDB_IDL_CHANGE_DELETE) >= seqno) {
1851             printf("%03d: ##deleted## uuid="UUID_FMT"\n", step, UUID_ARGS(&s->header_.uuid));
1852         } else {
1853             print_idl_row_link1(l1, step);
1854         }
1855         n++;
1856     }
1857     IDLTEST_LINK2_FOR_EACH_TRACKED (l2, idl) {
1858         if (idltest_simple_row_get_seqno(s, OVSDB_IDL_CHANGE_DELETE) >= seqno) {
1859             printf("%03d: ##deleted## uuid="UUID_FMT"\n", step, UUID_ARGS(&s->header_.uuid));
1860         } else {
1861             print_idl_row_link2(l2, step);
1862         }
1863         n++;
1864     }
1865     if (!n) {
1866         printf("%03d: empty\n", step);
1867     }
1868 }
1869
1870 static void
1871 parse_uuids(const struct json *json, struct ovsdb_symbol_table *symtab,
1872             size_t *n)
1873 {
1874     struct uuid uuid;
1875
1876     if (json->type == JSON_STRING && uuid_from_string(&uuid, json->u.string)) {
1877         char *name = xasprintf("#%"PRIuSIZE"#", *n);
1878         fprintf(stderr, "%s = "UUID_FMT"\n", name, UUID_ARGS(&uuid));
1879         ovsdb_symbol_table_put(symtab, name, &uuid, false);
1880         free(name);
1881         *n += 1;
1882     } else if (json->type == JSON_ARRAY) {
1883         size_t i;
1884
1885         for (i = 0; i < json->u.array.n; i++) {
1886             parse_uuids(json->u.array.elems[i], symtab, n);
1887         }
1888     } else if (json->type == JSON_OBJECT) {
1889         const struct shash_node *node;
1890
1891         SHASH_FOR_EACH (node, json_object(json)) {
1892             parse_uuids(node->data, symtab, n);
1893         }
1894     }
1895 }
1896
1897 static void
1898 substitute_uuids(struct json *json, const struct ovsdb_symbol_table *symtab)
1899 {
1900     if (json->type == JSON_STRING) {
1901         const struct ovsdb_symbol *symbol;
1902
1903         symbol = ovsdb_symbol_table_get(symtab, json->u.string);
1904         if (symbol) {
1905             free(json->u.string);
1906             json->u.string = xasprintf(UUID_FMT, UUID_ARGS(&symbol->uuid));
1907         }
1908     } else if (json->type == JSON_ARRAY) {
1909         size_t i;
1910
1911         for (i = 0; i < json->u.array.n; i++) {
1912             substitute_uuids(json->u.array.elems[i], symtab);
1913         }
1914     } else if (json->type == JSON_OBJECT) {
1915         const struct shash_node *node;
1916
1917         SHASH_FOR_EACH (node, json_object(json)) {
1918             substitute_uuids(node->data, symtab);
1919         }
1920     }
1921 }
1922
1923 static const struct idltest_simple *
1924 idltest_find_simple(struct ovsdb_idl *idl, int i)
1925 {
1926     const struct idltest_simple *s;
1927
1928     IDLTEST_SIMPLE_FOR_EACH (s, idl) {
1929         if (s->i == i) {
1930             return s;
1931         }
1932     }
1933     return NULL;
1934 }
1935
1936 static void
1937 idl_set(struct ovsdb_idl *idl, char *commands, int step)
1938 {
1939     char *cmd, *save_ptr1 = NULL;
1940     struct ovsdb_idl_txn *txn;
1941     enum ovsdb_idl_txn_status status;
1942     bool increment = false;
1943
1944     txn = ovsdb_idl_txn_create(idl);
1945     for (cmd = strtok_r(commands, ",", &save_ptr1); cmd;
1946          cmd = strtok_r(NULL, ",", &save_ptr1)) {
1947         char *save_ptr2 = NULL;
1948         char *name, *arg1, *arg2, *arg3;
1949
1950         name = strtok_r(cmd, " ", &save_ptr2);
1951         arg1 = strtok_r(NULL, " ", &save_ptr2);
1952         arg2 = strtok_r(NULL, " ", &save_ptr2);
1953         arg3 = strtok_r(NULL, " ", &save_ptr2);
1954
1955         if (!strcmp(name, "set")) {
1956             const struct idltest_simple *s;
1957
1958             if (!arg3) {
1959                 ovs_fatal(0, "\"set\" command requires 3 arguments");
1960             }
1961
1962             s = idltest_find_simple(idl, atoi(arg1));
1963             if (!s) {
1964                 ovs_fatal(0, "\"set\" command asks for nonexistent "
1965                           "i=%d", atoi(arg1));
1966             }
1967
1968             if (!strcmp(arg2, "b")) {
1969                 idltest_simple_set_b(s, atoi(arg3));
1970             } else if (!strcmp(arg2, "s")) {
1971                 idltest_simple_set_s(s, arg3);
1972             } else if (!strcmp(arg2, "u")) {
1973                 struct uuid uuid;
1974                 if (!uuid_from_string(&uuid, arg3)) {
1975                     ovs_fatal(0, "\"%s\" is not a valid UUID", arg3);
1976                 }
1977                 idltest_simple_set_u(s, uuid);
1978             } else if (!strcmp(arg2, "r")) {
1979                 idltest_simple_set_r(s, atof(arg3));
1980             } else {
1981                 ovs_fatal(0, "\"set\" command asks for unknown column %s",
1982                           arg2);
1983             }
1984         } else if (!strcmp(name, "insert")) {
1985             struct idltest_simple *s;
1986
1987             if (!arg1 || arg2) {
1988                 ovs_fatal(0, "\"insert\" command requires 1 argument");
1989             }
1990
1991             s = idltest_simple_insert(txn);
1992             idltest_simple_set_i(s, atoi(arg1));
1993         } else if (!strcmp(name, "delete")) {
1994             const struct idltest_simple *s;
1995
1996             if (!arg1 || arg2) {
1997                 ovs_fatal(0, "\"delete\" command requires 1 argument");
1998             }
1999
2000             s = idltest_find_simple(idl, atoi(arg1));
2001             if (!s) {
2002                 ovs_fatal(0, "\"delete\" command asks for nonexistent "
2003                           "i=%d", atoi(arg1));
2004             }
2005             idltest_simple_delete(s);
2006         } else if (!strcmp(name, "verify")) {
2007             const struct idltest_simple *s;
2008
2009             if (!arg2 || arg3) {
2010                 ovs_fatal(0, "\"verify\" command requires 2 arguments");
2011             }
2012
2013             s = idltest_find_simple(idl, atoi(arg1));
2014             if (!s) {
2015                 ovs_fatal(0, "\"verify\" command asks for nonexistent "
2016                           "i=%d", atoi(arg1));
2017             }
2018
2019             if (!strcmp(arg2, "i")) {
2020                 idltest_simple_verify_i(s);
2021             } else if (!strcmp(arg2, "b")) {
2022                 idltest_simple_verify_b(s);
2023             } else if (!strcmp(arg2, "s")) {
2024                 idltest_simple_verify_s(s);
2025             } else if (!strcmp(arg2, "u")) {
2026                 idltest_simple_verify_s(s);
2027             } else if (!strcmp(arg2, "r")) {
2028                 idltest_simple_verify_r(s);
2029             } else {
2030                 ovs_fatal(0, "\"verify\" command asks for unknown column %s",
2031                           arg2);
2032             }
2033         } else if (!strcmp(name, "increment")) {
2034             const struct idltest_simple *s;
2035
2036             if (!arg1 || arg2) {
2037                 ovs_fatal(0, "\"increment\" command requires 1 argument");
2038             }
2039
2040             s = idltest_find_simple(idl, atoi(arg1));
2041             if (!s) {
2042                 ovs_fatal(0, "\"set\" command asks for nonexistent "
2043                           "i=%d", atoi(arg1));
2044             }
2045
2046             ovsdb_idl_txn_increment(txn, &s->header_, &idltest_simple_col_i);
2047             increment = true;
2048         } else if (!strcmp(name, "abort")) {
2049             ovsdb_idl_txn_abort(txn);
2050             break;
2051         } else if (!strcmp(name, "destroy")) {
2052             printf("%03d: destroy\n", step);
2053             ovsdb_idl_txn_destroy(txn);
2054             return;
2055         } else {
2056             ovs_fatal(0, "unknown command %s", name);
2057         }
2058     }
2059
2060     status = ovsdb_idl_txn_commit_block(txn);
2061     printf("%03d: commit, status=%s",
2062            step, ovsdb_idl_txn_status_to_string(status));
2063     if (increment) {
2064         printf(", increment=%"PRId64,
2065                ovsdb_idl_txn_get_increment_new_value(txn));
2066     }
2067     putchar('\n');
2068     ovsdb_idl_txn_destroy(txn);
2069 }
2070
2071 static void
2072 do_idl(struct ovs_cmdl_context *ctx)
2073 {
2074     struct jsonrpc *rpc;
2075     struct ovsdb_idl *idl;
2076     unsigned int seqno = 0;
2077     struct ovsdb_symbol_table *symtab;
2078     size_t n_uuids = 0;
2079     int step = 0;
2080     int error;
2081     int i;
2082     bool track;
2083
2084     idltest_init();
2085
2086     track = ((struct test_ovsdb_pvt_context *)(ctx->pvt))->track;
2087
2088     idl = ovsdb_idl_create(ctx->argv[1], &idltest_idl_class, true, true);
2089     if (ctx->argc > 2) {
2090         struct stream *stream;
2091
2092         error = stream_open_block(jsonrpc_stream_open(ctx->argv[1], &stream,
2093                                   DSCP_DEFAULT), &stream);
2094         if (error) {
2095             ovs_fatal(error, "failed to connect to \"%s\"", ctx->argv[1]);
2096         }
2097         rpc = jsonrpc_open(stream);
2098     } else {
2099         rpc = NULL;
2100     }
2101
2102     if (track) {
2103         ovsdb_idl_track_add_all(idl);
2104     }
2105
2106     setvbuf(stdout, NULL, _IONBF, 0);
2107
2108     symtab = ovsdb_symbol_table_create();
2109     for (i = 2; i < ctx->argc; i++) {
2110         char *arg = ctx->argv[i];
2111         struct jsonrpc_msg *request, *reply;
2112
2113         if (*arg == '+') {
2114             /* The previous transaction didn't change anything. */
2115             arg++;
2116         } else {
2117             /* Wait for update. */
2118             for (;;) {
2119                 ovsdb_idl_run(idl);
2120                 if (ovsdb_idl_get_seqno(idl) != seqno) {
2121                     break;
2122                 }
2123                 jsonrpc_run(rpc);
2124
2125                 ovsdb_idl_wait(idl);
2126                 jsonrpc_wait(rpc);
2127                 poll_block();
2128             }
2129
2130             /* Print update. */
2131             if (track) {
2132                 print_idl_track(idl, step++, ovsdb_idl_get_seqno(idl));
2133                 ovsdb_idl_track_clear(idl);
2134             } else {
2135                 print_idl(idl, step++);
2136             }
2137         }
2138         seqno = ovsdb_idl_get_seqno(idl);
2139
2140         if (!strcmp(arg, "reconnect")) {
2141             printf("%03d: reconnect\n", step++);
2142             ovsdb_idl_force_reconnect(idl);
2143         } else if (arg[0] != '[') {
2144             idl_set(idl, arg, step++);
2145         } else {
2146             struct json *json = parse_json(arg);
2147             substitute_uuids(json, symtab);
2148             request = jsonrpc_create_request("transact", json, NULL);
2149             error = jsonrpc_transact_block(rpc, request, &reply);
2150             if (error || reply->error) {
2151                 ovs_fatal(error, "jsonrpc transaction failed");
2152             }
2153             printf("%03d: ", step++);
2154             if (reply->result) {
2155                 parse_uuids(reply->result, symtab, &n_uuids);
2156             }
2157             json_destroy(reply->id);
2158             reply->id = NULL;
2159             print_and_free_json(jsonrpc_msg_to_json(reply));
2160         }
2161     }
2162     ovsdb_symbol_table_destroy(symtab);
2163
2164     if (rpc) {
2165         jsonrpc_close(rpc);
2166     }
2167     for (;;) {
2168         ovsdb_idl_run(idl);
2169         if (ovsdb_idl_get_seqno(idl) != seqno) {
2170             break;
2171         }
2172         ovsdb_idl_wait(idl);
2173         poll_block();
2174     }
2175     print_idl(idl, step++);
2176     ovsdb_idl_track_clear(idl);
2177     ovsdb_idl_destroy(idl);
2178     printf("%03d: done\n", step);
2179 }
2180
2181 static struct ovs_cmdl_command all_commands[] = {
2182     { "log-io", NULL, 2, INT_MAX, do_log_io },
2183     { "default-atoms", NULL, 0, 0, do_default_atoms },
2184     { "default-data", NULL, 0, 0, do_default_data },
2185     { "diff-data", NULL, 3, INT_MAX, do_diff_data},
2186     { "parse-atomic-type", NULL, 1, 1, do_parse_atomic_type },
2187     { "parse-base-type", NULL, 1, 1, do_parse_base_type },
2188     { "parse-type", NULL, 1, 1, do_parse_type },
2189     { "parse-atoms", NULL, 2, INT_MAX, do_parse_atoms },
2190     { "parse-atom-strings", NULL, 2, INT_MAX, do_parse_atom_strings },
2191     { "parse-data", NULL, 2, INT_MAX, do_parse_data },
2192     { "parse-data-strings", NULL, 2, INT_MAX, do_parse_data_strings },
2193     { "sort-atoms", NULL, 2, 2, do_sort_atoms },
2194     { "parse-column", NULL, 2, 2, do_parse_column },
2195     { "parse-table", NULL, 2, 3, do_parse_table },
2196     { "parse-rows", NULL, 2, INT_MAX, do_parse_rows },
2197     { "compare-rows", NULL, 2, INT_MAX, do_compare_rows },
2198     { "parse-conditions", NULL, 2, INT_MAX, do_parse_conditions },
2199     { "evaluate-conditions", NULL, 3, 3, do_evaluate_conditions },
2200     { "parse-mutations", NULL, 2, INT_MAX, do_parse_mutations },
2201     { "execute-mutations", NULL, 3, 3, do_execute_mutations },
2202     { "query", NULL, 3, 3, do_query },
2203     { "query-distinct", NULL, 4, 4, do_query_distinct },
2204     { "transact", NULL, 1, INT_MAX, do_transact },
2205     { "parse-schema", NULL, 1, 1, do_parse_schema },
2206     { "execute", NULL, 2, INT_MAX, do_execute },
2207     { "trigger", NULL, 2, INT_MAX, do_trigger },
2208     { "idl", NULL, 1, INT_MAX, do_idl },
2209     { "help", NULL, 0, INT_MAX, do_help },
2210     { NULL, NULL, 0, 0, NULL },
2211 };
2212
2213 static struct ovs_cmdl_command *
2214 get_all_commands(void)
2215 {
2216     return all_commands;
2217 }