ovsdb: Fix memory leak.
[cascardo/ovs.git] / utilities / ovs-vsctl.c
1 /*
2  * Copyright (c) 2009, 2010, 2011, 2012 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 <ctype.h>
21 #include <errno.h>
22 #include <float.h>
23 #include <getopt.h>
24 #include <inttypes.h>
25 #include <signal.h>
26 #include <stdarg.h>
27 #include <stdlib.h>
28 #include <string.h>
29 #include <unistd.h>
30
31 #include "command-line.h"
32 #include "compiler.h"
33 #include "dirs.h"
34 #include "dynamic-string.h"
35 #include "hash.h"
36 #include "json.h"
37 #include "ovsdb-data.h"
38 #include "ovsdb-idl.h"
39 #include "poll-loop.h"
40 #include "process.h"
41 #include "stream.h"
42 #include "stream-ssl.h"
43 #include "smap.h"
44 #include "sset.h"
45 #include "svec.h"
46 #include "lib/vswitch-idl.h"
47 #include "table.h"
48 #include "timeval.h"
49 #include "util.h"
50 #include "vconn.h"
51 #include "vlog.h"
52
53 VLOG_DEFINE_THIS_MODULE(vsctl);
54
55 /* vsctl_fatal() also logs the error, so it is preferred in this file. */
56 #define ovs_fatal please_use_vsctl_fatal_instead_of_ovs_fatal
57
58 struct vsctl_context;
59
60 /* A command supported by ovs-vsctl. */
61 struct vsctl_command_syntax {
62     const char *name;           /* e.g. "add-br" */
63     int min_args;               /* Min number of arguments following name. */
64     int max_args;               /* Max number of arguments following name. */
65
66     /* If nonnull, calls ovsdb_idl_add_column() or ovsdb_idl_add_table() for
67      * each column or table in ctx->idl that it uses. */
68     void (*prerequisites)(struct vsctl_context *ctx);
69
70     /* Does the actual work of the command and puts the command's output, if
71      * any, in ctx->output or ctx->table.
72      *
73      * Alternatively, if some prerequisite of the command is not met and the
74      * caller should wait for something to change and then retry, it may set
75      * ctx->try_again to true.  (Only the "wait-until" command currently does
76      * this.) */
77     void (*run)(struct vsctl_context *ctx);
78
79     /* If nonnull, called after the transaction has been successfully
80      * committed.  ctx->output is the output from the "run" function, which
81      * this function may modify and otherwise postprocess as needed.  (Only the
82      * "create" command currently does any postprocessing.) */
83     void (*postprocess)(struct vsctl_context *ctx);
84
85     /* A comma-separated list of supported options, e.g. "--a,--b", or the
86      * empty string if the command does not support any options. */
87     const char *options;
88     enum { RO, RW } mode;       /* Does this command modify the database? */
89 };
90
91 struct vsctl_command {
92     /* Data that remains constant after initialization. */
93     const struct vsctl_command_syntax *syntax;
94     int argc;
95     char **argv;
96     struct shash options;
97
98     /* Data modified by commands. */
99     struct ds output;
100     struct table *table;
101 };
102
103 /* --db: The database server to contact. */
104 static const char *db;
105
106 /* --oneline: Write each command's output as a single line? */
107 static bool oneline;
108
109 /* --dry-run: Do not commit any changes. */
110 static bool dry_run;
111
112 /* --no-wait: Wait for ovs-vswitchd to reload its configuration? */
113 static bool wait_for_reload = true;
114
115 /* --timeout: Time to wait for a connection to 'db'. */
116 static int timeout;
117
118 /* Format for table output. */
119 static struct table_style table_style = TABLE_STYLE_DEFAULT;
120
121 /* All supported commands. */
122 static const struct vsctl_command_syntax all_commands[];
123
124 /* The IDL we're using and the current transaction, if any.
125  * This is for use by vsctl_exit() only, to allow it to clean up.
126  * Other code should use its context arguments. */
127 static struct ovsdb_idl *the_idl;
128 static struct ovsdb_idl_txn *the_idl_txn;
129
130 static void vsctl_exit(int status) NO_RETURN;
131 static void vsctl_fatal(const char *, ...) PRINTF_FORMAT(1, 2) NO_RETURN;
132 static char *default_db(void);
133 static void usage(void) NO_RETURN;
134 static void parse_options(int argc, char *argv[]);
135 static bool might_write_to_db(char **argv);
136
137 static struct vsctl_command *parse_commands(int argc, char *argv[],
138                                             size_t *n_commandsp);
139 static void parse_command(int argc, char *argv[], struct vsctl_command *);
140 static const struct vsctl_command_syntax *find_command(const char *name);
141 static void run_prerequisites(struct vsctl_command[], size_t n_commands,
142                               struct ovsdb_idl *);
143 static void do_vsctl(const char *args, struct vsctl_command *, size_t n,
144                      struct ovsdb_idl *);
145
146 static const struct vsctl_table_class *get_table(const char *table_name);
147 static void set_column(const struct vsctl_table_class *,
148                        const struct ovsdb_idl_row *, const char *arg,
149                        struct ovsdb_symbol_table *);
150
151 static bool is_condition_satisfied(const struct vsctl_table_class *,
152                                    const struct ovsdb_idl_row *,
153                                    const char *arg,
154                                    struct ovsdb_symbol_table *);
155
156 int
157 main(int argc, char *argv[])
158 {
159     extern struct vlog_module VLM_reconnect;
160     struct ovsdb_idl *idl;
161     struct vsctl_command *commands;
162     unsigned int seqno;
163     size_t n_commands;
164     char *args;
165
166     set_program_name(argv[0]);
167     signal(SIGPIPE, SIG_IGN);
168     vlog_set_levels(NULL, VLF_CONSOLE, VLL_WARN);
169     vlog_set_levels(&VLM_reconnect, VLF_ANY_FACILITY, VLL_WARN);
170     ovsrec_init();
171
172     /* Log our arguments.  This is often valuable for debugging systems. */
173     args = process_escape_args(argv);
174     VLOG(might_write_to_db(argv) ? VLL_INFO : VLL_DBG, "Called as %s", args);
175
176     /* Parse command line. */
177     parse_options(argc, argv);
178     commands = parse_commands(argc - optind, argv + optind, &n_commands);
179
180     if (timeout) {
181         time_alarm(timeout);
182     }
183
184     /* Initialize IDL. */
185     idl = the_idl = ovsdb_idl_create(db, &ovsrec_idl_class, false);
186     run_prerequisites(commands, n_commands, idl);
187
188     /* Execute the commands.
189      *
190      * 'seqno' is the database sequence number for which we last tried to
191      * execute our transaction.  There's no point in trying to commit more than
192      * once for any given sequence number, because if the transaction fails
193      * it's because the database changed and we need to obtain an up-to-date
194      * view of the database before we try the transaction again. */
195     seqno = ovsdb_idl_get_seqno(idl);
196     for (;;) {
197         ovsdb_idl_run(idl);
198
199         if (seqno != ovsdb_idl_get_seqno(idl)) {
200             seqno = ovsdb_idl_get_seqno(idl);
201             do_vsctl(args, commands, n_commands, idl);
202         }
203
204         if (seqno == ovsdb_idl_get_seqno(idl)) {
205             ovsdb_idl_wait(idl);
206             poll_block();
207         }
208     }
209 }
210
211 static void
212 parse_options(int argc, char *argv[])
213 {
214     enum {
215         OPT_DB = UCHAR_MAX + 1,
216         OPT_ONELINE,
217         OPT_NO_SYSLOG,
218         OPT_NO_WAIT,
219         OPT_DRY_RUN,
220         OPT_PEER_CA_CERT,
221         VLOG_OPTION_ENUMS,
222         TABLE_OPTION_ENUMS
223     };
224     static struct option long_options[] = {
225         {"db", required_argument, NULL, OPT_DB},
226         {"no-syslog", no_argument, NULL, OPT_NO_SYSLOG},
227         {"no-wait", no_argument, NULL, OPT_NO_WAIT},
228         {"dry-run", no_argument, NULL, OPT_DRY_RUN},
229         {"oneline", no_argument, NULL, OPT_ONELINE},
230         {"timeout", required_argument, NULL, 't'},
231         {"help", no_argument, NULL, 'h'},
232         {"version", no_argument, NULL, 'V'},
233         VLOG_LONG_OPTIONS,
234         TABLE_LONG_OPTIONS,
235         STREAM_SSL_LONG_OPTIONS,
236         {"peer-ca-cert", required_argument, NULL, OPT_PEER_CA_CERT},
237         {NULL, 0, NULL, 0},
238     };
239     char *tmp, *short_options;
240
241     tmp = long_options_to_short_options(long_options);
242     short_options = xasprintf("+%s", tmp);
243     free(tmp);
244
245     table_style.format = TF_LIST;
246
247     for (;;) {
248         int c;
249
250         c = getopt_long(argc, argv, short_options, long_options, NULL);
251         if (c == -1) {
252             break;
253         }
254
255         switch (c) {
256         case OPT_DB:
257             db = optarg;
258             break;
259
260         case OPT_ONELINE:
261             oneline = true;
262             break;
263
264         case OPT_NO_SYSLOG:
265             vlog_set_levels(&VLM_vsctl, VLF_SYSLOG, VLL_WARN);
266             break;
267
268         case OPT_NO_WAIT:
269             wait_for_reload = false;
270             break;
271
272         case OPT_DRY_RUN:
273             dry_run = true;
274             break;
275
276         case 'h':
277             usage();
278
279         case 'V':
280             ovs_print_version(0, 0);
281             exit(EXIT_SUCCESS);
282
283         case 't':
284             timeout = strtoul(optarg, NULL, 10);
285             if (timeout < 0) {
286                 vsctl_fatal("value %s on -t or --timeout is invalid",
287                             optarg);
288             }
289             break;
290
291         VLOG_OPTION_HANDLERS
292         TABLE_OPTION_HANDLERS(&table_style)
293
294         STREAM_SSL_OPTION_HANDLERS
295
296         case OPT_PEER_CA_CERT:
297             stream_ssl_set_peer_ca_cert_file(optarg);
298             break;
299
300         case '?':
301             exit(EXIT_FAILURE);
302
303         default:
304             abort();
305         }
306     }
307     free(short_options);
308
309     if (!db) {
310         db = default_db();
311     }
312 }
313
314 static struct vsctl_command *
315 parse_commands(int argc, char *argv[], size_t *n_commandsp)
316 {
317     struct vsctl_command *commands;
318     size_t n_commands, allocated_commands;
319     int i, start;
320
321     commands = NULL;
322     n_commands = allocated_commands = 0;
323
324     for (start = i = 0; i <= argc; i++) {
325         if (i == argc || !strcmp(argv[i], "--")) {
326             if (i > start) {
327                 if (n_commands >= allocated_commands) {
328                     struct vsctl_command *c;
329
330                     commands = x2nrealloc(commands, &allocated_commands,
331                                           sizeof *commands);
332                     for (c = commands; c < &commands[n_commands]; c++) {
333                         shash_moved(&c->options);
334                     }
335                 }
336                 parse_command(i - start, &argv[start],
337                               &commands[n_commands++]);
338             }
339             start = i + 1;
340         }
341     }
342     if (!n_commands) {
343         vsctl_fatal("missing command name (use --help for help)");
344     }
345     *n_commandsp = n_commands;
346     return commands;
347 }
348
349 static void
350 parse_command(int argc, char *argv[], struct vsctl_command *command)
351 {
352     const struct vsctl_command_syntax *p;
353     struct shash_node *node;
354     int n_arg;
355     int i;
356
357     shash_init(&command->options);
358     for (i = 0; i < argc; i++) {
359         const char *option = argv[i];
360         const char *equals;
361         char *key, *value;
362
363         if (option[0] != '-') {
364             break;
365         }
366
367         equals = strchr(option, '=');
368         if (equals) {
369             key = xmemdup0(option, equals - option);
370             value = xstrdup(equals + 1);
371         } else {
372             key = xstrdup(option);
373             value = NULL;
374         }
375
376         if (shash_find(&command->options, key)) {
377             vsctl_fatal("'%s' option specified multiple times", argv[i]);
378         }
379         shash_add_nocopy(&command->options, key, value);
380     }
381     if (i == argc) {
382         vsctl_fatal("missing command name");
383     }
384
385     p = find_command(argv[i]);
386     if (!p) {
387         vsctl_fatal("unknown command '%s'; use --help for help", argv[i]);
388     }
389
390     SHASH_FOR_EACH (node, &command->options) {
391         const char *s = strstr(p->options, node->name);
392         int end = s ? s[strlen(node->name)] : EOF;
393
394         if (end != '=' && end != ',' && end != ' ' && end != '\0') {
395             vsctl_fatal("'%s' command has no '%s' option",
396                         argv[i], node->name);
397         }
398         if ((end == '=') != (node->data != NULL)) {
399             if (end == '=') {
400                 vsctl_fatal("missing argument to '%s' option on '%s' "
401                             "command", node->name, argv[i]);
402             } else {
403                 vsctl_fatal("'%s' option on '%s' does not accept an "
404                             "argument", node->name, argv[i]);
405             }
406         }
407     }
408
409     n_arg = argc - i - 1;
410     if (n_arg < p->min_args) {
411         vsctl_fatal("'%s' command requires at least %d arguments",
412                     p->name, p->min_args);
413     } else if (n_arg > p->max_args) {
414         int j;
415
416         for (j = i + 1; j < argc; j++) {
417             if (argv[j][0] == '-') {
418                 vsctl_fatal("'%s' command takes at most %d arguments "
419                             "(note that options must precede command "
420                             "names and follow a \"--\" argument)",
421                             p->name, p->max_args);
422             }
423         }
424
425         vsctl_fatal("'%s' command takes at most %d arguments",
426                     p->name, p->max_args);
427     }
428
429     command->syntax = p;
430     command->argc = n_arg + 1;
431     command->argv = &argv[i];
432 }
433
434 /* Returns the "struct vsctl_command_syntax" for a given command 'name', or a
435  * null pointer if there is none. */
436 static const struct vsctl_command_syntax *
437 find_command(const char *name)
438 {
439     static struct shash commands = SHASH_INITIALIZER(&commands);
440
441     if (shash_is_empty(&commands)) {
442         const struct vsctl_command_syntax *p;
443
444         for (p = all_commands; p->name; p++) {
445             shash_add_assert(&commands, p->name, p);
446         }
447     }
448
449     return shash_find_data(&commands, name);
450 }
451
452 static void
453 vsctl_fatal(const char *format, ...)
454 {
455     char *message;
456     va_list args;
457
458     va_start(args, format);
459     message = xvasprintf(format, args);
460     va_end(args);
461
462     vlog_set_levels(&VLM_vsctl, VLF_CONSOLE, VLL_OFF);
463     VLOG_ERR("%s", message);
464     ovs_error(0, "%s", message);
465     vsctl_exit(EXIT_FAILURE);
466 }
467
468 /* Frees the current transaction and the underlying IDL and then calls
469  * exit(status).
470  *
471  * Freeing the transaction and the IDL is not strictly necessary, but it makes
472  * for a clean memory leak report from valgrind in the normal case.  That makes
473  * it easier to notice real memory leaks. */
474 static void
475 vsctl_exit(int status)
476 {
477     if (the_idl_txn) {
478         ovsdb_idl_txn_abort(the_idl_txn);
479         ovsdb_idl_txn_destroy(the_idl_txn);
480     }
481     ovsdb_idl_destroy(the_idl);
482     exit(status);
483 }
484
485 static void
486 usage(void)
487 {
488     printf("\
489 %s: ovs-vswitchd management utility\n\
490 usage: %s [OPTIONS] COMMAND [ARG...]\n\
491 \n\
492 Open vSwitch commands:\n\
493   init                        initialize database, if not yet initialized\n\
494   show                        print overview of database contents\n\
495   emer-reset                  reset configuration to clean state\n\
496 \n\
497 Bridge commands:\n\
498   add-br BRIDGE               create a new bridge named BRIDGE\n\
499   add-br BRIDGE PARENT VLAN   create new fake BRIDGE in PARENT on VLAN\n\
500   del-br BRIDGE               delete BRIDGE and all of its ports\n\
501   list-br                     print the names of all the bridges\n\
502   br-exists BRIDGE            exit 2 if BRIDGE does not exist\n\
503   br-to-vlan BRIDGE           print the VLAN which BRIDGE is on\n\
504   br-to-parent BRIDGE         print the parent of BRIDGE\n\
505   br-set-external-id BRIDGE KEY VALUE  set KEY on BRIDGE to VALUE\n\
506   br-set-external-id BRIDGE KEY  unset KEY on BRIDGE\n\
507   br-get-external-id BRIDGE KEY  print value of KEY on BRIDGE\n\
508   br-get-external-id BRIDGE  list key-value pairs on BRIDGE\n\
509 \n\
510 Port commands (a bond is considered to be a single port):\n\
511   list-ports BRIDGE           print the names of all the ports on BRIDGE\n\
512   add-port BRIDGE PORT        add network device PORT to BRIDGE\n\
513   add-bond BRIDGE PORT IFACE...  add bonded port PORT in BRIDGE from IFACES\n\
514   del-port [BRIDGE] PORT      delete PORT (which may be bonded) from BRIDGE\n\
515   port-to-br PORT             print name of bridge that contains PORT\n\
516 \n\
517 Interface commands (a bond consists of multiple interfaces):\n\
518   list-ifaces BRIDGE          print the names of all interfaces on BRIDGE\n\
519   iface-to-br IFACE           print name of bridge that contains IFACE\n\
520 \n\
521 Controller commands:\n\
522   get-controller BRIDGE      print the controllers for BRIDGE\n\
523   del-controller BRIDGE      delete the controllers for BRIDGE\n\
524   set-controller BRIDGE TARGET...  set the controllers for BRIDGE\n\
525   get-fail-mode BRIDGE       print the fail-mode for BRIDGE\n\
526   del-fail-mode BRIDGE       delete the fail-mode for BRIDGE\n\
527   set-fail-mode BRIDGE MODE  set the fail-mode for BRIDGE to MODE\n\
528 \n\
529 Manager commands:\n\
530   get-manager                print the managers\n\
531   del-manager                delete the managers\n\
532   set-manager TARGET...      set the list of managers to TARGET...\n\
533 \n\
534 SSL commands:\n\
535   get-ssl                     print the SSL configuration\n\
536   del-ssl                     delete the SSL configuration\n\
537   set-ssl PRIV-KEY CERT CA-CERT  set the SSL configuration\n\
538 \n\
539 Switch commands:\n\
540   emer-reset                  reset switch to known good state\n\
541 \n\
542 Database commands:\n\
543   list TBL [REC]              list RECord (or all records) in TBL\n\
544   find TBL CONDITION...       list records satisfying CONDITION in TBL\n\
545   get TBL REC COL[:KEY]       print values of COLumns in RECord in TBL\n\
546   set TBL REC COL[:KEY]=VALUE set COLumn values in RECord in TBL\n\
547   add TBL REC COL [KEY=]VALUE add (KEY=)VALUE to COLumn in RECord in TBL\n\
548   remove TBL REC COL [KEY=]VALUE  remove (KEY=)VALUE from COLumn\n\
549   clear TBL REC COL           clear values from COLumn in RECord in TBL\n\
550   create TBL COL[:KEY]=VALUE  create and initialize new record\n\
551   destroy TBL REC             delete RECord from TBL\n\
552   wait-until TBL REC [COL[:KEY]=VALUE]  wait until condition is true\n\
553 Potentially unsafe database commands require --force option.\n\
554 \n\
555 Options:\n\
556   --db=DATABASE               connect to DATABASE\n\
557                               (default: %s)\n\
558   --no-wait                   do not wait for ovs-vswitchd to reconfigure\n\
559   -t, --timeout=SECS          wait at most SECS seconds for ovs-vswitchd\n\
560   --dry-run                   do not commit changes to database\n\
561   --oneline                   print exactly one line of output per command\n",
562            program_name, program_name, default_db());
563     vlog_usage();
564     printf("\
565   --no-syslog             equivalent to --verbose=vsctl:syslog:warn\n");
566     stream_usage("database", true, true, false);
567     printf("\n\
568 Other options:\n\
569   -h, --help                  display this help message\n\
570   -V, --version               display version information\n");
571     exit(EXIT_SUCCESS);
572 }
573
574 static char *
575 default_db(void)
576 {
577     static char *def;
578     if (!def) {
579         def = xasprintf("unix:%s/db.sock", ovs_rundir());
580     }
581     return def;
582 }
583
584 /* Returns true if it looks like this set of arguments might modify the
585  * database, otherwise false.  (Not very smart, so it's prone to false
586  * positives.) */
587 static bool
588 might_write_to_db(char **argv)
589 {
590     for (; *argv; argv++) {
591         const struct vsctl_command_syntax *p = find_command(*argv);
592         if (p && p->mode == RW) {
593             return true;
594         }
595     }
596     return false;
597 }
598 \f
599 struct vsctl_context {
600     /* Read-only. */
601     int argc;
602     char **argv;
603     struct shash options;
604
605     /* Modifiable state. */
606     struct ds output;
607     struct table *table;
608     struct ovsdb_idl *idl;
609     struct ovsdb_idl_txn *txn;
610     struct ovsdb_symbol_table *symtab;
611     const struct ovsrec_open_vswitch *ovs;
612     bool verified_ports;
613
614     /* A cache of the contents of the database.
615      *
616      * A command that needs to use any of this information must first call
617      * vsctl_context_populate_cache().  A command that changes anything that
618      * could invalidate the cache must either call
619      * vsctl_context_invalidate_cache() or manually update the cache to
620      * maintain its correctness. */
621     bool cache_valid;
622     struct shash bridges;   /* Maps from bridge name to struct vsctl_bridge. */
623     struct shash ports;     /* Maps from port name to struct vsctl_port. */
624     struct shash ifaces;    /* Maps from port name to struct vsctl_iface. */
625
626     /* A command may set this member to true if some prerequisite is not met
627      * and the caller should wait for something to change and then retry. */
628     bool try_again;
629 };
630
631 struct vsctl_bridge {
632     struct ovsrec_bridge *br_cfg;
633     char *name;
634     struct list ports;          /* Contains "struct vsctl_port"s. */
635
636     /* VLAN ("fake") bridge support.
637      *
638      * Use 'parent != NULL' to detect a fake bridge, because 'vlan' can be 0
639      * in either case. */
640     struct hmap children;        /* VLAN bridges indexed by 'vlan'. */
641     struct hmap_node children_node; /* Node in parent's 'children' hmap. */
642     struct vsctl_bridge *parent; /* Real bridge, or NULL. */
643     int vlan;                    /* VLAN VID (0...4095), or 0. */
644 };
645
646 struct vsctl_port {
647     struct list ports_node;     /* In struct vsctl_bridge's 'ports' list. */
648     struct list ifaces;         /* Contains "struct vsctl_iface"s. */
649     struct ovsrec_port *port_cfg;
650     struct vsctl_bridge *bridge;
651 };
652
653 struct vsctl_iface {
654     struct list ifaces_node;     /* In struct vsctl_port's 'ifaces' list. */
655     struct ovsrec_interface *iface_cfg;
656     struct vsctl_port *port;
657 };
658
659 static char *
660 vsctl_context_to_string(const struct vsctl_context *ctx)
661 {
662     const struct shash_node *node;
663     struct svec words;
664     char *s;
665     int i;
666
667     svec_init(&words);
668     SHASH_FOR_EACH (node, &ctx->options) {
669         svec_add(&words, node->name);
670     }
671     for (i = 0; i < ctx->argc; i++) {
672         svec_add(&words, ctx->argv[i]);
673     }
674     svec_terminate(&words);
675
676     s = process_escape_args(words.names);
677
678     svec_destroy(&words);
679
680     return s;
681 }
682
683 static void
684 verify_ports(struct vsctl_context *ctx)
685 {
686     if (!ctx->verified_ports) {
687         const struct ovsrec_bridge *bridge;
688         const struct ovsrec_port *port;
689
690         ovsrec_open_vswitch_verify_bridges(ctx->ovs);
691         OVSREC_BRIDGE_FOR_EACH (bridge, ctx->idl) {
692             ovsrec_bridge_verify_ports(bridge);
693         }
694         OVSREC_PORT_FOR_EACH (port, ctx->idl) {
695             ovsrec_port_verify_interfaces(port);
696         }
697
698         ctx->verified_ports = true;
699     }
700 }
701
702 static struct vsctl_bridge *
703 add_bridge_to_cache(struct vsctl_context *ctx,
704                     struct ovsrec_bridge *br_cfg, const char *name,
705                     struct vsctl_bridge *parent, int vlan)
706 {
707     struct vsctl_bridge *br = xmalloc(sizeof *br);
708     br->br_cfg = br_cfg;
709     br->name = xstrdup(name);
710     list_init(&br->ports);
711     br->parent = parent;
712     br->vlan = vlan;
713     hmap_init(&br->children);
714     if (parent) {
715         hmap_insert(&parent->children, &br->children_node, hash_int(vlan, 0));
716     }
717     shash_add(&ctx->bridges, br->name, br);
718     return br;
719 }
720
721 static void
722 ovs_delete_bridge(const struct ovsrec_open_vswitch *ovs,
723                   struct ovsrec_bridge *bridge)
724 {
725     struct ovsrec_bridge **bridges;
726     size_t i, n;
727
728     bridges = xmalloc(sizeof *ovs->bridges * ovs->n_bridges);
729     for (i = n = 0; i < ovs->n_bridges; i++) {
730         if (ovs->bridges[i] != bridge) {
731             bridges[n++] = ovs->bridges[i];
732         }
733     }
734     ovsrec_open_vswitch_set_bridges(ovs, bridges, n);
735     free(bridges);
736 }
737
738 static void
739 del_cached_bridge(struct vsctl_context *ctx, struct vsctl_bridge *br)
740 {
741     assert(list_is_empty(&br->ports));
742     assert(hmap_is_empty(&br->children));
743     if (br->parent) {
744         hmap_remove(&br->parent->children, &br->children_node);
745     }
746     if (br->br_cfg) {
747         ovsrec_bridge_delete(br->br_cfg);
748         ovs_delete_bridge(ctx->ovs, br->br_cfg);
749     }
750     shash_find_and_delete(&ctx->bridges, br->name);
751     hmap_destroy(&br->children);
752     free(br->name);
753     free(br);
754 }
755
756 static bool
757 port_is_fake_bridge(const struct ovsrec_port *port_cfg)
758 {
759     return (port_cfg->fake_bridge
760             && port_cfg->tag
761             && *port_cfg->tag >= 0 && *port_cfg->tag <= 4095);
762 }
763
764 static struct vsctl_bridge *
765 find_vlan_bridge(struct vsctl_bridge *parent, int vlan)
766 {
767     struct vsctl_bridge *child;
768
769     HMAP_FOR_EACH_IN_BUCKET (child, children_node, hash_int(vlan, 0),
770                              &parent->children) {
771         if (child->vlan == vlan) {
772             return child;
773         }
774     }
775
776     return NULL;
777 }
778
779 static struct vsctl_port *
780 add_port_to_cache(struct vsctl_context *ctx, struct vsctl_bridge *parent,
781                   struct ovsrec_port *port_cfg)
782 {
783     struct vsctl_port *port;
784
785     if (port_cfg->tag
786         && *port_cfg->tag >= 0 && *port_cfg->tag <= 4095) {
787         struct vsctl_bridge *vlan_bridge;
788
789         vlan_bridge = find_vlan_bridge(parent, *port_cfg->tag);
790         if (vlan_bridge) {
791             parent = vlan_bridge;
792         }
793     }
794
795     port = xmalloc(sizeof *port);
796     list_push_back(&parent->ports, &port->ports_node);
797     list_init(&port->ifaces);
798     port->port_cfg = port_cfg;
799     port->bridge = parent;
800     shash_add(&ctx->ports, port_cfg->name, port);
801
802     return port;
803 }
804
805 static void
806 del_cached_port(struct vsctl_context *ctx, struct vsctl_port *port)
807 {
808     assert(list_is_empty(&port->ifaces));
809     list_remove(&port->ports_node);
810     shash_find_and_delete(&ctx->ports, port->port_cfg->name);
811     ovsrec_port_delete(port->port_cfg);
812     free(port);
813 }
814
815 static struct vsctl_iface *
816 add_iface_to_cache(struct vsctl_context *ctx, struct vsctl_port *parent,
817                    struct ovsrec_interface *iface_cfg)
818 {
819     struct vsctl_iface *iface;
820
821     iface = xmalloc(sizeof *iface);
822     list_push_back(&parent->ifaces, &iface->ifaces_node);
823     iface->iface_cfg = iface_cfg;
824     iface->port = parent;
825     shash_add(&ctx->ifaces, iface_cfg->name, iface);
826
827     return iface;
828 }
829
830 static void
831 del_cached_iface(struct vsctl_context *ctx, struct vsctl_iface *iface)
832 {
833     list_remove(&iface->ifaces_node);
834     shash_find_and_delete(&ctx->ifaces, iface->iface_cfg->name);
835     ovsrec_interface_delete(iface->iface_cfg);
836     free(iface);
837 }
838
839 static void
840 vsctl_context_invalidate_cache(struct vsctl_context *ctx)
841 {
842     struct shash_node *node;
843
844     if (!ctx->cache_valid) {
845         return;
846     }
847     ctx->cache_valid = false;
848
849     SHASH_FOR_EACH (node, &ctx->bridges) {
850         struct vsctl_bridge *bridge = node->data;
851         hmap_destroy(&bridge->children);
852         free(bridge->name);
853         free(bridge);
854     }
855     shash_destroy(&ctx->bridges);
856
857     shash_destroy_free_data(&ctx->ports);
858     shash_destroy_free_data(&ctx->ifaces);
859 }
860
861 static void
862 pre_get_info(struct vsctl_context *ctx)
863 {
864     ovsdb_idl_add_column(ctx->idl, &ovsrec_open_vswitch_col_bridges);
865
866     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_name);
867     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_controller);
868     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_fail_mode);
869     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_ports);
870
871     ovsdb_idl_add_column(ctx->idl, &ovsrec_port_col_name);
872     ovsdb_idl_add_column(ctx->idl, &ovsrec_port_col_fake_bridge);
873     ovsdb_idl_add_column(ctx->idl, &ovsrec_port_col_tag);
874     ovsdb_idl_add_column(ctx->idl, &ovsrec_port_col_interfaces);
875
876     ovsdb_idl_add_column(ctx->idl, &ovsrec_interface_col_name);
877 }
878
879 static void
880 vsctl_context_populate_cache(struct vsctl_context *ctx)
881 {
882     const struct ovsrec_open_vswitch *ovs = ctx->ovs;
883     struct sset bridges, ports;
884     size_t i;
885
886     if (ctx->cache_valid) {
887         /* Cache is already populated. */
888         return;
889     }
890     ctx->cache_valid = true;
891     shash_init(&ctx->bridges);
892     shash_init(&ctx->ports);
893     shash_init(&ctx->ifaces);
894
895     sset_init(&bridges);
896     sset_init(&ports);
897     for (i = 0; i < ovs->n_bridges; i++) {
898         struct ovsrec_bridge *br_cfg = ovs->bridges[i];
899         struct vsctl_bridge *br;
900         size_t j;
901
902         if (!sset_add(&bridges, br_cfg->name)) {
903             VLOG_WARN("%s: database contains duplicate bridge name",
904                       br_cfg->name);
905             continue;
906         }
907         br = add_bridge_to_cache(ctx, br_cfg, br_cfg->name, NULL, 0);
908         if (!br) {
909             continue;
910         }
911
912         for (j = 0; j < br_cfg->n_ports; j++) {
913             struct ovsrec_port *port_cfg = br_cfg->ports[j];
914
915             if (!sset_add(&ports, port_cfg->name)) {
916                 /* Duplicate port name.  (We will warn about that later.) */
917                 continue;
918             }
919
920             if (port_is_fake_bridge(port_cfg)
921                 && sset_add(&bridges, port_cfg->name)) {
922                 add_bridge_to_cache(ctx, NULL, port_cfg->name, br,
923                                     *port_cfg->tag);
924             }
925         }
926     }
927     sset_destroy(&bridges);
928     sset_destroy(&ports);
929
930     sset_init(&bridges);
931     for (i = 0; i < ovs->n_bridges; i++) {
932         struct ovsrec_bridge *br_cfg = ovs->bridges[i];
933         struct vsctl_bridge *br;
934         size_t j;
935
936         if (!sset_add(&bridges, br_cfg->name)) {
937             continue;
938         }
939         br = shash_find_data(&ctx->bridges, br_cfg->name);
940         for (j = 0; j < br_cfg->n_ports; j++) {
941             struct ovsrec_port *port_cfg = br_cfg->ports[j];
942             struct vsctl_port *port;
943             size_t k;
944
945             port = shash_find_data(&ctx->ports, port_cfg->name);
946             if (port) {
947                 if (port_cfg == port->port_cfg) {
948                     VLOG_WARN("%s: port is in multiple bridges (%s and %s)",
949                               port_cfg->name, br->name, port->bridge->name);
950                 } else {
951                     /* Log as an error because this violates the database's
952                      * uniqueness constraints, so the database server shouldn't
953                      * have allowed it. */
954                     VLOG_ERR("%s: database contains duplicate port name",
955                              port_cfg->name);
956                 }
957                 continue;
958             }
959
960             if (port_is_fake_bridge(port_cfg)
961                 && !sset_add(&bridges, port_cfg->name)) {
962                 continue;
963             }
964
965             port = add_port_to_cache(ctx, br, port_cfg);
966             for (k = 0; k < port_cfg->n_interfaces; k++) {
967                 struct ovsrec_interface *iface_cfg = port_cfg->interfaces[k];
968                 struct vsctl_iface *iface;
969
970                 iface = shash_find_data(&ctx->ifaces, iface_cfg->name);
971                 if (iface) {
972                     if (iface_cfg == iface->iface_cfg) {
973                         VLOG_WARN("%s: interface is in multiple ports "
974                                   "(%s and %s)",
975                                   iface_cfg->name,
976                                   iface->port->port_cfg->name,
977                                   port->port_cfg->name);
978                     } else {
979                         /* Log as an error because this violates the database's
980                          * uniqueness constraints, so the database server
981                          * shouldn't have allowed it. */
982                         VLOG_ERR("%s: database contains duplicate interface "
983                                  "name", iface_cfg->name);
984                     }
985                     continue;
986                 }
987
988                 add_iface_to_cache(ctx, port, iface_cfg);
989             }
990         }
991     }
992     sset_destroy(&bridges);
993 }
994
995 static void
996 check_conflicts(struct vsctl_context *ctx, const char *name,
997                 char *msg)
998 {
999     struct vsctl_iface *iface;
1000     struct vsctl_port *port;
1001
1002     verify_ports(ctx);
1003
1004     if (shash_find(&ctx->bridges, name)) {
1005         vsctl_fatal("%s because a bridge named %s already exists",
1006                     msg, name);
1007     }
1008
1009     port = shash_find_data(&ctx->ports, name);
1010     if (port) {
1011         vsctl_fatal("%s because a port named %s already exists on "
1012                     "bridge %s", msg, name, port->bridge->name);
1013     }
1014
1015     iface = shash_find_data(&ctx->ifaces, name);
1016     if (iface) {
1017         vsctl_fatal("%s because an interface named %s already exists "
1018                     "on bridge %s", msg, name, iface->port->bridge->name);
1019     }
1020
1021     free(msg);
1022 }
1023
1024 static struct vsctl_bridge *
1025 find_bridge(struct vsctl_context *ctx, const char *name, bool must_exist)
1026 {
1027     struct vsctl_bridge *br;
1028
1029     assert(ctx->cache_valid);
1030
1031     br = shash_find_data(&ctx->bridges, name);
1032     if (must_exist && !br) {
1033         vsctl_fatal("no bridge named %s", name);
1034     }
1035     ovsrec_open_vswitch_verify_bridges(ctx->ovs);
1036     return br;
1037 }
1038
1039 static struct vsctl_bridge *
1040 find_real_bridge(struct vsctl_context *ctx, const char *name, bool must_exist)
1041 {
1042     struct vsctl_bridge *br = find_bridge(ctx, name, must_exist);
1043     if (br && br->parent) {
1044         vsctl_fatal("%s is a fake bridge", name);
1045     }
1046     return br;
1047 }
1048
1049 static struct vsctl_port *
1050 find_port(struct vsctl_context *ctx, const char *name, bool must_exist)
1051 {
1052     struct vsctl_port *port;
1053
1054     assert(ctx->cache_valid);
1055
1056     port = shash_find_data(&ctx->ports, name);
1057     if (port && !strcmp(name, port->bridge->name)) {
1058         port = NULL;
1059     }
1060     if (must_exist && !port) {
1061         vsctl_fatal("no port named %s", name);
1062     }
1063     verify_ports(ctx);
1064     return port;
1065 }
1066
1067 static struct vsctl_iface *
1068 find_iface(struct vsctl_context *ctx, const char *name, bool must_exist)
1069 {
1070     struct vsctl_iface *iface;
1071
1072     assert(ctx->cache_valid);
1073
1074     iface = shash_find_data(&ctx->ifaces, name);
1075     if (iface && !strcmp(name, iface->port->bridge->name)) {
1076         iface = NULL;
1077     }
1078     if (must_exist && !iface) {
1079         vsctl_fatal("no interface named %s", name);
1080     }
1081     verify_ports(ctx);
1082     return iface;
1083 }
1084
1085 static void
1086 bridge_insert_port(struct ovsrec_bridge *br, struct ovsrec_port *port)
1087 {
1088     struct ovsrec_port **ports;
1089     size_t i;
1090
1091     ports = xmalloc(sizeof *br->ports * (br->n_ports + 1));
1092     for (i = 0; i < br->n_ports; i++) {
1093         ports[i] = br->ports[i];
1094     }
1095     ports[br->n_ports] = port;
1096     ovsrec_bridge_set_ports(br, ports, br->n_ports + 1);
1097     free(ports);
1098 }
1099
1100 static void
1101 bridge_delete_port(struct ovsrec_bridge *br, struct ovsrec_port *port)
1102 {
1103     struct ovsrec_port **ports;
1104     size_t i, n;
1105
1106     ports = xmalloc(sizeof *br->ports * br->n_ports);
1107     for (i = n = 0; i < br->n_ports; i++) {
1108         if (br->ports[i] != port) {
1109             ports[n++] = br->ports[i];
1110         }
1111     }
1112     ovsrec_bridge_set_ports(br, ports, n);
1113     free(ports);
1114 }
1115
1116 static void
1117 ovs_insert_bridge(const struct ovsrec_open_vswitch *ovs,
1118                   struct ovsrec_bridge *bridge)
1119 {
1120     struct ovsrec_bridge **bridges;
1121     size_t i;
1122
1123     bridges = xmalloc(sizeof *ovs->bridges * (ovs->n_bridges + 1));
1124     for (i = 0; i < ovs->n_bridges; i++) {
1125         bridges[i] = ovs->bridges[i];
1126     }
1127     bridges[ovs->n_bridges] = bridge;
1128     ovsrec_open_vswitch_set_bridges(ovs, bridges, ovs->n_bridges + 1);
1129     free(bridges);
1130 }
1131
1132 static void
1133 cmd_init(struct vsctl_context *ctx OVS_UNUSED)
1134 {
1135 }
1136
1137 struct cmd_show_table {
1138     const struct ovsdb_idl_table_class *table;
1139     const struct ovsdb_idl_column *name_column;
1140     const struct ovsdb_idl_column *columns[3];
1141     bool recurse;
1142 };
1143
1144 static struct cmd_show_table cmd_show_tables[] = {
1145     {&ovsrec_table_open_vswitch,
1146      NULL,
1147      {&ovsrec_open_vswitch_col_manager_options,
1148       &ovsrec_open_vswitch_col_bridges,
1149       &ovsrec_open_vswitch_col_ovs_version},
1150      false},
1151
1152     {&ovsrec_table_bridge,
1153      &ovsrec_bridge_col_name,
1154      {&ovsrec_bridge_col_controller,
1155       &ovsrec_bridge_col_fail_mode,
1156       &ovsrec_bridge_col_ports},
1157      false},
1158
1159     {&ovsrec_table_port,
1160      &ovsrec_port_col_name,
1161      {&ovsrec_port_col_tag,
1162       &ovsrec_port_col_trunks,
1163       &ovsrec_port_col_interfaces},
1164      false},
1165
1166     {&ovsrec_table_interface,
1167      &ovsrec_interface_col_name,
1168      {&ovsrec_interface_col_type,
1169       &ovsrec_interface_col_options,
1170       NULL},
1171      false},
1172
1173     {&ovsrec_table_controller,
1174      &ovsrec_controller_col_target,
1175      {&ovsrec_controller_col_is_connected,
1176       NULL,
1177       NULL},
1178      false},
1179
1180     {&ovsrec_table_manager,
1181      &ovsrec_manager_col_target,
1182      {&ovsrec_manager_col_is_connected,
1183       NULL,
1184       NULL},
1185      false},
1186 };
1187
1188 static void
1189 pre_cmd_show(struct vsctl_context *ctx)
1190 {
1191     struct cmd_show_table *show;
1192
1193     for (show = cmd_show_tables;
1194          show < &cmd_show_tables[ARRAY_SIZE(cmd_show_tables)];
1195          show++) {
1196         size_t i;
1197
1198         ovsdb_idl_add_table(ctx->idl, show->table);
1199         if (show->name_column) {
1200             ovsdb_idl_add_column(ctx->idl, show->name_column);
1201         }
1202         for (i = 0; i < ARRAY_SIZE(show->columns); i++) {
1203             const struct ovsdb_idl_column *column = show->columns[i];
1204             if (column) {
1205                 ovsdb_idl_add_column(ctx->idl, column);
1206             }
1207         }
1208     }
1209 }
1210
1211 static struct cmd_show_table *
1212 cmd_show_find_table_by_row(const struct ovsdb_idl_row *row)
1213 {
1214     struct cmd_show_table *show;
1215
1216     for (show = cmd_show_tables;
1217          show < &cmd_show_tables[ARRAY_SIZE(cmd_show_tables)];
1218          show++) {
1219         if (show->table == row->table->class) {
1220             return show;
1221         }
1222     }
1223     return NULL;
1224 }
1225
1226 static struct cmd_show_table *
1227 cmd_show_find_table_by_name(const char *name)
1228 {
1229     struct cmd_show_table *show;
1230
1231     for (show = cmd_show_tables;
1232          show < &cmd_show_tables[ARRAY_SIZE(cmd_show_tables)];
1233          show++) {
1234         if (!strcmp(show->table->name, name)) {
1235             return show;
1236         }
1237     }
1238     return NULL;
1239 }
1240
1241 static void
1242 cmd_show_row(struct vsctl_context *ctx, const struct ovsdb_idl_row *row,
1243              int level)
1244 {
1245     struct cmd_show_table *show = cmd_show_find_table_by_row(row);
1246     size_t i;
1247
1248     ds_put_char_multiple(&ctx->output, ' ', level * 4);
1249     if (show && show->name_column) {
1250         const struct ovsdb_datum *datum;
1251
1252         ds_put_format(&ctx->output, "%s ", show->table->name);
1253         datum = ovsdb_idl_read(row, show->name_column);
1254         ovsdb_datum_to_string(datum, &show->name_column->type, &ctx->output);
1255     } else {
1256         ds_put_format(&ctx->output, UUID_FMT, UUID_ARGS(&row->uuid));
1257     }
1258     ds_put_char(&ctx->output, '\n');
1259
1260     if (!show || show->recurse) {
1261         return;
1262     }
1263
1264     show->recurse = true;
1265     for (i = 0; i < ARRAY_SIZE(show->columns); i++) {
1266         const struct ovsdb_idl_column *column = show->columns[i];
1267         const struct ovsdb_datum *datum;
1268
1269         if (!column) {
1270             break;
1271         }
1272
1273         datum = ovsdb_idl_read(row, column);
1274         if (column->type.key.type == OVSDB_TYPE_UUID &&
1275             column->type.key.u.uuid.refTableName) {
1276             struct cmd_show_table *ref_show;
1277             size_t j;
1278
1279             ref_show = cmd_show_find_table_by_name(
1280                 column->type.key.u.uuid.refTableName);
1281             if (ref_show) {
1282                 for (j = 0; j < datum->n; j++) {
1283                     const struct ovsdb_idl_row *ref_row;
1284
1285                     ref_row = ovsdb_idl_get_row_for_uuid(ctx->idl,
1286                                                          ref_show->table,
1287                                                          &datum->keys[j].uuid);
1288                     if (ref_row) {
1289                         cmd_show_row(ctx, ref_row, level + 1);
1290                     }
1291                 }
1292                 continue;
1293             }
1294         }
1295
1296         if (!ovsdb_datum_is_default(datum, &column->type)) {
1297             ds_put_char_multiple(&ctx->output, ' ', (level + 1) * 4);
1298             ds_put_format(&ctx->output, "%s: ", column->name);
1299             ovsdb_datum_to_string(datum, &column->type, &ctx->output);
1300             ds_put_char(&ctx->output, '\n');
1301         }
1302     }
1303     show->recurse = false;
1304 }
1305
1306 static void
1307 cmd_show(struct vsctl_context *ctx)
1308 {
1309     const struct ovsdb_idl_row *row;
1310
1311     for (row = ovsdb_idl_first_row(ctx->idl, cmd_show_tables[0].table);
1312          row; row = ovsdb_idl_next_row(row)) {
1313         cmd_show_row(ctx, row, 0);
1314     }
1315 }
1316
1317 static void
1318 pre_cmd_emer_reset(struct vsctl_context *ctx)
1319 {
1320     ovsdb_idl_add_column(ctx->idl, &ovsrec_open_vswitch_col_manager_options);
1321     ovsdb_idl_add_column(ctx->idl, &ovsrec_open_vswitch_col_ssl);
1322
1323     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_controller);
1324     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_fail_mode);
1325     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_mirrors);
1326     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_netflow);
1327     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_sflow);
1328     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_flood_vlans);
1329     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_other_config);
1330
1331     ovsdb_idl_add_column(ctx->idl, &ovsrec_port_col_other_config);
1332
1333     ovsdb_idl_add_column(ctx->idl,
1334                           &ovsrec_interface_col_ingress_policing_rate);
1335     ovsdb_idl_add_column(ctx->idl,
1336                           &ovsrec_interface_col_ingress_policing_burst);
1337 }
1338
1339 static void
1340 cmd_emer_reset(struct vsctl_context *ctx)
1341 {
1342     const struct ovsdb_idl *idl = ctx->idl;
1343     const struct ovsrec_bridge *br;
1344     const struct ovsrec_port *port;
1345     const struct ovsrec_interface *iface;
1346     const struct ovsrec_mirror *mirror, *next_mirror;
1347     const struct ovsrec_controller *ctrl, *next_ctrl;
1348     const struct ovsrec_manager *mgr, *next_mgr;
1349     const struct ovsrec_netflow *nf, *next_nf;
1350     const struct ovsrec_ssl *ssl, *next_ssl;
1351     const struct ovsrec_sflow *sflow, *next_sflow;
1352
1353     /* Reset the Open_vSwitch table. */
1354     ovsrec_open_vswitch_set_manager_options(ctx->ovs, NULL, 0);
1355     ovsrec_open_vswitch_set_ssl(ctx->ovs, NULL);
1356
1357     OVSREC_BRIDGE_FOR_EACH (br, idl) {
1358         const char *hwaddr;
1359
1360         ovsrec_bridge_set_controller(br, NULL, 0);
1361         ovsrec_bridge_set_fail_mode(br, NULL);
1362         ovsrec_bridge_set_mirrors(br, NULL, 0);
1363         ovsrec_bridge_set_netflow(br, NULL);
1364         ovsrec_bridge_set_sflow(br, NULL);
1365         ovsrec_bridge_set_flood_vlans(br, NULL, 0);
1366
1367         /* We only want to save the "hwaddr" key from other_config. */
1368         hwaddr = smap_get(&br->other_config, "hwaddr");
1369         if (hwaddr) {
1370             struct smap smap = SMAP_INITIALIZER(&smap);
1371             smap_add(&smap, "hwaddr", hwaddr);
1372             ovsrec_bridge_set_other_config(br, &smap);
1373             smap_destroy(&smap);
1374         } else {
1375             ovsrec_bridge_set_other_config(br, NULL);
1376         }
1377     }
1378
1379     OVSREC_PORT_FOR_EACH (port, idl) {
1380         ovsrec_port_set_other_config(port, NULL);
1381     }
1382
1383     OVSREC_INTERFACE_FOR_EACH (iface, idl) {
1384         /* xxx What do we do about gre/patch devices created by mgr? */
1385
1386         ovsrec_interface_set_ingress_policing_rate(iface, 0);
1387         ovsrec_interface_set_ingress_policing_burst(iface, 0);
1388     }
1389
1390     OVSREC_MIRROR_FOR_EACH_SAFE (mirror, next_mirror, idl) {
1391         ovsrec_mirror_delete(mirror);
1392     }
1393
1394     OVSREC_CONTROLLER_FOR_EACH_SAFE (ctrl, next_ctrl, idl) {
1395         ovsrec_controller_delete(ctrl);
1396     }
1397
1398     OVSREC_MANAGER_FOR_EACH_SAFE (mgr, next_mgr, idl) {
1399         ovsrec_manager_delete(mgr);
1400     }
1401
1402     OVSREC_NETFLOW_FOR_EACH_SAFE (nf, next_nf, idl) {
1403         ovsrec_netflow_delete(nf);
1404     }
1405
1406     OVSREC_SSL_FOR_EACH_SAFE (ssl, next_ssl, idl) {
1407         ovsrec_ssl_delete(ssl);
1408     }
1409
1410     OVSREC_SFLOW_FOR_EACH_SAFE (sflow, next_sflow, idl) {
1411         ovsrec_sflow_delete(sflow);
1412     }
1413
1414     vsctl_context_invalidate_cache(ctx);
1415 }
1416
1417 static void
1418 cmd_add_br(struct vsctl_context *ctx)
1419 {
1420     bool may_exist = shash_find(&ctx->options, "--may-exist") != NULL;
1421     const char *br_name, *parent_name;
1422     int vlan;
1423
1424     br_name = ctx->argv[1];
1425     if (ctx->argc == 2) {
1426         parent_name = NULL;
1427         vlan = 0;
1428     } else if (ctx->argc == 4) {
1429         parent_name = ctx->argv[2];
1430         vlan = atoi(ctx->argv[3]);
1431         if (vlan < 0 || vlan > 4095) {
1432             vsctl_fatal("%s: vlan must be between 0 and 4095", ctx->argv[0]);
1433         }
1434     } else {
1435         vsctl_fatal("'%s' command takes exactly 1 or 3 arguments",
1436                     ctx->argv[0]);
1437     }
1438
1439     vsctl_context_populate_cache(ctx);
1440     if (may_exist) {
1441         struct vsctl_bridge *br;
1442
1443         br = find_bridge(ctx, br_name, false);
1444         if (br) {
1445             if (!parent_name) {
1446                 if (br->parent) {
1447                     vsctl_fatal("\"--may-exist add-br %s\" but %s is "
1448                                 "a VLAN bridge for VLAN %d",
1449                                 br_name, br_name, br->vlan);
1450                 }
1451             } else {
1452                 if (!br->parent) {
1453                     vsctl_fatal("\"--may-exist add-br %s %s %d\" but %s "
1454                                 "is not a VLAN bridge",
1455                                 br_name, parent_name, vlan, br_name);
1456                 } else if (strcmp(br->parent->name, parent_name)) {
1457                     vsctl_fatal("\"--may-exist add-br %s %s %d\" but %s "
1458                                 "has the wrong parent %s",
1459                                 br_name, parent_name, vlan,
1460                                 br_name, br->parent->name);
1461                 } else if (br->vlan != vlan) {
1462                     vsctl_fatal("\"--may-exist add-br %s %s %d\" but %s "
1463                                 "is a VLAN bridge for the wrong VLAN %d",
1464                                 br_name, parent_name, vlan, br_name, br->vlan);
1465                 }
1466             }
1467             return;
1468         }
1469     }
1470     check_conflicts(ctx, br_name,
1471                     xasprintf("cannot create a bridge named %s", br_name));
1472
1473     if (!parent_name) {
1474         struct ovsrec_port *port;
1475         struct ovsrec_interface *iface;
1476         struct ovsrec_bridge *br;
1477
1478         iface = ovsrec_interface_insert(ctx->txn);
1479         ovsrec_interface_set_name(iface, br_name);
1480         ovsrec_interface_set_type(iface, "internal");
1481
1482         port = ovsrec_port_insert(ctx->txn);
1483         ovsrec_port_set_name(port, br_name);
1484         ovsrec_port_set_interfaces(port, &iface, 1);
1485
1486         br = ovsrec_bridge_insert(ctx->txn);
1487         ovsrec_bridge_set_name(br, br_name);
1488         ovsrec_bridge_set_ports(br, &port, 1);
1489
1490         ovs_insert_bridge(ctx->ovs, br);
1491     } else {
1492         struct vsctl_bridge *parent;
1493         struct ovsrec_port *port;
1494         struct ovsrec_interface *iface;
1495         struct ovsrec_bridge *br;
1496         int64_t tag = vlan;
1497
1498         parent = find_bridge(ctx, parent_name, false);
1499         if (parent && parent->parent) {
1500             vsctl_fatal("cannot create bridge with fake bridge as parent");
1501         }
1502         if (!parent) {
1503             vsctl_fatal("parent bridge %s does not exist", parent_name);
1504         }
1505         br = parent->br_cfg;
1506
1507         iface = ovsrec_interface_insert(ctx->txn);
1508         ovsrec_interface_set_name(iface, br_name);
1509         ovsrec_interface_set_type(iface, "internal");
1510
1511         port = ovsrec_port_insert(ctx->txn);
1512         ovsrec_port_set_name(port, br_name);
1513         ovsrec_port_set_interfaces(port, &iface, 1);
1514         ovsrec_port_set_fake_bridge(port, true);
1515         ovsrec_port_set_tag(port, &tag, 1);
1516
1517         bridge_insert_port(br, port);
1518     }
1519
1520     vsctl_context_invalidate_cache(ctx);
1521 }
1522
1523 static void
1524 del_port(struct vsctl_context *ctx, struct vsctl_port *port)
1525 {
1526     struct vsctl_iface *iface, *next_iface;
1527
1528     bridge_delete_port((port->bridge->parent
1529                         ? port->bridge->parent->br_cfg
1530                         : port->bridge->br_cfg), port->port_cfg);
1531
1532     LIST_FOR_EACH_SAFE (iface, next_iface, ifaces_node, &port->ifaces) {
1533         del_cached_iface(ctx, iface);
1534     }
1535     del_cached_port(ctx, port);
1536 }
1537
1538 static void
1539 del_bridge(struct vsctl_context *ctx, struct vsctl_bridge *br)
1540 {
1541     struct vsctl_bridge *child, *next_child;
1542     struct vsctl_port *port, *next_port;
1543
1544     HMAP_FOR_EACH_SAFE (child, next_child, children_node, &br->children) {
1545         del_bridge(ctx, child);
1546     }
1547
1548     LIST_FOR_EACH_SAFE (port, next_port, ports_node, &br->ports) {
1549         del_port(ctx, port);
1550     }
1551
1552     del_cached_bridge(ctx, br);
1553 }
1554
1555 static void
1556 cmd_del_br(struct vsctl_context *ctx)
1557 {
1558     bool must_exist = !shash_find(&ctx->options, "--if-exists");
1559     struct vsctl_bridge *bridge;
1560
1561     vsctl_context_populate_cache(ctx);
1562     bridge = find_bridge(ctx, ctx->argv[1], must_exist);
1563     if (bridge) {
1564         del_bridge(ctx, bridge);
1565     }
1566 }
1567
1568 static void
1569 output_sorted(struct svec *svec, struct ds *output)
1570 {
1571     const char *name;
1572     size_t i;
1573
1574     svec_sort(svec);
1575     SVEC_FOR_EACH (i, name, svec) {
1576         ds_put_format(output, "%s\n", name);
1577     }
1578 }
1579
1580 static void
1581 cmd_list_br(struct vsctl_context *ctx)
1582 {
1583     struct shash_node *node;
1584     struct svec bridges;
1585     bool real = shash_find(&ctx->options, "--real");
1586     bool fake = shash_find(&ctx->options, "--fake");
1587
1588     /* If neither fake nor real were requested, return both. */
1589     if (!real && !fake) {
1590         real = fake = true;
1591     }
1592
1593     vsctl_context_populate_cache(ctx);
1594
1595     svec_init(&bridges);
1596     SHASH_FOR_EACH (node, &ctx->bridges) {
1597         struct vsctl_bridge *br = node->data;
1598
1599         if (br->parent ? fake : real) {
1600             svec_add(&bridges, br->name);
1601         }
1602     }
1603     output_sorted(&bridges, &ctx->output);
1604     svec_destroy(&bridges);
1605 }
1606
1607 static void
1608 cmd_br_exists(struct vsctl_context *ctx)
1609 {
1610     vsctl_context_populate_cache(ctx);
1611     if (!find_bridge(ctx, ctx->argv[1], false)) {
1612         vsctl_exit(2);
1613     }
1614 }
1615
1616 static void
1617 set_external_id(struct smap *old, struct smap *new,
1618                 char *key, char *value)
1619 {
1620     smap_clone(new, old);
1621
1622     if (value) {
1623         smap_replace(new, key, value);
1624     } else {
1625         smap_remove(new, key);
1626     }
1627 }
1628
1629 static void
1630 pre_cmd_br_set_external_id(struct vsctl_context *ctx)
1631 {
1632     pre_get_info(ctx);
1633     ovsdb_idl_add_column(ctx->idl, &ovsrec_bridge_col_external_ids);
1634     ovsdb_idl_add_column(ctx->idl, &ovsrec_port_col_external_ids);
1635 }
1636
1637 static void
1638 cmd_br_set_external_id(struct vsctl_context *ctx)
1639 {
1640     struct vsctl_bridge *bridge;
1641     struct smap new;
1642
1643     vsctl_context_populate_cache(ctx);
1644     bridge = find_bridge(ctx, ctx->argv[1], true);
1645     if (bridge->br_cfg) {
1646
1647         set_external_id(&bridge->br_cfg->external_ids, &new, ctx->argv[2],
1648                         ctx->argc >= 4 ? ctx->argv[3] : NULL);
1649         ovsrec_bridge_verify_external_ids(bridge->br_cfg);
1650         ovsrec_bridge_set_external_ids(bridge->br_cfg, &new);
1651     } else {
1652         char *key = xasprintf("fake-bridge-%s", ctx->argv[2]);
1653         struct vsctl_port *port = shash_find_data(&ctx->ports, ctx->argv[1]);
1654         set_external_id(&port->port_cfg->external_ids, &new,
1655                         key, ctx->argc >= 4 ? ctx->argv[3] : NULL);
1656         ovsrec_port_verify_external_ids(port->port_cfg);
1657         ovsrec_port_set_external_ids(port->port_cfg, &new);
1658         free(key);
1659     }
1660     smap_destroy(&new);
1661 }
1662
1663 static void
1664 get_external_id(struct smap *smap, const char *prefix, const char *key,
1665                 struct ds *output)
1666 {
1667     if (key) {
1668         char *prefix_key = xasprintf("%s%s", prefix, key);
1669         const char *value = smap_get(smap, prefix_key);
1670
1671         if (value) {
1672             ds_put_format(output, "%s\n", value);
1673         }
1674         free(prefix_key);
1675     } else {
1676         const struct smap_node **sorted = smap_sort(smap);
1677         size_t prefix_len = strlen(prefix);
1678         size_t i;
1679
1680         for (i = 0; i < smap_count(smap); i++) {
1681             const struct smap_node *node = sorted[i];
1682             if (!strncmp(node->key, prefix, prefix_len)) {
1683                 ds_put_format(output, "%s=%s\n", node->key + prefix_len,
1684                               node->value);
1685             }
1686         }
1687         free(sorted);
1688     }
1689 }
1690
1691 static void
1692 pre_cmd_br_get_external_id(struct vsctl_context *ctx)
1693 {
1694     pre_cmd_br_set_external_id(ctx);
1695 }
1696
1697 static void
1698 cmd_br_get_external_id(struct vsctl_context *ctx)
1699 {
1700     struct vsctl_bridge *bridge;
1701
1702     vsctl_context_populate_cache(ctx);
1703
1704     bridge = find_bridge(ctx, ctx->argv[1], true);
1705     if (bridge->br_cfg) {
1706         ovsrec_bridge_verify_external_ids(bridge->br_cfg);
1707         get_external_id(&bridge->br_cfg->external_ids, "",
1708                         ctx->argc >= 3 ? ctx->argv[2] : NULL, &ctx->output);
1709     } else {
1710         struct vsctl_port *port = shash_find_data(&ctx->ports, ctx->argv[1]);
1711         ovsrec_port_verify_external_ids(port->port_cfg);
1712         get_external_id(&port->port_cfg->external_ids, "fake-bridge-",
1713                         ctx->argc >= 3 ? ctx->argv[2] : NULL, &ctx->output);
1714     }
1715 }
1716
1717 static void
1718 cmd_list_ports(struct vsctl_context *ctx)
1719 {
1720     struct vsctl_bridge *br;
1721     struct vsctl_port *port;
1722     struct svec ports;
1723
1724     vsctl_context_populate_cache(ctx);
1725     br = find_bridge(ctx, ctx->argv[1], true);
1726     ovsrec_bridge_verify_ports(br->br_cfg ? br->br_cfg : br->parent->br_cfg);
1727
1728     svec_init(&ports);
1729     LIST_FOR_EACH (port, ports_node, &br->ports) {
1730         if (strcmp(port->port_cfg->name, br->name)) {
1731             svec_add(&ports, port->port_cfg->name);
1732         }
1733     }
1734     output_sorted(&ports, &ctx->output);
1735     svec_destroy(&ports);
1736 }
1737
1738 static void
1739 add_port(struct vsctl_context *ctx,
1740          const char *br_name, const char *port_name,
1741          bool may_exist, bool fake_iface,
1742          char *iface_names[], int n_ifaces,
1743          char *settings[], int n_settings)
1744 {
1745     struct vsctl_port *vsctl_port;
1746     struct vsctl_bridge *bridge;
1747     struct ovsrec_interface **ifaces;
1748     struct ovsrec_port *port;
1749     size_t i;
1750
1751     vsctl_context_populate_cache(ctx);
1752     if (may_exist) {
1753         struct vsctl_port *vsctl_port;
1754
1755         vsctl_port = find_port(ctx, port_name, false);
1756         if (vsctl_port) {
1757             struct svec want_names, have_names;
1758
1759             svec_init(&want_names);
1760             for (i = 0; i < n_ifaces; i++) {
1761                 svec_add(&want_names, iface_names[i]);
1762             }
1763             svec_sort(&want_names);
1764
1765             svec_init(&have_names);
1766             for (i = 0; i < vsctl_port->port_cfg->n_interfaces; i++) {
1767                 svec_add(&have_names,
1768                          vsctl_port->port_cfg->interfaces[i]->name);
1769             }
1770             svec_sort(&have_names);
1771
1772             if (strcmp(vsctl_port->bridge->name, br_name)) {
1773                 char *command = vsctl_context_to_string(ctx);
1774                 vsctl_fatal("\"%s\" but %s is actually attached to bridge %s",
1775                             command, port_name, vsctl_port->bridge->name);
1776             }
1777
1778             if (!svec_equal(&want_names, &have_names)) {
1779                 char *have_names_string = svec_join(&have_names, ", ", "");
1780                 char *command = vsctl_context_to_string(ctx);
1781
1782                 vsctl_fatal("\"%s\" but %s actually has interface(s) %s",
1783                             command, port_name, have_names_string);
1784             }
1785
1786             svec_destroy(&want_names);
1787             svec_destroy(&have_names);
1788
1789             return;
1790         }
1791     }
1792     check_conflicts(ctx, port_name,
1793                     xasprintf("cannot create a port named %s", port_name));
1794     for (i = 0; i < n_ifaces; i++) {
1795         check_conflicts(ctx, iface_names[i],
1796                         xasprintf("cannot create an interface named %s",
1797                                   iface_names[i]));
1798     }
1799     bridge = find_bridge(ctx, br_name, true);
1800
1801     ifaces = xmalloc(n_ifaces * sizeof *ifaces);
1802     for (i = 0; i < n_ifaces; i++) {
1803         ifaces[i] = ovsrec_interface_insert(ctx->txn);
1804         ovsrec_interface_set_name(ifaces[i], iface_names[i]);
1805     }
1806
1807     port = ovsrec_port_insert(ctx->txn);
1808     ovsrec_port_set_name(port, port_name);
1809     ovsrec_port_set_interfaces(port, ifaces, n_ifaces);
1810     ovsrec_port_set_bond_fake_iface(port, fake_iface);
1811
1812     if (bridge->parent) {
1813         int64_t tag = bridge->vlan;
1814         ovsrec_port_set_tag(port, &tag, 1);
1815     }
1816
1817     for (i = 0; i < n_settings; i++) {
1818         set_column(get_table("Port"), &port->header_, settings[i],
1819                    ctx->symtab);
1820     }
1821
1822     bridge_insert_port((bridge->parent ? bridge->parent->br_cfg
1823                         : bridge->br_cfg), port);
1824
1825     vsctl_port = add_port_to_cache(ctx, bridge, port);
1826     for (i = 0; i < n_ifaces; i++) {
1827         add_iface_to_cache(ctx, vsctl_port, ifaces[i]);
1828     }
1829     free(ifaces);
1830 }
1831
1832 static void
1833 cmd_add_port(struct vsctl_context *ctx)
1834 {
1835     bool may_exist = shash_find(&ctx->options, "--may-exist") != NULL;
1836
1837     add_port(ctx, ctx->argv[1], ctx->argv[2], may_exist, false,
1838              &ctx->argv[2], 1, &ctx->argv[3], ctx->argc - 3);
1839 }
1840
1841 static void
1842 cmd_add_bond(struct vsctl_context *ctx)
1843 {
1844     bool may_exist = shash_find(&ctx->options, "--may-exist") != NULL;
1845     bool fake_iface = shash_find(&ctx->options, "--fake-iface");
1846     int n_ifaces;
1847     int i;
1848
1849     n_ifaces = ctx->argc - 3;
1850     for (i = 3; i < ctx->argc; i++) {
1851         if (strchr(ctx->argv[i], '=')) {
1852             n_ifaces = i - 3;
1853             break;
1854         }
1855     }
1856     if (n_ifaces < 2) {
1857         vsctl_fatal("add-bond requires at least 2 interfaces, but only "
1858                     "%d were specified", n_ifaces);
1859     }
1860
1861     add_port(ctx, ctx->argv[1], ctx->argv[2], may_exist, fake_iface,
1862              &ctx->argv[3], n_ifaces,
1863              &ctx->argv[n_ifaces + 3], ctx->argc - 3 - n_ifaces);
1864 }
1865
1866 static void
1867 cmd_del_port(struct vsctl_context *ctx)
1868 {
1869     bool must_exist = !shash_find(&ctx->options, "--if-exists");
1870     bool with_iface = shash_find(&ctx->options, "--with-iface") != NULL;
1871     struct vsctl_port *port;
1872
1873     vsctl_context_populate_cache(ctx);
1874     if (!with_iface) {
1875         port = find_port(ctx, ctx->argv[ctx->argc - 1], must_exist);
1876     } else {
1877         const char *target = ctx->argv[ctx->argc - 1];
1878         struct vsctl_iface *iface;
1879
1880         port = find_port(ctx, target, false);
1881         if (!port) {
1882             iface = find_iface(ctx, target, false);
1883             if (iface) {
1884                 port = iface->port;
1885             }
1886         }
1887         if (must_exist && !port) {
1888             vsctl_fatal("no port or interface named %s", target);
1889         }
1890     }
1891
1892     if (port) {
1893         if (ctx->argc == 3) {
1894             struct vsctl_bridge *bridge;
1895
1896             bridge = find_bridge(ctx, ctx->argv[1], true);
1897             if (port->bridge != bridge) {
1898                 if (port->bridge->parent == bridge) {
1899                     vsctl_fatal("bridge %s does not have a port %s (although "
1900                                 "its parent bridge %s does)",
1901                                 ctx->argv[1], ctx->argv[2],
1902                                 bridge->parent->name);
1903                 } else {
1904                     vsctl_fatal("bridge %s does not have a port %s",
1905                                 ctx->argv[1], ctx->argv[2]);
1906                 }
1907             }
1908         }
1909
1910         del_port(ctx, port);
1911     }
1912 }
1913
1914 static void
1915 cmd_port_to_br(struct vsctl_context *ctx)
1916 {
1917     struct vsctl_port *port;
1918
1919     vsctl_context_populate_cache(ctx);
1920
1921     port = find_port(ctx, ctx->argv[1], true);
1922     ds_put_format(&ctx->output, "%s\n", port->bridge->name);
1923 }
1924
1925 static void
1926 cmd_br_to_vlan(struct vsctl_context *ctx)
1927 {
1928     struct vsctl_bridge *bridge;
1929
1930     vsctl_context_populate_cache(ctx);
1931
1932     bridge = find_bridge(ctx, ctx->argv[1], true);
1933     ds_put_format(&ctx->output, "%d\n", bridge->vlan);
1934 }
1935
1936 static void
1937 cmd_br_to_parent(struct vsctl_context *ctx)
1938 {
1939     struct vsctl_bridge *bridge;
1940
1941     vsctl_context_populate_cache(ctx);
1942
1943     bridge = find_bridge(ctx, ctx->argv[1], true);
1944     if (bridge->parent) {
1945         bridge = bridge->parent;
1946     }
1947     ds_put_format(&ctx->output, "%s\n", bridge->name);
1948 }
1949
1950 static void
1951 cmd_list_ifaces(struct vsctl_context *ctx)
1952 {
1953     struct vsctl_bridge *br;
1954     struct vsctl_port *port;
1955     struct svec ifaces;
1956
1957     vsctl_context_populate_cache(ctx);
1958
1959     br = find_bridge(ctx, ctx->argv[1], true);
1960     verify_ports(ctx);
1961
1962     svec_init(&ifaces);
1963     LIST_FOR_EACH (port, ports_node, &br->ports) {
1964         struct vsctl_iface *iface;
1965
1966         LIST_FOR_EACH (iface, ifaces_node, &port->ifaces) {
1967             if (strcmp(iface->iface_cfg->name, br->name)) {
1968                 svec_add(&ifaces, iface->iface_cfg->name);
1969             }
1970         }
1971     }
1972     output_sorted(&ifaces, &ctx->output);
1973     svec_destroy(&ifaces);
1974 }
1975
1976 static void
1977 cmd_iface_to_br(struct vsctl_context *ctx)
1978 {
1979     struct vsctl_iface *iface;
1980
1981     vsctl_context_populate_cache(ctx);
1982
1983     iface = find_iface(ctx, ctx->argv[1], true);
1984     ds_put_format(&ctx->output, "%s\n", iface->port->bridge->name);
1985 }
1986
1987 static void
1988 verify_controllers(struct ovsrec_bridge *bridge)
1989 {
1990     size_t i;
1991
1992     ovsrec_bridge_verify_controller(bridge);
1993     for (i = 0; i < bridge->n_controller; i++) {
1994         ovsrec_controller_verify_target(bridge->controller[i]);
1995     }
1996 }
1997
1998 static void
1999 pre_controller(struct vsctl_context *ctx)
2000 {
2001     pre_get_info(ctx);
2002
2003     ovsdb_idl_add_column(ctx->idl, &ovsrec_controller_col_target);
2004 }
2005
2006 static void
2007 cmd_get_controller(struct vsctl_context *ctx)
2008 {
2009     struct vsctl_bridge *br;
2010     struct svec targets;
2011     size_t i;
2012
2013     vsctl_context_populate_cache(ctx);
2014
2015     br = find_bridge(ctx, ctx->argv[1], true);
2016     if (br->parent) {
2017         br = br->parent;
2018     }
2019     verify_controllers(br->br_cfg);
2020
2021     /* Print the targets in sorted order for reproducibility. */
2022     svec_init(&targets);
2023     for (i = 0; i < br->br_cfg->n_controller; i++) {
2024         svec_add(&targets, br->br_cfg->controller[i]->target);
2025     }
2026
2027     svec_sort(&targets);
2028     for (i = 0; i < targets.n; i++) {
2029         ds_put_format(&ctx->output, "%s\n", targets.names[i]);
2030     }
2031     svec_destroy(&targets);
2032 }
2033
2034 static void
2035 delete_controllers(struct ovsrec_controller **controllers,
2036                    size_t n_controllers)
2037 {
2038     size_t i;
2039
2040     for (i = 0; i < n_controllers; i++) {
2041         ovsrec_controller_delete(controllers[i]);
2042     }
2043 }
2044
2045 static void
2046 cmd_del_controller(struct vsctl_context *ctx)
2047 {
2048     struct ovsrec_bridge *br;
2049
2050     vsctl_context_populate_cache(ctx);
2051
2052     br = find_real_bridge(ctx, ctx->argv[1], true)->br_cfg;
2053     verify_controllers(br);
2054
2055     if (br->controller) {
2056         delete_controllers(br->controller, br->n_controller);
2057         ovsrec_bridge_set_controller(br, NULL, 0);
2058     }
2059 }
2060
2061 static struct ovsrec_controller **
2062 insert_controllers(struct ovsdb_idl_txn *txn, char *targets[], size_t n)
2063 {
2064     struct ovsrec_controller **controllers;
2065     size_t i;
2066
2067     controllers = xmalloc(n * sizeof *controllers);
2068     for (i = 0; i < n; i++) {
2069         if (vconn_verify_name(targets[i]) && pvconn_verify_name(targets[i])) {
2070             VLOG_WARN("target type \"%s\" is possibly erroneous", targets[i]);
2071         }
2072         controllers[i] = ovsrec_controller_insert(txn);
2073         ovsrec_controller_set_target(controllers[i], targets[i]);
2074     }
2075
2076     return controllers;
2077 }
2078
2079 static void
2080 cmd_set_controller(struct vsctl_context *ctx)
2081 {
2082     struct ovsrec_controller **controllers;
2083     struct ovsrec_bridge *br;
2084     size_t n;
2085
2086     vsctl_context_populate_cache(ctx);
2087
2088     br = find_real_bridge(ctx, ctx->argv[1], true)->br_cfg;
2089     verify_controllers(br);
2090
2091     delete_controllers(br->controller, br->n_controller);
2092
2093     n = ctx->argc - 2;
2094     controllers = insert_controllers(ctx->txn, &ctx->argv[2], n);
2095     ovsrec_bridge_set_controller(br, controllers, n);
2096     free(controllers);
2097 }
2098
2099 static void
2100 cmd_get_fail_mode(struct vsctl_context *ctx)
2101 {
2102     struct vsctl_bridge *br;
2103     const char *fail_mode;
2104
2105     vsctl_context_populate_cache(ctx);
2106     br = find_bridge(ctx, ctx->argv[1], true);
2107
2108     if (br->parent) {
2109         br = br->parent;
2110     }
2111     ovsrec_bridge_verify_fail_mode(br->br_cfg);
2112
2113     fail_mode = br->br_cfg->fail_mode;
2114     if (fail_mode && strlen(fail_mode)) {
2115         ds_put_format(&ctx->output, "%s\n", fail_mode);
2116     }
2117 }
2118
2119 static void
2120 cmd_del_fail_mode(struct vsctl_context *ctx)
2121 {
2122     struct vsctl_bridge *br;
2123
2124     vsctl_context_populate_cache(ctx);
2125
2126     br = find_real_bridge(ctx, ctx->argv[1], true);
2127
2128     ovsrec_bridge_set_fail_mode(br->br_cfg, NULL);
2129 }
2130
2131 static void
2132 cmd_set_fail_mode(struct vsctl_context *ctx)
2133 {
2134     struct vsctl_bridge *br;
2135     const char *fail_mode = ctx->argv[2];
2136
2137     vsctl_context_populate_cache(ctx);
2138
2139     br = find_real_bridge(ctx, ctx->argv[1], true);
2140
2141     if (strcmp(fail_mode, "standalone") && strcmp(fail_mode, "secure")) {
2142         vsctl_fatal("fail-mode must be \"standalone\" or \"secure\"");
2143     }
2144
2145     ovsrec_bridge_set_fail_mode(br->br_cfg, fail_mode);
2146 }
2147
2148 static void
2149 verify_managers(const struct ovsrec_open_vswitch *ovs)
2150 {
2151     size_t i;
2152
2153     ovsrec_open_vswitch_verify_manager_options(ovs);
2154
2155     for (i = 0; i < ovs->n_manager_options; ++i) {
2156         const struct ovsrec_manager *mgr = ovs->manager_options[i];
2157
2158         ovsrec_manager_verify_target(mgr);
2159     }
2160 }
2161
2162 static void
2163 pre_manager(struct vsctl_context *ctx)
2164 {
2165     ovsdb_idl_add_column(ctx->idl, &ovsrec_open_vswitch_col_manager_options);
2166     ovsdb_idl_add_column(ctx->idl, &ovsrec_manager_col_target);
2167 }
2168
2169 static void
2170 cmd_get_manager(struct vsctl_context *ctx)
2171 {
2172     const struct ovsrec_open_vswitch *ovs = ctx->ovs;
2173     struct svec targets;
2174     size_t i;
2175
2176     verify_managers(ovs);
2177
2178     /* Print the targets in sorted order for reproducibility. */
2179     svec_init(&targets);
2180
2181     for (i = 0; i < ovs->n_manager_options; i++) {
2182         svec_add(&targets, ovs->manager_options[i]->target);
2183     }
2184
2185     svec_sort_unique(&targets);
2186     for (i = 0; i < targets.n; i++) {
2187         ds_put_format(&ctx->output, "%s\n", targets.names[i]);
2188     }
2189     svec_destroy(&targets);
2190 }
2191
2192 static void
2193 delete_managers(const struct vsctl_context *ctx)
2194 {
2195     const struct ovsrec_open_vswitch *ovs = ctx->ovs;
2196     size_t i;
2197
2198     /* Delete Manager rows pointed to by 'manager_options' column. */
2199     for (i = 0; i < ovs->n_manager_options; i++) {
2200         ovsrec_manager_delete(ovs->manager_options[i]);
2201     }
2202
2203     /* Delete 'Manager' row refs in 'manager_options' column. */
2204     ovsrec_open_vswitch_set_manager_options(ovs, NULL, 0);
2205 }
2206
2207 static void
2208 cmd_del_manager(struct vsctl_context *ctx)
2209 {
2210     const struct ovsrec_open_vswitch *ovs = ctx->ovs;
2211
2212     verify_managers(ovs);
2213     delete_managers(ctx);
2214 }
2215
2216 static void
2217 insert_managers(struct vsctl_context *ctx, char *targets[], size_t n)
2218 {
2219     struct ovsrec_manager **managers;
2220     size_t i;
2221
2222     /* Insert each manager in a new row in Manager table. */
2223     managers = xmalloc(n * sizeof *managers);
2224     for (i = 0; i < n; i++) {
2225         if (stream_verify_name(targets[i]) && pstream_verify_name(targets[i])) {
2226             VLOG_WARN("target type \"%s\" is possibly erroneous", targets[i]);
2227         }
2228         managers[i] = ovsrec_manager_insert(ctx->txn);
2229         ovsrec_manager_set_target(managers[i], targets[i]);
2230     }
2231
2232     /* Store uuids of new Manager rows in 'manager_options' column. */
2233     ovsrec_open_vswitch_set_manager_options(ctx->ovs, managers, n);
2234     free(managers);
2235 }
2236
2237 static void
2238 cmd_set_manager(struct vsctl_context *ctx)
2239 {
2240     const size_t n = ctx->argc - 1;
2241
2242     verify_managers(ctx->ovs);
2243     delete_managers(ctx);
2244     insert_managers(ctx, &ctx->argv[1], n);
2245 }
2246
2247 static void
2248 pre_cmd_get_ssl(struct vsctl_context *ctx)
2249 {
2250     ovsdb_idl_add_column(ctx->idl, &ovsrec_open_vswitch_col_ssl);
2251
2252     ovsdb_idl_add_column(ctx->idl, &ovsrec_ssl_col_private_key);
2253     ovsdb_idl_add_column(ctx->idl, &ovsrec_ssl_col_certificate);
2254     ovsdb_idl_add_column(ctx->idl, &ovsrec_ssl_col_ca_cert);
2255     ovsdb_idl_add_column(ctx->idl, &ovsrec_ssl_col_bootstrap_ca_cert);
2256 }
2257
2258 static void
2259 cmd_get_ssl(struct vsctl_context *ctx)
2260 {
2261     struct ovsrec_ssl *ssl = ctx->ovs->ssl;
2262
2263     ovsrec_open_vswitch_verify_ssl(ctx->ovs);
2264     if (ssl) {
2265         ovsrec_ssl_verify_private_key(ssl);
2266         ovsrec_ssl_verify_certificate(ssl);
2267         ovsrec_ssl_verify_ca_cert(ssl);
2268         ovsrec_ssl_verify_bootstrap_ca_cert(ssl);
2269
2270         ds_put_format(&ctx->output, "Private key: %s\n", ssl->private_key);
2271         ds_put_format(&ctx->output, "Certificate: %s\n", ssl->certificate);
2272         ds_put_format(&ctx->output, "CA Certificate: %s\n", ssl->ca_cert);
2273         ds_put_format(&ctx->output, "Bootstrap: %s\n",
2274                 ssl->bootstrap_ca_cert ? "true" : "false");
2275     }
2276 }
2277
2278 static void
2279 pre_cmd_del_ssl(struct vsctl_context *ctx)
2280 {
2281     ovsdb_idl_add_column(ctx->idl, &ovsrec_open_vswitch_col_ssl);
2282 }
2283
2284 static void
2285 cmd_del_ssl(struct vsctl_context *ctx)
2286 {
2287     struct ovsrec_ssl *ssl = ctx->ovs->ssl;
2288
2289     if (ssl) {
2290         ovsrec_open_vswitch_verify_ssl(ctx->ovs);
2291         ovsrec_ssl_delete(ssl);
2292         ovsrec_open_vswitch_set_ssl(ctx->ovs, NULL);
2293     }
2294 }
2295
2296 static void
2297 pre_cmd_set_ssl(struct vsctl_context *ctx)
2298 {
2299     ovsdb_idl_add_column(ctx->idl, &ovsrec_open_vswitch_col_ssl);
2300 }
2301
2302 static void
2303 cmd_set_ssl(struct vsctl_context *ctx)
2304 {
2305     bool bootstrap = shash_find(&ctx->options, "--bootstrap");
2306     struct ovsrec_ssl *ssl = ctx->ovs->ssl;
2307
2308     ovsrec_open_vswitch_verify_ssl(ctx->ovs);
2309     if (ssl) {
2310         ovsrec_ssl_delete(ssl);
2311     }
2312     ssl = ovsrec_ssl_insert(ctx->txn);
2313
2314     ovsrec_ssl_set_private_key(ssl, ctx->argv[1]);
2315     ovsrec_ssl_set_certificate(ssl, ctx->argv[2]);
2316     ovsrec_ssl_set_ca_cert(ssl, ctx->argv[3]);
2317
2318     ovsrec_ssl_set_bootstrap_ca_cert(ssl, bootstrap);
2319
2320     ovsrec_open_vswitch_set_ssl(ctx->ovs, ssl);
2321 }
2322 \f
2323 /* Parameter commands. */
2324
2325 struct vsctl_row_id {
2326     const struct ovsdb_idl_table_class *table;
2327     const struct ovsdb_idl_column *name_column;
2328     const struct ovsdb_idl_column *uuid_column;
2329 };
2330
2331 struct vsctl_table_class {
2332     struct ovsdb_idl_table_class *class;
2333     struct vsctl_row_id row_ids[2];
2334 };
2335
2336 static const struct vsctl_table_class tables[] = {
2337     {&ovsrec_table_bridge,
2338      {{&ovsrec_table_bridge, &ovsrec_bridge_col_name, NULL},
2339       {NULL, NULL, NULL}}},
2340
2341     {&ovsrec_table_controller,
2342      {{&ovsrec_table_bridge,
2343        &ovsrec_bridge_col_name,
2344        &ovsrec_bridge_col_controller}}},
2345
2346     {&ovsrec_table_interface,
2347      {{&ovsrec_table_interface, &ovsrec_interface_col_name, NULL},
2348       {NULL, NULL, NULL}}},
2349
2350     {&ovsrec_table_mirror,
2351      {{&ovsrec_table_mirror, &ovsrec_mirror_col_name, NULL},
2352       {NULL, NULL, NULL}}},
2353
2354     {&ovsrec_table_manager,
2355      {{&ovsrec_table_manager, &ovsrec_manager_col_target, NULL},
2356       {NULL, NULL, NULL}}},
2357
2358     {&ovsrec_table_netflow,
2359      {{&ovsrec_table_bridge,
2360        &ovsrec_bridge_col_name,
2361        &ovsrec_bridge_col_netflow},
2362       {NULL, NULL, NULL}}},
2363
2364     {&ovsrec_table_open_vswitch,
2365      {{&ovsrec_table_open_vswitch, NULL, NULL},
2366       {NULL, NULL, NULL}}},
2367
2368     {&ovsrec_table_port,
2369      {{&ovsrec_table_port, &ovsrec_port_col_name, NULL},
2370       {NULL, NULL, NULL}}},
2371
2372     {&ovsrec_table_qos,
2373      {{&ovsrec_table_port, &ovsrec_port_col_name, &ovsrec_port_col_qos},
2374       {NULL, NULL, NULL}}},
2375
2376     {&ovsrec_table_queue,
2377      {{NULL, NULL, NULL},
2378       {NULL, NULL, NULL}}},
2379
2380     {&ovsrec_table_ssl,
2381      {{&ovsrec_table_open_vswitch, NULL, &ovsrec_open_vswitch_col_ssl}}},
2382
2383     {&ovsrec_table_sflow,
2384      {{&ovsrec_table_bridge,
2385        &ovsrec_bridge_col_name,
2386        &ovsrec_bridge_col_sflow},
2387       {NULL, NULL, NULL}}},
2388
2389     {&ovsrec_table_flow_table,
2390      {{&ovsrec_table_flow_table, &ovsrec_flow_table_col_name, NULL},
2391       {NULL, NULL, NULL}}},
2392
2393     {NULL, {{NULL, NULL, NULL}, {NULL, NULL, NULL}}}
2394 };
2395
2396 static void
2397 die_if_error(char *error)
2398 {
2399     if (error) {
2400         vsctl_fatal("%s", error);
2401     }
2402 }
2403
2404 static int
2405 to_lower_and_underscores(unsigned c)
2406 {
2407     return c == '-' ? '_' : tolower(c);
2408 }
2409
2410 static unsigned int
2411 score_partial_match(const char *name, const char *s)
2412 {
2413     int score;
2414
2415     if (!strcmp(name, s)) {
2416         return UINT_MAX;
2417     }
2418     for (score = 0; ; score++, name++, s++) {
2419         if (to_lower_and_underscores(*name) != to_lower_and_underscores(*s)) {
2420             break;
2421         } else if (*name == '\0') {
2422             return UINT_MAX - 1;
2423         }
2424     }
2425     return *s == '\0' ? score : 0;
2426 }
2427
2428 static const struct vsctl_table_class *
2429 get_table(const char *table_name)
2430 {
2431     const struct vsctl_table_class *table;
2432     const struct vsctl_table_class *best_match = NULL;
2433     unsigned int best_score = 0;
2434
2435     for (table = tables; table->class; table++) {
2436         unsigned int score = score_partial_match(table->class->name,
2437                                                  table_name);
2438         if (score > best_score) {
2439             best_match = table;
2440             best_score = score;
2441         } else if (score == best_score) {
2442             best_match = NULL;
2443         }
2444     }
2445     if (best_match) {
2446         return best_match;
2447     } else if (best_score) {
2448         vsctl_fatal("multiple table names match \"%s\"", table_name);
2449     } else {
2450         vsctl_fatal("unknown table \"%s\"", table_name);
2451     }
2452 }
2453
2454 static const struct vsctl_table_class *
2455 pre_get_table(struct vsctl_context *ctx, const char *table_name)
2456 {
2457     const struct vsctl_table_class *table_class;
2458     int i;
2459
2460     table_class = get_table(table_name);
2461     ovsdb_idl_add_table(ctx->idl, table_class->class);
2462
2463     for (i = 0; i < ARRAY_SIZE(table_class->row_ids); i++) {
2464         const struct vsctl_row_id *id = &table_class->row_ids[i];
2465         if (id->table) {
2466             ovsdb_idl_add_table(ctx->idl, id->table);
2467         }
2468         if (id->name_column) {
2469             ovsdb_idl_add_column(ctx->idl, id->name_column);
2470         }
2471         if (id->uuid_column) {
2472             ovsdb_idl_add_column(ctx->idl, id->uuid_column);
2473         }
2474     }
2475
2476     return table_class;
2477 }
2478
2479 static const struct ovsdb_idl_row *
2480 get_row_by_id(struct vsctl_context *ctx, const struct vsctl_table_class *table,
2481               const struct vsctl_row_id *id, const char *record_id)
2482 {
2483     const struct ovsdb_idl_row *referrer, *final;
2484
2485     if (!id->table) {
2486         return NULL;
2487     }
2488
2489     if (!id->name_column) {
2490         if (strcmp(record_id, ".")) {
2491             return NULL;
2492         }
2493         referrer = ovsdb_idl_first_row(ctx->idl, id->table);
2494         if (!referrer || ovsdb_idl_next_row(referrer)) {
2495             return NULL;
2496         }
2497     } else {
2498         const struct ovsdb_idl_row *row;
2499
2500         referrer = NULL;
2501         for (row = ovsdb_idl_first_row(ctx->idl, id->table);
2502              row != NULL;
2503              row = ovsdb_idl_next_row(row))
2504         {
2505             const struct ovsdb_datum *name;
2506
2507             name = ovsdb_idl_get(row, id->name_column,
2508                                  OVSDB_TYPE_STRING, OVSDB_TYPE_VOID);
2509             if (name->n == 1 && !strcmp(name->keys[0].string, record_id)) {
2510                 if (referrer) {
2511                     vsctl_fatal("multiple rows in %s match \"%s\"",
2512                                 table->class->name, record_id);
2513                 }
2514                 referrer = row;
2515             }
2516         }
2517     }
2518     if (!referrer) {
2519         return NULL;
2520     }
2521
2522     final = NULL;
2523     if (id->uuid_column) {
2524         const struct ovsdb_datum *uuid;
2525
2526         ovsdb_idl_txn_verify(referrer, id->uuid_column);
2527         uuid = ovsdb_idl_get(referrer, id->uuid_column,
2528                              OVSDB_TYPE_UUID, OVSDB_TYPE_VOID);
2529         if (uuid->n == 1) {
2530             final = ovsdb_idl_get_row_for_uuid(ctx->idl, table->class,
2531                                                &uuid->keys[0].uuid);
2532         }
2533     } else {
2534         final = referrer;
2535     }
2536
2537     return final;
2538 }
2539
2540 static const struct ovsdb_idl_row *
2541 get_row (struct vsctl_context *ctx,
2542          const struct vsctl_table_class *table, const char *record_id)
2543 {
2544     const struct ovsdb_idl_row *row;
2545     struct uuid uuid;
2546
2547     if (uuid_from_string(&uuid, record_id)) {
2548         row = ovsdb_idl_get_row_for_uuid(ctx->idl, table->class, &uuid);
2549     } else {
2550         int i;
2551
2552         for (i = 0; i < ARRAY_SIZE(table->row_ids); i++) {
2553             row = get_row_by_id(ctx, table, &table->row_ids[i], record_id);
2554             if (row) {
2555                 break;
2556             }
2557         }
2558     }
2559     return row;
2560 }
2561
2562 static const struct ovsdb_idl_row *
2563 must_get_row(struct vsctl_context *ctx,
2564              const struct vsctl_table_class *table, const char *record_id)
2565 {
2566     const struct ovsdb_idl_row *row = get_row(ctx, table, record_id);
2567     if (!row) {
2568         vsctl_fatal("no row \"%s\" in table %s",
2569                     record_id, table->class->name);
2570     }
2571     return row;
2572 }
2573
2574 static char *
2575 get_column(const struct vsctl_table_class *table, const char *column_name,
2576            const struct ovsdb_idl_column **columnp)
2577 {
2578     const struct ovsdb_idl_column *best_match = NULL;
2579     unsigned int best_score = 0;
2580     size_t i;
2581
2582     for (i = 0; i < table->class->n_columns; i++) {
2583         const struct ovsdb_idl_column *column = &table->class->columns[i];
2584         unsigned int score = score_partial_match(column->name, column_name);
2585         if (score > best_score) {
2586             best_match = column;
2587             best_score = score;
2588         } else if (score == best_score) {
2589             best_match = NULL;
2590         }
2591     }
2592
2593     *columnp = best_match;
2594     if (best_match) {
2595         return NULL;
2596     } else if (best_score) {
2597         return xasprintf("%s contains more than one column whose name "
2598                          "matches \"%s\"", table->class->name, column_name);
2599     } else {
2600         return xasprintf("%s does not contain a column whose name matches "
2601                          "\"%s\"", table->class->name, column_name);
2602     }
2603 }
2604
2605 static struct ovsdb_symbol *
2606 create_symbol(struct ovsdb_symbol_table *symtab, const char *id, bool *newp)
2607 {
2608     struct ovsdb_symbol *symbol;
2609
2610     if (id[0] != '@') {
2611         vsctl_fatal("row id \"%s\" does not begin with \"@\"", id);
2612     }
2613
2614     if (newp) {
2615         *newp = ovsdb_symbol_table_get(symtab, id) == NULL;
2616     }
2617
2618     symbol = ovsdb_symbol_table_insert(symtab, id);
2619     if (symbol->created) {
2620         vsctl_fatal("row id \"%s\" may only be specified on one --id option",
2621                     id);
2622     }
2623     symbol->created = true;
2624     return symbol;
2625 }
2626
2627 static void
2628 pre_get_column(struct vsctl_context *ctx,
2629                const struct vsctl_table_class *table, const char *column_name,
2630                const struct ovsdb_idl_column **columnp)
2631 {
2632     die_if_error(get_column(table, column_name, columnp));
2633     ovsdb_idl_add_column(ctx->idl, *columnp);
2634 }
2635
2636 static char *
2637 missing_operator_error(const char *arg, const char **allowed_operators,
2638                        size_t n_allowed)
2639 {
2640     struct ds s;
2641
2642     ds_init(&s);
2643     ds_put_format(&s, "%s: argument does not end in ", arg);
2644     ds_put_format(&s, "\"%s\"", allowed_operators[0]);
2645     if (n_allowed == 2) {
2646         ds_put_format(&s, " or \"%s\"", allowed_operators[1]);
2647     } else if (n_allowed > 2) {
2648         size_t i;
2649
2650         for (i = 1; i < n_allowed - 1; i++) {
2651             ds_put_format(&s, ", \"%s\"", allowed_operators[i]);
2652         }
2653         ds_put_format(&s, ", or \"%s\"", allowed_operators[i]);
2654     }
2655     ds_put_format(&s, " followed by a value.");
2656
2657     return ds_steal_cstr(&s);
2658 }
2659
2660 /* Breaks 'arg' apart into a number of fields in the following order:
2661  *
2662  *      - The name of a column in 'table', stored into '*columnp'.  The column
2663  *        name may be abbreviated.
2664  *
2665  *      - Optionally ':' followed by a key string.  The key is stored as a
2666  *        malloc()'d string into '*keyp', or NULL if no key is present in
2667  *        'arg'.
2668  *
2669  *      - If 'valuep' is nonnull, an operator followed by a value string.  The
2670  *        allowed operators are the 'n_allowed' string in 'allowed_operators',
2671  *        or just "=" if 'n_allowed' is 0.  If 'operatorp' is nonnull, then the
2672  *        index of the operator within 'allowed_operators' is stored into
2673  *        '*operatorp'.  The value is stored as a malloc()'d string into
2674  *        '*valuep', or NULL if no value is present in 'arg'.
2675  *
2676  * On success, returns NULL.  On failure, returned a malloc()'d string error
2677  * message and stores NULL into all of the nonnull output arguments. */
2678 static char * WARN_UNUSED_RESULT
2679 parse_column_key_value(const char *arg,
2680                        const struct vsctl_table_class *table,
2681                        const struct ovsdb_idl_column **columnp, char **keyp,
2682                        int *operatorp,
2683                        const char **allowed_operators, size_t n_allowed,
2684                        char **valuep)
2685 {
2686     const char *p = arg;
2687     char *column_name;
2688     char *error;
2689
2690     assert(!(operatorp && !valuep));
2691     *keyp = NULL;
2692     if (valuep) {
2693         *valuep = NULL;
2694     }
2695
2696     /* Parse column name. */
2697     error = ovsdb_token_parse(&p, &column_name);
2698     if (error) {
2699         goto error;
2700     }
2701     if (column_name[0] == '\0') {
2702         free(column_name);
2703         error = xasprintf("%s: missing column name", arg);
2704         goto error;
2705     }
2706     error = get_column(table, column_name, columnp);
2707     free(column_name);
2708     if (error) {
2709         goto error;
2710     }
2711
2712     /* Parse key string. */
2713     if (*p == ':') {
2714         p++;
2715         error = ovsdb_token_parse(&p, keyp);
2716         if (error) {
2717             goto error;
2718         }
2719     }
2720
2721     /* Parse value string. */
2722     if (valuep) {
2723         size_t best_len;
2724         size_t i;
2725         int best;
2726
2727         if (!allowed_operators) {
2728             static const char *equals = "=";
2729             allowed_operators = &equals;
2730             n_allowed = 1;
2731         }
2732
2733         best = -1;
2734         best_len = 0;
2735         for (i = 0; i < n_allowed; i++) {
2736             const char *op = allowed_operators[i];
2737             size_t op_len = strlen(op);
2738
2739             if (op_len > best_len && !strncmp(op, p, op_len) && p[op_len]) {
2740                 best_len = op_len;
2741                 best = i;
2742             }
2743         }
2744         if (best < 0) {
2745             error = missing_operator_error(arg, allowed_operators, n_allowed);
2746             goto error;
2747         }
2748
2749         if (operatorp) {
2750             *operatorp = best;
2751         }
2752         *valuep = xstrdup(p + best_len);
2753     } else {
2754         if (*p != '\0') {
2755             error = xasprintf("%s: trailing garbage \"%s\" in argument",
2756                               arg, p);
2757             goto error;
2758         }
2759     }
2760     return NULL;
2761
2762 error:
2763     *columnp = NULL;
2764     free(*keyp);
2765     *keyp = NULL;
2766     if (valuep) {
2767         free(*valuep);
2768         *valuep = NULL;
2769         if (operatorp) {
2770             *operatorp = -1;
2771         }
2772     }
2773     return error;
2774 }
2775
2776 static const struct ovsdb_idl_column *
2777 pre_parse_column_key_value(struct vsctl_context *ctx,
2778                            const char *arg,
2779                            const struct vsctl_table_class *table)
2780 {
2781     const struct ovsdb_idl_column *column;
2782     const char *p;
2783     char *column_name;
2784
2785     p = arg;
2786     die_if_error(ovsdb_token_parse(&p, &column_name));
2787     if (column_name[0] == '\0') {
2788         vsctl_fatal("%s: missing column name", arg);
2789     }
2790
2791     pre_get_column(ctx, table, column_name, &column);
2792     free(column_name);
2793
2794     return column;
2795 }
2796
2797 static void
2798 check_mutable(const struct vsctl_table_class *table,
2799               const struct ovsdb_idl_column *column)
2800 {
2801     if (!column->mutable) {
2802         vsctl_fatal("cannot modify read-only column %s in table %s",
2803                     column->name, table->class->name);
2804     }
2805 }
2806
2807 static void
2808 pre_cmd_get(struct vsctl_context *ctx)
2809 {
2810     const char *id = shash_find_data(&ctx->options, "--id");
2811     const char *table_name = ctx->argv[1];
2812     const struct vsctl_table_class *table;
2813     int i;
2814
2815     /* Using "get" without --id or a column name could possibly make sense.
2816      * Maybe, for example, a ovs-vsctl run wants to assert that a row exists.
2817      * But it is unlikely that an interactive user would want to do that, so
2818      * issue a warning if we're running on a terminal. */
2819     if (!id && ctx->argc <= 3 && isatty(STDOUT_FILENO)) {
2820         VLOG_WARN("\"get\" command without row arguments or \"--id\" is "
2821                   "possibly erroneous");
2822     }
2823
2824     table = pre_get_table(ctx, table_name);
2825     for (i = 3; i < ctx->argc; i++) {
2826         if (!strcasecmp(ctx->argv[i], "_uuid")
2827             || !strcasecmp(ctx->argv[i], "-uuid")) {
2828             continue;
2829         }
2830
2831         pre_parse_column_key_value(ctx, ctx->argv[i], table);
2832     }
2833 }
2834
2835 static void
2836 cmd_get(struct vsctl_context *ctx)
2837 {
2838     const char *id = shash_find_data(&ctx->options, "--id");
2839     bool if_exists = shash_find(&ctx->options, "--if-exists");
2840     const char *table_name = ctx->argv[1];
2841     const char *record_id = ctx->argv[2];
2842     const struct vsctl_table_class *table;
2843     const struct ovsdb_idl_row *row;
2844     struct ds *out = &ctx->output;
2845     int i;
2846
2847     table = get_table(table_name);
2848     row = must_get_row(ctx, table, record_id);
2849     if (id) {
2850         struct ovsdb_symbol *symbol;
2851         bool new;
2852
2853         symbol = create_symbol(ctx->symtab, id, &new);
2854         if (!new) {
2855             vsctl_fatal("row id \"%s\" specified on \"get\" command was used "
2856                         "before it was defined", id);
2857         }
2858         symbol->uuid = row->uuid;
2859
2860         /* This symbol refers to a row that already exists, so disable warnings
2861          * about it being unreferenced. */
2862         symbol->strong_ref = true;
2863     }
2864     for (i = 3; i < ctx->argc; i++) {
2865         const struct ovsdb_idl_column *column;
2866         const struct ovsdb_datum *datum;
2867         char *key_string;
2868
2869         /* Special case for obtaining the UUID of a row.  We can't just do this
2870          * through parse_column_key_value() below since it returns a "struct
2871          * ovsdb_idl_column" and the UUID column doesn't have one. */
2872         if (!strcasecmp(ctx->argv[i], "_uuid")
2873             || !strcasecmp(ctx->argv[i], "-uuid")) {
2874             ds_put_format(out, UUID_FMT"\n", UUID_ARGS(&row->uuid));
2875             continue;
2876         }
2877
2878         die_if_error(parse_column_key_value(ctx->argv[i], table,
2879                                             &column, &key_string,
2880                                             NULL, NULL, 0, NULL));
2881
2882         ovsdb_idl_txn_verify(row, column);
2883         datum = ovsdb_idl_read(row, column);
2884         if (key_string) {
2885             union ovsdb_atom key;
2886             unsigned int idx;
2887
2888             if (column->type.value.type == OVSDB_TYPE_VOID) {
2889                 vsctl_fatal("cannot specify key to get for non-map column %s",
2890                             column->name);
2891             }
2892
2893             die_if_error(ovsdb_atom_from_string(&key,
2894                                                 &column->type.key,
2895                                                 key_string, ctx->symtab));
2896
2897             idx = ovsdb_datum_find_key(datum, &key,
2898                                        column->type.key.type);
2899             if (idx == UINT_MAX) {
2900                 if (!if_exists) {
2901                     vsctl_fatal("no key \"%s\" in %s record \"%s\" column %s",
2902                                 key_string, table->class->name, record_id,
2903                                 column->name);
2904                 }
2905             } else {
2906                 ovsdb_atom_to_string(&datum->values[idx],
2907                                      column->type.value.type, out);
2908             }
2909             ovsdb_atom_destroy(&key, column->type.key.type);
2910         } else {
2911             ovsdb_datum_to_string(datum, &column->type, out);
2912         }
2913         ds_put_char(out, '\n');
2914
2915         free(key_string);
2916     }
2917 }
2918
2919 static void
2920 parse_column_names(const char *column_names,
2921                    const struct vsctl_table_class *table,
2922                    const struct ovsdb_idl_column ***columnsp,
2923                    size_t *n_columnsp)
2924 {
2925     const struct ovsdb_idl_column **columns;
2926     size_t n_columns;
2927
2928     if (!column_names) {
2929         size_t i;
2930
2931         n_columns = table->class->n_columns + 1;
2932         columns = xmalloc(n_columns * sizeof *columns);
2933         columns[0] = NULL;
2934         for (i = 0; i < table->class->n_columns; i++) {
2935             columns[i + 1] = &table->class->columns[i];
2936         }
2937     } else {
2938         char *s = xstrdup(column_names);
2939         size_t allocated_columns;
2940         char *save_ptr = NULL;
2941         char *column_name;
2942
2943         columns = NULL;
2944         allocated_columns = n_columns = 0;
2945         for (column_name = strtok_r(s, ", ", &save_ptr); column_name;
2946              column_name = strtok_r(NULL, ", ", &save_ptr)) {
2947             const struct ovsdb_idl_column *column;
2948
2949             if (!strcasecmp(column_name, "_uuid")) {
2950                 column = NULL;
2951             } else {
2952                 die_if_error(get_column(table, column_name, &column));
2953             }
2954             if (n_columns >= allocated_columns) {
2955                 columns = x2nrealloc(columns, &allocated_columns,
2956                                      sizeof *columns);
2957             }
2958             columns[n_columns++] = column;
2959         }
2960         free(s);
2961
2962         if (!n_columns) {
2963             vsctl_fatal("must specify at least one column name");
2964         }
2965     }
2966     *columnsp = columns;
2967     *n_columnsp = n_columns;
2968 }
2969
2970
2971 static void
2972 pre_list_columns(struct vsctl_context *ctx,
2973                  const struct vsctl_table_class *table,
2974                  const char *column_names)
2975 {
2976     const struct ovsdb_idl_column **columns;
2977     size_t n_columns;
2978     size_t i;
2979
2980     parse_column_names(column_names, table, &columns, &n_columns);
2981     for (i = 0; i < n_columns; i++) {
2982         if (columns[i]) {
2983             ovsdb_idl_add_column(ctx->idl, columns[i]);
2984         }
2985     }
2986     free(columns);
2987 }
2988
2989 static void
2990 pre_cmd_list(struct vsctl_context *ctx)
2991 {
2992     const char *column_names = shash_find_data(&ctx->options, "--columns");
2993     const char *table_name = ctx->argv[1];
2994     const struct vsctl_table_class *table;
2995
2996     table = pre_get_table(ctx, table_name);
2997     pre_list_columns(ctx, table, column_names);
2998 }
2999
3000 static struct table *
3001 list_make_table(const struct ovsdb_idl_column **columns, size_t n_columns)
3002 {
3003     struct table *out;
3004     size_t i;
3005
3006     out = xmalloc(sizeof *out);
3007     table_init(out);
3008
3009     for (i = 0; i < n_columns; i++) {
3010         const struct ovsdb_idl_column *column = columns[i];
3011         const char *column_name = column ? column->name : "_uuid";
3012
3013         table_add_column(out, "%s", column_name);
3014     }
3015
3016     return out;
3017 }
3018
3019 static void
3020 list_record(const struct ovsdb_idl_row *row,
3021             const struct ovsdb_idl_column **columns, size_t n_columns,
3022             struct table *out)
3023 {
3024     size_t i;
3025
3026     table_add_row(out);
3027     for (i = 0; i < n_columns; i++) {
3028         const struct ovsdb_idl_column *column = columns[i];
3029         struct cell *cell = table_add_cell(out);
3030
3031         if (!column) {
3032             struct ovsdb_datum datum;
3033             union ovsdb_atom atom;
3034
3035             atom.uuid = row->uuid;
3036
3037             datum.keys = &atom;
3038             datum.values = NULL;
3039             datum.n = 1;
3040
3041             cell->json = ovsdb_datum_to_json(&datum, &ovsdb_type_uuid);
3042             cell->type = &ovsdb_type_uuid;
3043         } else {
3044             const struct ovsdb_datum *datum = ovsdb_idl_read(row, column);
3045
3046             cell->json = ovsdb_datum_to_json(datum, &column->type);
3047             cell->type = &column->type;
3048         }
3049     }
3050 }
3051
3052 static void
3053 cmd_list(struct vsctl_context *ctx)
3054 {
3055     const char *column_names = shash_find_data(&ctx->options, "--columns");
3056     const struct ovsdb_idl_column **columns;
3057     const char *table_name = ctx->argv[1];
3058     const struct vsctl_table_class *table;
3059     struct table *out;
3060     size_t n_columns;
3061     int i;
3062
3063     table = get_table(table_name);
3064     parse_column_names(column_names, table, &columns, &n_columns);
3065     out = ctx->table = list_make_table(columns, n_columns);
3066     if (ctx->argc > 2) {
3067         for (i = 2; i < ctx->argc; i++) {
3068             list_record(must_get_row(ctx, table, ctx->argv[i]),
3069                         columns, n_columns, out);
3070         }
3071     } else {
3072         const struct ovsdb_idl_row *row;
3073
3074         for (row = ovsdb_idl_first_row(ctx->idl, table->class); row != NULL;
3075              row = ovsdb_idl_next_row(row)) {
3076             list_record(row, columns, n_columns, out);
3077         }
3078     }
3079     free(columns);
3080 }
3081
3082 static void
3083 pre_cmd_find(struct vsctl_context *ctx)
3084 {
3085     const char *column_names = shash_find_data(&ctx->options, "--columns");
3086     const char *table_name = ctx->argv[1];
3087     const struct vsctl_table_class *table;
3088     int i;
3089
3090     table = pre_get_table(ctx, table_name);
3091     pre_list_columns(ctx, table, column_names);
3092     for (i = 2; i < ctx->argc; i++) {
3093         pre_parse_column_key_value(ctx, ctx->argv[i], table);
3094     }
3095 }
3096
3097 static void
3098 cmd_find(struct vsctl_context *ctx)
3099 {
3100     const char *column_names = shash_find_data(&ctx->options, "--columns");
3101     const struct ovsdb_idl_column **columns;
3102     const char *table_name = ctx->argv[1];
3103     const struct vsctl_table_class *table;
3104     const struct ovsdb_idl_row *row;
3105     struct table *out;
3106     size_t n_columns;
3107
3108     table = get_table(table_name);
3109     parse_column_names(column_names, table, &columns, &n_columns);
3110     out = ctx->table = list_make_table(columns, n_columns);
3111     for (row = ovsdb_idl_first_row(ctx->idl, table->class); row;
3112          row = ovsdb_idl_next_row(row)) {
3113         int i;
3114
3115         for (i = 2; i < ctx->argc; i++) {
3116             if (!is_condition_satisfied(table, row, ctx->argv[i],
3117                                         ctx->symtab)) {
3118                 goto next_row;
3119             }
3120         }
3121         list_record(row, columns, n_columns, out);
3122
3123     next_row: ;
3124     }
3125     free(columns);
3126 }
3127
3128 static void
3129 pre_cmd_set(struct vsctl_context *ctx)
3130 {
3131     const char *table_name = ctx->argv[1];
3132     const struct vsctl_table_class *table;
3133     int i;
3134
3135     table = pre_get_table(ctx, table_name);
3136     for (i = 3; i < ctx->argc; i++) {
3137         const struct ovsdb_idl_column *column;
3138
3139         column = pre_parse_column_key_value(ctx, ctx->argv[i], table);
3140         check_mutable(table, column);
3141     }
3142 }
3143
3144 static void
3145 set_column(const struct vsctl_table_class *table,
3146            const struct ovsdb_idl_row *row, const char *arg,
3147            struct ovsdb_symbol_table *symtab)
3148 {
3149     const struct ovsdb_idl_column *column;
3150     char *key_string, *value_string;
3151     char *error;
3152
3153     error = parse_column_key_value(arg, table, &column, &key_string,
3154                                    NULL, NULL, 0, &value_string);
3155     die_if_error(error);
3156     if (!value_string) {
3157         vsctl_fatal("%s: missing value", arg);
3158     }
3159
3160     if (key_string) {
3161         union ovsdb_atom key, value;
3162         struct ovsdb_datum datum;
3163
3164         if (column->type.value.type == OVSDB_TYPE_VOID) {
3165             vsctl_fatal("cannot specify key to set for non-map column %s",
3166                         column->name);
3167         }
3168
3169         die_if_error(ovsdb_atom_from_string(&key, &column->type.key,
3170                                             key_string, symtab));
3171         die_if_error(ovsdb_atom_from_string(&value, &column->type.value,
3172                                             value_string, symtab));
3173
3174         ovsdb_datum_init_empty(&datum);
3175         ovsdb_datum_add_unsafe(&datum, &key, &value, &column->type);
3176
3177         ovsdb_atom_destroy(&key, column->type.key.type);
3178         ovsdb_atom_destroy(&value, column->type.value.type);
3179
3180         ovsdb_datum_union(&datum, ovsdb_idl_read(row, column),
3181                           &column->type, false);
3182         ovsdb_idl_txn_write(row, column, &datum);
3183     } else {
3184         struct ovsdb_datum datum;
3185
3186         die_if_error(ovsdb_datum_from_string(&datum, &column->type,
3187                                              value_string, symtab));
3188         ovsdb_idl_txn_write(row, column, &datum);
3189     }
3190
3191     free(key_string);
3192     free(value_string);
3193 }
3194
3195 static void
3196 cmd_set(struct vsctl_context *ctx)
3197 {
3198     const char *table_name = ctx->argv[1];
3199     const char *record_id = ctx->argv[2];
3200     const struct vsctl_table_class *table;
3201     const struct ovsdb_idl_row *row;
3202     int i;
3203
3204     table = get_table(table_name);
3205     row = must_get_row(ctx, table, record_id);
3206     for (i = 3; i < ctx->argc; i++) {
3207         set_column(table, row, ctx->argv[i], ctx->symtab);
3208     }
3209
3210     vsctl_context_invalidate_cache(ctx);
3211 }
3212
3213 static void
3214 pre_cmd_add(struct vsctl_context *ctx)
3215 {
3216     const char *table_name = ctx->argv[1];
3217     const char *column_name = ctx->argv[3];
3218     const struct vsctl_table_class *table;
3219     const struct ovsdb_idl_column *column;
3220
3221     table = pre_get_table(ctx, table_name);
3222     pre_get_column(ctx, table, column_name, &column);
3223     check_mutable(table, column);
3224 }
3225
3226 static void
3227 cmd_add(struct vsctl_context *ctx)
3228 {
3229     const char *table_name = ctx->argv[1];
3230     const char *record_id = ctx->argv[2];
3231     const char *column_name = ctx->argv[3];
3232     const struct vsctl_table_class *table;
3233     const struct ovsdb_idl_column *column;
3234     const struct ovsdb_idl_row *row;
3235     const struct ovsdb_type *type;
3236     struct ovsdb_datum old;
3237     int i;
3238
3239     table = get_table(table_name);
3240     row = must_get_row(ctx, table, record_id);
3241     die_if_error(get_column(table, column_name, &column));
3242
3243     type = &column->type;
3244     ovsdb_datum_clone(&old, ovsdb_idl_read(row, column), &column->type);
3245     for (i = 4; i < ctx->argc; i++) {
3246         struct ovsdb_type add_type;
3247         struct ovsdb_datum add;
3248
3249         add_type = *type;
3250         add_type.n_min = 1;
3251         add_type.n_max = UINT_MAX;
3252         die_if_error(ovsdb_datum_from_string(&add, &add_type, ctx->argv[i],
3253                                              ctx->symtab));
3254         ovsdb_datum_union(&old, &add, type, false);
3255         ovsdb_datum_destroy(&add, type);
3256     }
3257     if (old.n > type->n_max) {
3258         vsctl_fatal("\"add\" operation would put %u %s in column %s of "
3259                     "table %s but the maximum number is %u",
3260                     old.n,
3261                     type->value.type == OVSDB_TYPE_VOID ? "values" : "pairs",
3262                     column->name, table->class->name, type->n_max);
3263     }
3264     ovsdb_idl_txn_verify(row, column);
3265     ovsdb_idl_txn_write(row, column, &old);
3266
3267     vsctl_context_invalidate_cache(ctx);
3268 }
3269
3270 static void
3271 pre_cmd_remove(struct vsctl_context *ctx)
3272 {
3273     const char *table_name = ctx->argv[1];
3274     const char *column_name = ctx->argv[3];
3275     const struct vsctl_table_class *table;
3276     const struct ovsdb_idl_column *column;
3277
3278     table = pre_get_table(ctx, table_name);
3279     pre_get_column(ctx, table, column_name, &column);
3280     check_mutable(table, column);
3281 }
3282
3283 static void
3284 cmd_remove(struct vsctl_context *ctx)
3285 {
3286     const char *table_name = ctx->argv[1];
3287     const char *record_id = ctx->argv[2];
3288     const char *column_name = ctx->argv[3];
3289     const struct vsctl_table_class *table;
3290     const struct ovsdb_idl_column *column;
3291     const struct ovsdb_idl_row *row;
3292     const struct ovsdb_type *type;
3293     struct ovsdb_datum old;
3294     int i;
3295
3296     table = get_table(table_name);
3297     row = must_get_row(ctx, table, record_id);
3298     die_if_error(get_column(table, column_name, &column));
3299
3300     type = &column->type;
3301     ovsdb_datum_clone(&old, ovsdb_idl_read(row, column), &column->type);
3302     for (i = 4; i < ctx->argc; i++) {
3303         struct ovsdb_type rm_type;
3304         struct ovsdb_datum rm;
3305         char *error;
3306
3307         rm_type = *type;
3308         rm_type.n_min = 1;
3309         rm_type.n_max = UINT_MAX;
3310         error = ovsdb_datum_from_string(&rm, &rm_type,
3311                                         ctx->argv[i], ctx->symtab);
3312         if (error && ovsdb_type_is_map(&rm_type)) {
3313             free(error);
3314             rm_type.value.type = OVSDB_TYPE_VOID;
3315             die_if_error(ovsdb_datum_from_string(&rm, &rm_type,
3316                                                  ctx->argv[i], ctx->symtab));
3317         }
3318         ovsdb_datum_subtract(&old, type, &rm, &rm_type);
3319         ovsdb_datum_destroy(&rm, &rm_type);
3320     }
3321     if (old.n < type->n_min) {
3322         vsctl_fatal("\"remove\" operation would put %u %s in column %s of "
3323                     "table %s but the minimum number is %u",
3324                     old.n,
3325                     type->value.type == OVSDB_TYPE_VOID ? "values" : "pairs",
3326                     column->name, table->class->name, type->n_min);
3327     }
3328     ovsdb_idl_txn_verify(row, column);
3329     ovsdb_idl_txn_write(row, column, &old);
3330
3331     vsctl_context_invalidate_cache(ctx);
3332 }
3333
3334 static void
3335 pre_cmd_clear(struct vsctl_context *ctx)
3336 {
3337     const char *table_name = ctx->argv[1];
3338     const struct vsctl_table_class *table;
3339     int i;
3340
3341     table = pre_get_table(ctx, table_name);
3342     for (i = 3; i < ctx->argc; i++) {
3343         const struct ovsdb_idl_column *column;
3344
3345         pre_get_column(ctx, table, ctx->argv[i], &column);
3346         check_mutable(table, column);
3347     }
3348 }
3349
3350 static void
3351 cmd_clear(struct vsctl_context *ctx)
3352 {
3353     const char *table_name = ctx->argv[1];
3354     const char *record_id = ctx->argv[2];
3355     const struct vsctl_table_class *table;
3356     const struct ovsdb_idl_row *row;
3357     int i;
3358
3359     table = get_table(table_name);
3360     row = must_get_row(ctx, table, record_id);
3361     for (i = 3; i < ctx->argc; i++) {
3362         const struct ovsdb_idl_column *column;
3363         const struct ovsdb_type *type;
3364         struct ovsdb_datum datum;
3365
3366         die_if_error(get_column(table, ctx->argv[i], &column));
3367
3368         type = &column->type;
3369         if (type->n_min > 0) {
3370             vsctl_fatal("\"clear\" operation cannot be applied to column %s "
3371                         "of table %s, which is not allowed to be empty",
3372                         column->name, table->class->name);
3373         }
3374
3375         ovsdb_datum_init_empty(&datum);
3376         ovsdb_idl_txn_write(row, column, &datum);
3377     }
3378
3379     vsctl_context_invalidate_cache(ctx);
3380 }
3381
3382 static void
3383 pre_create(struct vsctl_context *ctx)
3384 {
3385     const char *id = shash_find_data(&ctx->options, "--id");
3386     const char *table_name = ctx->argv[1];
3387     const struct vsctl_table_class *table;
3388
3389     table = get_table(table_name);
3390     if (!id && !table->class->is_root) {
3391         VLOG_WARN("applying \"create\" command to table %s without --id "
3392                   "option will have no effect", table->class->name);
3393     }
3394 }
3395
3396 static void
3397 cmd_create(struct vsctl_context *ctx)
3398 {
3399     const char *id = shash_find_data(&ctx->options, "--id");
3400     const char *table_name = ctx->argv[1];
3401     const struct vsctl_table_class *table = get_table(table_name);
3402     const struct ovsdb_idl_row *row;
3403     const struct uuid *uuid;
3404     int i;
3405
3406     if (id) {
3407         struct ovsdb_symbol *symbol = create_symbol(ctx->symtab, id, NULL);
3408         if (table->class->is_root) {
3409             /* This table is in the root set, meaning that rows created in it
3410              * won't disappear even if they are unreferenced, so disable
3411              * warnings about that by pretending that there is a reference. */
3412             symbol->strong_ref = true;
3413         }
3414         uuid = &symbol->uuid;
3415     } else {
3416         uuid = NULL;
3417     }
3418
3419     row = ovsdb_idl_txn_insert(ctx->txn, table->class, uuid);
3420     for (i = 2; i < ctx->argc; i++) {
3421         set_column(table, row, ctx->argv[i], ctx->symtab);
3422     }
3423     ds_put_format(&ctx->output, UUID_FMT, UUID_ARGS(&row->uuid));
3424 }
3425
3426 /* This function may be used as the 'postprocess' function for commands that
3427  * insert new rows into the database.  It expects that the command's 'run'
3428  * function prints the UUID reported by ovsdb_idl_txn_insert() as the command's
3429  * sole output.  It replaces that output by the row's permanent UUID assigned
3430  * by the database server and appends a new-line.
3431  *
3432  * Currently we use this only for "create", because the higher-level commands
3433  * are supposed to be independent of the actual structure of the vswitch
3434  * configuration. */
3435 static void
3436 post_create(struct vsctl_context *ctx)
3437 {
3438     const struct uuid *real;
3439     struct uuid dummy;
3440
3441     if (!uuid_from_string(&dummy, ds_cstr(&ctx->output))) {
3442         NOT_REACHED();
3443     }
3444     real = ovsdb_idl_txn_get_insert_uuid(ctx->txn, &dummy);
3445     if (real) {
3446         ds_clear(&ctx->output);
3447         ds_put_format(&ctx->output, UUID_FMT, UUID_ARGS(real));
3448     }
3449     ds_put_char(&ctx->output, '\n');
3450 }
3451
3452 static void
3453 pre_cmd_destroy(struct vsctl_context *ctx)
3454 {
3455     const char *table_name = ctx->argv[1];
3456
3457     pre_get_table(ctx, table_name);
3458 }
3459
3460 static void
3461 cmd_destroy(struct vsctl_context *ctx)
3462 {
3463     bool must_exist = !shash_find(&ctx->options, "--if-exists");
3464     bool delete_all = shash_find(&ctx->options, "--all");
3465     const char *table_name = ctx->argv[1];
3466     const struct vsctl_table_class *table;
3467     int i;
3468
3469     table = get_table(table_name);
3470
3471     if (delete_all && ctx->argc > 2) {
3472         vsctl_fatal("--all and records argument should not be specified together");
3473     }
3474
3475     if (delete_all && !must_exist) {
3476         vsctl_fatal("--all and --if-exists should not be specified together");
3477     }
3478
3479     if (delete_all) {
3480         const struct ovsdb_idl_row *row;
3481         const struct ovsdb_idl_row *next_row;
3482
3483         for (row = ovsdb_idl_first_row(ctx->idl, table->class);
3484              row;) {
3485              next_row = ovsdb_idl_next_row(row);
3486              ovsdb_idl_txn_delete(row);
3487              row = next_row;
3488         }
3489     } else {
3490         for (i = 2; i < ctx->argc; i++) {
3491             const struct ovsdb_idl_row *row;
3492
3493             row = (must_exist ? must_get_row : get_row)(ctx, table, ctx->argv[i]);
3494             if (row) {
3495                 ovsdb_idl_txn_delete(row);
3496             }
3497         }
3498     }
3499     vsctl_context_invalidate_cache(ctx);
3500 }
3501
3502 #define RELOPS                                  \
3503     RELOP(RELOP_EQ,     "=")                    \
3504     RELOP(RELOP_NE,     "!=")                   \
3505     RELOP(RELOP_LT,     "<")                    \
3506     RELOP(RELOP_GT,     ">")                    \
3507     RELOP(RELOP_LE,     "<=")                   \
3508     RELOP(RELOP_GE,     ">=")                   \
3509     RELOP(RELOP_SET_EQ, "{=}")                  \
3510     RELOP(RELOP_SET_NE, "{!=}")                 \
3511     RELOP(RELOP_SET_LT, "{<}")                  \
3512     RELOP(RELOP_SET_GT, "{>}")                  \
3513     RELOP(RELOP_SET_LE, "{<=}")                 \
3514     RELOP(RELOP_SET_GE, "{>=}")
3515
3516 enum relop {
3517 #define RELOP(ENUM, STRING) ENUM,
3518     RELOPS
3519 #undef RELOP
3520 };
3521
3522 static bool
3523 is_set_operator(enum relop op)
3524 {
3525     return (op == RELOP_SET_EQ || op == RELOP_SET_NE ||
3526             op == RELOP_SET_LT || op == RELOP_SET_GT ||
3527             op == RELOP_SET_LE || op == RELOP_SET_GE);
3528 }
3529
3530 static bool
3531 evaluate_relop(const struct ovsdb_datum *a, const struct ovsdb_datum *b,
3532                const struct ovsdb_type *type, enum relop op)
3533 {
3534     switch (op) {
3535     case RELOP_EQ:
3536     case RELOP_SET_EQ:
3537         return ovsdb_datum_compare_3way(a, b, type) == 0;
3538     case RELOP_NE:
3539     case RELOP_SET_NE:
3540         return ovsdb_datum_compare_3way(a, b, type) != 0;
3541     case RELOP_LT:
3542         return ovsdb_datum_compare_3way(a, b, type) < 0;
3543     case RELOP_GT:
3544         return ovsdb_datum_compare_3way(a, b, type) > 0;
3545     case RELOP_LE:
3546         return ovsdb_datum_compare_3way(a, b, type) <= 0;
3547     case RELOP_GE:
3548         return ovsdb_datum_compare_3way(a, b, type) >= 0;
3549
3550     case RELOP_SET_LT:
3551         return b->n > a->n && ovsdb_datum_includes_all(a, b, type);
3552     case RELOP_SET_GT:
3553         return a->n > b->n && ovsdb_datum_includes_all(b, a, type);
3554     case RELOP_SET_LE:
3555         return ovsdb_datum_includes_all(a, b, type);
3556     case RELOP_SET_GE:
3557         return ovsdb_datum_includes_all(b, a, type);
3558
3559     default:
3560         NOT_REACHED();
3561     }
3562 }
3563
3564 static bool
3565 is_condition_satisfied(const struct vsctl_table_class *table,
3566                        const struct ovsdb_idl_row *row, const char *arg,
3567                        struct ovsdb_symbol_table *symtab)
3568 {
3569     static const char *operators[] = {
3570 #define RELOP(ENUM, STRING) STRING,
3571         RELOPS
3572 #undef RELOP
3573     };
3574
3575     const struct ovsdb_idl_column *column;
3576     const struct ovsdb_datum *have_datum;
3577     char *key_string, *value_string;
3578     struct ovsdb_type type;
3579     int operator;
3580     bool retval;
3581     char *error;
3582
3583     error = parse_column_key_value(arg, table, &column, &key_string,
3584                                    &operator, operators, ARRAY_SIZE(operators),
3585                                    &value_string);
3586     die_if_error(error);
3587     if (!value_string) {
3588         vsctl_fatal("%s: missing value", arg);
3589     }
3590
3591     type = column->type;
3592     type.n_max = UINT_MAX;
3593
3594     have_datum = ovsdb_idl_read(row, column);
3595     if (key_string) {
3596         union ovsdb_atom want_key;
3597         struct ovsdb_datum b;
3598         unsigned int idx;
3599
3600         if (column->type.value.type == OVSDB_TYPE_VOID) {
3601             vsctl_fatal("cannot specify key to check for non-map column %s",
3602                         column->name);
3603         }
3604
3605         die_if_error(ovsdb_atom_from_string(&want_key, &column->type.key,
3606                                             key_string, symtab));
3607
3608         type.key = type.value;
3609         type.value.type = OVSDB_TYPE_VOID;
3610         die_if_error(ovsdb_datum_from_string(&b, &type, value_string, symtab));
3611
3612         idx = ovsdb_datum_find_key(have_datum,
3613                                    &want_key, column->type.key.type);
3614         if (idx == UINT_MAX && !is_set_operator(operator)) {
3615             retval = false;
3616         } else {
3617             struct ovsdb_datum a;
3618
3619             if (idx != UINT_MAX) {
3620                 a.n = 1;
3621                 a.keys = &have_datum->values[idx];
3622                 a.values = NULL;
3623             } else {
3624                 a.n = 0;
3625                 a.keys = NULL;
3626                 a.values = NULL;
3627             }
3628
3629             retval = evaluate_relop(&a, &b, &type, operator);
3630         }
3631
3632         ovsdb_atom_destroy(&want_key, column->type.key.type);
3633         ovsdb_datum_destroy(&b, &type);
3634     } else {
3635         struct ovsdb_datum want_datum;
3636
3637         die_if_error(ovsdb_datum_from_string(&want_datum, &column->type,
3638                                              value_string, symtab));
3639         retval = evaluate_relop(have_datum, &want_datum, &type, operator);
3640         ovsdb_datum_destroy(&want_datum, &column->type);
3641     }
3642
3643     free(key_string);
3644     free(value_string);
3645
3646     return retval;
3647 }
3648
3649 static void
3650 pre_cmd_wait_until(struct vsctl_context *ctx)
3651 {
3652     const char *table_name = ctx->argv[1];
3653     const struct vsctl_table_class *table;
3654     int i;
3655
3656     table = pre_get_table(ctx, table_name);
3657
3658     for (i = 3; i < ctx->argc; i++) {
3659         pre_parse_column_key_value(ctx, ctx->argv[i], table);
3660     }
3661 }
3662
3663 static void
3664 cmd_wait_until(struct vsctl_context *ctx)
3665 {
3666     const char *table_name = ctx->argv[1];
3667     const char *record_id = ctx->argv[2];
3668     const struct vsctl_table_class *table;
3669     const struct ovsdb_idl_row *row;
3670     int i;
3671
3672     table = get_table(table_name);
3673
3674     row = get_row(ctx, table, record_id);
3675     if (!row) {
3676         ctx->try_again = true;
3677         return;
3678     }
3679
3680     for (i = 3; i < ctx->argc; i++) {
3681         if (!is_condition_satisfied(table, row, ctx->argv[i], ctx->symtab)) {
3682             ctx->try_again = true;
3683             return;
3684         }
3685     }
3686 }
3687 \f
3688 /* Prepares 'ctx', which has already been initialized with
3689  * vsctl_context_init(), for processing 'command'. */
3690 static void
3691 vsctl_context_init_command(struct vsctl_context *ctx,
3692                            struct vsctl_command *command)
3693 {
3694     ctx->argc = command->argc;
3695     ctx->argv = command->argv;
3696     ctx->options = command->options;
3697
3698     ds_swap(&ctx->output, &command->output);
3699     ctx->table = command->table;
3700
3701     ctx->verified_ports = false;
3702
3703     ctx->try_again = false;
3704 }
3705
3706 /* Prepares 'ctx' for processing commands, initializing its members with the
3707  * values passed in as arguments.
3708  *
3709  * If 'command' is nonnull, calls vsctl_context_init_command() to prepare for
3710  * that particular command. */
3711 static void
3712 vsctl_context_init(struct vsctl_context *ctx, struct vsctl_command *command,
3713                    struct ovsdb_idl *idl, struct ovsdb_idl_txn *txn,
3714                    const struct ovsrec_open_vswitch *ovs,
3715                    struct ovsdb_symbol_table *symtab)
3716 {
3717     if (command) {
3718         vsctl_context_init_command(ctx, command);
3719     }
3720     ctx->idl = idl;
3721     ctx->txn = txn;
3722     ctx->ovs = ovs;
3723     ctx->symtab = symtab;
3724     ctx->cache_valid = false;
3725 }
3726
3727 /* Completes processing of 'command' within 'ctx'. */
3728 static void
3729 vsctl_context_done_command(struct vsctl_context *ctx,
3730                            struct vsctl_command *command)
3731 {
3732     ds_swap(&ctx->output, &command->output);
3733     command->table = ctx->table;
3734 }
3735
3736 /* Finishes up with 'ctx'.
3737  *
3738  * If command is nonnull, first calls vsctl_context_done_command() to complete
3739  * processing that command within 'ctx'. */
3740 static void
3741 vsctl_context_done(struct vsctl_context *ctx, struct vsctl_command *command)
3742 {
3743     if (command) {
3744         vsctl_context_done_command(ctx, command);
3745     }
3746     vsctl_context_invalidate_cache(ctx);
3747 }
3748
3749 static void
3750 run_prerequisites(struct vsctl_command *commands, size_t n_commands,
3751                   struct ovsdb_idl *idl)
3752 {
3753     struct vsctl_command *c;
3754
3755     ovsdb_idl_add_table(idl, &ovsrec_table_open_vswitch);
3756     if (wait_for_reload) {
3757         ovsdb_idl_add_column(idl, &ovsrec_open_vswitch_col_cur_cfg);
3758     }
3759     for (c = commands; c < &commands[n_commands]; c++) {
3760         if (c->syntax->prerequisites) {
3761             struct vsctl_context ctx;
3762
3763             ds_init(&c->output);
3764             c->table = NULL;
3765
3766             vsctl_context_init(&ctx, c, idl, NULL, NULL, NULL);
3767             (c->syntax->prerequisites)(&ctx);
3768             vsctl_context_done(&ctx, c);
3769
3770             assert(!c->output.string);
3771             assert(!c->table);
3772         }
3773     }
3774 }
3775
3776 static void
3777 do_vsctl(const char *args, struct vsctl_command *commands, size_t n_commands,
3778          struct ovsdb_idl *idl)
3779 {
3780     struct ovsdb_idl_txn *txn;
3781     const struct ovsrec_open_vswitch *ovs;
3782     enum ovsdb_idl_txn_status status;
3783     struct ovsdb_symbol_table *symtab;
3784     struct vsctl_context ctx;
3785     struct vsctl_command *c;
3786     struct shash_node *node;
3787     int64_t next_cfg = 0;
3788     char *error = NULL;
3789
3790     txn = the_idl_txn = ovsdb_idl_txn_create(idl);
3791     if (dry_run) {
3792         ovsdb_idl_txn_set_dry_run(txn);
3793     }
3794
3795     ovsdb_idl_txn_add_comment(txn, "ovs-vsctl: %s", args);
3796
3797     ovs = ovsrec_open_vswitch_first(idl);
3798     if (!ovs) {
3799         /* XXX add verification that table is empty */
3800         ovs = ovsrec_open_vswitch_insert(txn);
3801     }
3802
3803     if (wait_for_reload) {
3804         ovsdb_idl_txn_increment(txn, &ovs->header_,
3805                                 &ovsrec_open_vswitch_col_next_cfg);
3806     }
3807
3808     symtab = ovsdb_symbol_table_create();
3809     for (c = commands; c < &commands[n_commands]; c++) {
3810         ds_init(&c->output);
3811         c->table = NULL;
3812     }
3813     vsctl_context_init(&ctx, NULL, idl, txn, ovs, symtab);
3814     for (c = commands; c < &commands[n_commands]; c++) {
3815         vsctl_context_init_command(&ctx, c);
3816         if (c->syntax->run) {
3817             (c->syntax->run)(&ctx);
3818         }
3819         vsctl_context_done_command(&ctx, c);
3820
3821         if (ctx.try_again) {
3822             vsctl_context_done(&ctx, NULL);
3823             goto try_again;
3824         }
3825     }
3826     vsctl_context_done(&ctx, NULL);
3827
3828     SHASH_FOR_EACH (node, &symtab->sh) {
3829         struct ovsdb_symbol *symbol = node->data;
3830         if (!symbol->created) {
3831             vsctl_fatal("row id \"%s\" is referenced but never created (e.g. "
3832                         "with \"-- --id=%s create ...\")",
3833                         node->name, node->name);
3834         }
3835         if (!symbol->strong_ref) {
3836             if (!symbol->weak_ref) {
3837                 VLOG_WARN("row id \"%s\" was created but no reference to it "
3838                           "was inserted, so it will not actually appear in "
3839                           "the database", node->name);
3840             } else {
3841                 VLOG_WARN("row id \"%s\" was created but only a weak "
3842                           "reference to it was inserted, so it will not "
3843                           "actually appear in the database", node->name);
3844             }
3845         }
3846     }
3847
3848     status = ovsdb_idl_txn_commit_block(txn);
3849     if (wait_for_reload && status == TXN_SUCCESS) {
3850         next_cfg = ovsdb_idl_txn_get_increment_new_value(txn);
3851     }
3852     if (status == TXN_UNCHANGED || status == TXN_SUCCESS) {
3853         for (c = commands; c < &commands[n_commands]; c++) {
3854             if (c->syntax->postprocess) {
3855                 struct vsctl_context ctx;
3856
3857                 vsctl_context_init(&ctx, c, idl, txn, ovs, symtab);
3858                 (c->syntax->postprocess)(&ctx);
3859                 vsctl_context_done(&ctx, c);
3860             }
3861         }
3862     }
3863     error = xstrdup(ovsdb_idl_txn_get_error(txn));
3864     ovsdb_idl_txn_destroy(txn);
3865     txn = the_idl_txn = NULL;
3866
3867     switch (status) {
3868     case TXN_UNCOMMITTED:
3869     case TXN_INCOMPLETE:
3870         NOT_REACHED();
3871
3872     case TXN_ABORTED:
3873         /* Should not happen--we never call ovsdb_idl_txn_abort(). */
3874         vsctl_fatal("transaction aborted");
3875
3876     case TXN_UNCHANGED:
3877     case TXN_SUCCESS:
3878         break;
3879
3880     case TXN_TRY_AGAIN:
3881         goto try_again;
3882
3883     case TXN_ERROR:
3884         vsctl_fatal("transaction error: %s", error);
3885
3886     case TXN_NOT_LOCKED:
3887         /* Should not happen--we never call ovsdb_idl_set_lock(). */
3888         vsctl_fatal("database not locked");
3889
3890     default:
3891         NOT_REACHED();
3892     }
3893     free(error);
3894
3895     ovsdb_symbol_table_destroy(symtab);
3896
3897     for (c = commands; c < &commands[n_commands]; c++) {
3898         struct ds *ds = &c->output;
3899
3900         if (c->table) {
3901             table_print(c->table, &table_style);
3902         } else if (oneline) {
3903             size_t j;
3904
3905             ds_chomp(ds, '\n');
3906             for (j = 0; j < ds->length; j++) {
3907                 int ch = ds->string[j];
3908                 switch (ch) {
3909                 case '\n':
3910                     fputs("\\n", stdout);
3911                     break;
3912
3913                 case '\\':
3914                     fputs("\\\\", stdout);
3915                     break;
3916
3917                 default:
3918                     putchar(ch);
3919                 }
3920             }
3921             putchar('\n');
3922         } else {
3923             fputs(ds_cstr(ds), stdout);
3924         }
3925         ds_destroy(&c->output);
3926         table_destroy(c->table);
3927         free(c->table);
3928
3929         shash_destroy_free_data(&c->options);
3930     }
3931     free(commands);
3932
3933     if (wait_for_reload && status != TXN_UNCHANGED) {
3934         for (;;) {
3935             ovsdb_idl_run(idl);
3936             OVSREC_OPEN_VSWITCH_FOR_EACH (ovs, idl) {
3937                 if (ovs->cur_cfg >= next_cfg) {
3938                     goto done;
3939                 }
3940             }
3941             ovsdb_idl_wait(idl);
3942             poll_block();
3943         }
3944     done: ;
3945     }
3946     ovsdb_idl_destroy(idl);
3947
3948     exit(EXIT_SUCCESS);
3949
3950 try_again:
3951     /* Our transaction needs to be rerun, or a prerequisite was not met.  Free
3952      * resources and return so that the caller can try again. */
3953     if (txn) {
3954         ovsdb_idl_txn_abort(txn);
3955         ovsdb_idl_txn_destroy(txn);
3956     }
3957     ovsdb_symbol_table_destroy(symtab);
3958     for (c = commands; c < &commands[n_commands]; c++) {
3959         ds_destroy(&c->output);
3960         table_destroy(c->table);
3961         free(c->table);
3962     }
3963     free(error);
3964 }
3965
3966 static const struct vsctl_command_syntax all_commands[] = {
3967     /* Open vSwitch commands. */
3968     {"init", 0, 0, NULL, cmd_init, NULL, "", RW},
3969     {"show", 0, 0, pre_cmd_show, cmd_show, NULL, "", RO},
3970
3971     /* Bridge commands. */
3972     {"add-br", 1, 3, pre_get_info, cmd_add_br, NULL, "--may-exist", RW},
3973     {"del-br", 1, 1, pre_get_info, cmd_del_br, NULL, "--if-exists", RW},
3974     {"list-br", 0, 0, pre_get_info, cmd_list_br, NULL, "--real,--fake", RO},
3975     {"br-exists", 1, 1, pre_get_info, cmd_br_exists, NULL, "", RO},
3976     {"br-to-vlan", 1, 1, pre_get_info, cmd_br_to_vlan, NULL, "", RO},
3977     {"br-to-parent", 1, 1, pre_get_info, cmd_br_to_parent, NULL, "", RO},
3978     {"br-set-external-id", 2, 3, pre_cmd_br_set_external_id,
3979      cmd_br_set_external_id, NULL, "", RW},
3980     {"br-get-external-id", 1, 2, pre_cmd_br_get_external_id,
3981      cmd_br_get_external_id, NULL, "", RO},
3982
3983     /* Port commands. */
3984     {"list-ports", 1, 1, pre_get_info, cmd_list_ports, NULL, "", RO},
3985     {"add-port", 2, INT_MAX, pre_get_info, cmd_add_port, NULL, "--may-exist",
3986      RW},
3987     {"add-bond", 4, INT_MAX, pre_get_info, cmd_add_bond, NULL,
3988      "--may-exist,--fake-iface", RW},
3989     {"del-port", 1, 2, pre_get_info, cmd_del_port, NULL,
3990      "--if-exists,--with-iface", RW},
3991     {"port-to-br", 1, 1, pre_get_info, cmd_port_to_br, NULL, "", RO},
3992
3993     /* Interface commands. */
3994     {"list-ifaces", 1, 1, pre_get_info, cmd_list_ifaces, NULL, "", RO},
3995     {"iface-to-br", 1, 1, pre_get_info, cmd_iface_to_br, NULL, "", RO},
3996
3997     /* Controller commands. */
3998     {"get-controller", 1, 1, pre_controller, cmd_get_controller, NULL, "", RO},
3999     {"del-controller", 1, 1, pre_controller, cmd_del_controller, NULL, "", RW},
4000     {"set-controller", 1, INT_MAX, pre_controller, cmd_set_controller, NULL,
4001      "", RW},
4002     {"get-fail-mode", 1, 1, pre_get_info, cmd_get_fail_mode, NULL, "", RO},
4003     {"del-fail-mode", 1, 1, pre_get_info, cmd_del_fail_mode, NULL, "", RW},
4004     {"set-fail-mode", 2, 2, pre_get_info, cmd_set_fail_mode, NULL, "", RW},
4005
4006     /* Manager commands. */
4007     {"get-manager", 0, 0, pre_manager, cmd_get_manager, NULL, "", RO},
4008     {"del-manager", 0, 0, pre_manager, cmd_del_manager, NULL, "", RW},
4009     {"set-manager", 1, INT_MAX, pre_manager, cmd_set_manager, NULL, "", RW},
4010
4011     /* SSL commands. */
4012     {"get-ssl", 0, 0, pre_cmd_get_ssl, cmd_get_ssl, NULL, "", RO},
4013     {"del-ssl", 0, 0, pre_cmd_del_ssl, cmd_del_ssl, NULL, "", RW},
4014     {"set-ssl", 3, 3, pre_cmd_set_ssl, cmd_set_ssl, NULL, "--bootstrap", RW},
4015
4016     /* Switch commands. */
4017     {"emer-reset", 0, 0, pre_cmd_emer_reset, cmd_emer_reset, NULL, "", RW},
4018
4019     /* Database commands. */
4020     {"comment", 0, INT_MAX, NULL, NULL, NULL, "", RO},
4021     {"get", 2, INT_MAX, pre_cmd_get, cmd_get, NULL, "--if-exists,--id=", RO},
4022     {"list", 1, INT_MAX, pre_cmd_list, cmd_list, NULL, "--columns=", RO},
4023     {"find", 1, INT_MAX, pre_cmd_find, cmd_find, NULL, "--columns=", RO},
4024     {"set", 3, INT_MAX, pre_cmd_set, cmd_set, NULL, "", RW},
4025     {"add", 4, INT_MAX, pre_cmd_add, cmd_add, NULL, "", RW},
4026     {"remove", 4, INT_MAX, pre_cmd_remove, cmd_remove, NULL, "", RW},
4027     {"clear", 3, INT_MAX, pre_cmd_clear, cmd_clear, NULL, "", RW},
4028     {"create", 2, INT_MAX, pre_create, cmd_create, post_create, "--id=", RW},
4029     {"destroy", 1, INT_MAX, pre_cmd_destroy, cmd_destroy, NULL,
4030      "--if-exists,--all", RW},
4031     {"wait-until", 2, INT_MAX, pre_cmd_wait_until, cmd_wait_until, NULL, "",
4032      RO},
4033
4034     {NULL, 0, 0, NULL, NULL, NULL, NULL, RO},
4035 };
4036