ovs-ofctl: Check min flow format support in negotiate_highest_flow_format().
[sliver-openvswitch.git] / utilities / ovs-ofctl.c
1 /*
2  * Copyright (c) 2008, 2009, 2010, 2011 Nicira Networks.
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 #include <errno.h>
19 #include <getopt.h>
20 #include <inttypes.h>
21 #include <net/if.h>
22 #include <signal.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <unistd.h>
26 #include <sys/stat.h>
27 #include <sys/time.h>
28
29 #include "byte-order.h"
30 #include "classifier.h"
31 #include "command-line.h"
32 #include "compiler.h"
33 #include "dirs.h"
34 #include "dpif.h"
35 #include "dynamic-string.h"
36 #include "netlink.h"
37 #include "nx-match.h"
38 #include "odp-util.h"
39 #include "ofp-parse.h"
40 #include "ofp-print.h"
41 #include "ofp-util.h"
42 #include "ofpbuf.h"
43 #include "openflow/nicira-ext.h"
44 #include "openflow/openflow.h"
45 #include "random.h"
46 #include "stream-ssl.h"
47 #include "timeval.h"
48 #include "util.h"
49 #include "vconn.h"
50 #include "vlog.h"
51
52 VLOG_DEFINE_THIS_MODULE(ofctl);
53
54 /* --strict: Use strict matching for flow mod commands? */
55 static bool strict;
56
57 /* -F, --flow-format: Flow format to use.  Either one of NXFF_* to force a
58  * particular flow format or -1 to let ovs-ofctl choose intelligently. */
59 static int preferred_flow_format = -1;
60
61 /* -m, --more: Additional verbosity for ofp-print functions. */
62 static int verbosity;
63
64 static const struct command all_commands[];
65
66 static void usage(void) NO_RETURN;
67 static void parse_options(int argc, char *argv[]);
68
69 int
70 main(int argc, char *argv[])
71 {
72     set_program_name(argv[0]);
73     parse_options(argc, argv);
74     signal(SIGPIPE, SIG_IGN);
75     run_command(argc - optind, argv + optind, all_commands);
76     return 0;
77 }
78
79 static void
80 parse_options(int argc, char *argv[])
81 {
82     enum {
83         OPT_STRICT = UCHAR_MAX + 1,
84         VLOG_OPTION_ENUMS
85     };
86     static struct option long_options[] = {
87         {"timeout", required_argument, 0, 't'},
88         {"strict", no_argument, 0, OPT_STRICT},
89         {"flow-format", required_argument, 0, 'F'},
90         {"more", no_argument, 0, 'm'},
91         {"help", no_argument, 0, 'h'},
92         {"version", no_argument, 0, 'V'},
93         VLOG_LONG_OPTIONS,
94         STREAM_SSL_LONG_OPTIONS
95         {0, 0, 0, 0},
96     };
97     char *short_options = long_options_to_short_options(long_options);
98
99     for (;;) {
100         unsigned long int timeout;
101         int c;
102
103         c = getopt_long(argc, argv, short_options, long_options, NULL);
104         if (c == -1) {
105             break;
106         }
107
108         switch (c) {
109         case 't':
110             timeout = strtoul(optarg, NULL, 10);
111             if (timeout <= 0) {
112                 ovs_fatal(0, "value %s on -t or --timeout is not at least 1",
113                           optarg);
114             } else {
115                 time_alarm(timeout);
116             }
117             break;
118
119         case 'F':
120             preferred_flow_format = ofputil_flow_format_from_string(optarg);
121             if (preferred_flow_format < 0) {
122                 ovs_fatal(0, "unknown flow format `%s'", optarg);
123             }
124             break;
125
126         case 'm':
127             verbosity++;
128             break;
129
130         case 'h':
131             usage();
132
133         case 'V':
134             OVS_PRINT_VERSION(OFP_VERSION, OFP_VERSION);
135             exit(EXIT_SUCCESS);
136
137         case OPT_STRICT:
138             strict = true;
139             break;
140
141         VLOG_OPTION_HANDLERS
142         STREAM_SSL_OPTION_HANDLERS
143
144         case '?':
145             exit(EXIT_FAILURE);
146
147         default:
148             abort();
149         }
150     }
151     free(short_options);
152 }
153
154 static void
155 usage(void)
156 {
157     printf("%s: OpenFlow switch management utility\n"
158            "usage: %s [OPTIONS] COMMAND [ARG...]\n"
159            "\nFor OpenFlow switches:\n"
160            "  show SWITCH                 show OpenFlow information\n"
161            "  status SWITCH [KEY]         report statistics (about KEY)\n"
162            "  dump-desc SWITCH            print switch description\n"
163            "  dump-tables SWITCH          print table stats\n"
164            "  mod-port SWITCH IFACE ACT   modify port behavior\n"
165            "  dump-ports SWITCH [PORT]    print port statistics\n"
166            "  dump-flows SWITCH           print all flow entries\n"
167            "  dump-flows SWITCH FLOW      print matching FLOWs\n"
168            "  dump-aggregate SWITCH       print aggregate flow statistics\n"
169            "  dump-aggregate SWITCH FLOW  print aggregate stats for FLOWs\n"
170            "  queue-stats SWITCH [PORT [QUEUE]]  dump queue stats\n"
171            "  add-flow SWITCH FLOW        add flow described by FLOW\n"
172            "  add-flows SWITCH FILE       add flows from FILE\n"
173            "  mod-flows SWITCH FLOW       modify actions of matching FLOWs\n"
174            "  del-flows SWITCH [FLOW]     delete matching FLOWs\n"
175            "  monitor SWITCH [MISSLEN]    print packets received from SWITCH\n"
176            "\nFor OpenFlow switches and controllers:\n"
177            "  probe VCONN                 probe whether VCONN is up\n"
178            "  ping VCONN [N]              latency of N-byte echos\n"
179            "  benchmark VCONN N COUNT     bandwidth of COUNT N-byte echos\n"
180            "where each SWITCH is an active OpenFlow connection method.\n",
181            program_name, program_name);
182     vconn_usage(true, false, false);
183     vlog_usage();
184     printf("\nOther options:\n"
185            "  --strict                    use strict match for flow commands\n"
186            "  -F, --flow-format=FORMAT    force particular flow format\n"
187            "  -m, --more                  be more verbose printing OpenFlow\n"
188            "  -t, --timeout=SECS          give up after SECS seconds\n"
189            "  -h, --help                  display this help message\n"
190            "  -V, --version               display version information\n");
191     exit(EXIT_SUCCESS);
192 }
193
194 static void run(int retval, const char *message, ...)
195     PRINTF_FORMAT(2, 3);
196
197 static void run(int retval, const char *message, ...)
198 {
199     if (retval) {
200         va_list args;
201
202         fprintf(stderr, "%s: ", program_name);
203         va_start(args, message);
204         vfprintf(stderr, message, args);
205         va_end(args);
206         if (retval == EOF) {
207             fputs(": unexpected end of file\n", stderr);
208         } else {
209             fprintf(stderr, ": %s\n", strerror(retval));
210         }
211
212         exit(EXIT_FAILURE);
213     }
214 }
215 \f
216 /* Generic commands. */
217
218 static void
219 open_vconn_socket(const char *name, struct vconn **vconnp)
220 {
221     char *vconn_name = xasprintf("unix:%s", name);
222     VLOG_DBG("connecting to %s", vconn_name);
223     run(vconn_open_block(vconn_name, OFP_VERSION, vconnp),
224         "connecting to %s", vconn_name);
225     free(vconn_name);
226 }
227
228 static void
229 open_vconn__(const char *name, const char *default_suffix,
230              struct vconn **vconnp)
231 {
232     struct dpif *dpif;
233     struct stat s;
234     char *bridge_path, *datapath_name, *datapath_type;
235
236     bridge_path = xasprintf("%s/%s.%s", ovs_rundir(), name, default_suffix);
237     dp_parse_name(name, &datapath_name, &datapath_type);
238
239     if (strstr(name, ":")) {
240         run(vconn_open_block(name, OFP_VERSION, vconnp),
241             "connecting to %s", name);
242     } else if (!stat(name, &s) && S_ISSOCK(s.st_mode)) {
243         open_vconn_socket(name, vconnp);
244     } else if (!stat(bridge_path, &s) && S_ISSOCK(s.st_mode)) {
245         open_vconn_socket(bridge_path, vconnp);
246     } else if (!dpif_open(datapath_name, datapath_type, &dpif)) {
247         char dpif_name[IF_NAMESIZE + 1];
248         char *socket_name;
249
250         run(dpif_port_get_name(dpif, ODPP_LOCAL, dpif_name, sizeof dpif_name),
251             "obtaining name of %s", dpif_name);
252         dpif_close(dpif);
253         if (strcmp(dpif_name, name)) {
254             VLOG_DBG("datapath %s is named %s", name, dpif_name);
255         }
256
257         socket_name = xasprintf("%s/%s.%s",
258                                 ovs_rundir(), dpif_name, default_suffix);
259         if (stat(socket_name, &s)) {
260             ovs_fatal(errno, "cannot connect to %s: stat failed on %s",
261                       name, socket_name);
262         } else if (!S_ISSOCK(s.st_mode)) {
263             ovs_fatal(0, "cannot connect to %s: %s is not a socket",
264                       name, socket_name);
265         }
266
267         open_vconn_socket(socket_name, vconnp);
268         free(socket_name);
269     } else {
270         ovs_fatal(0, "%s is not a valid connection method", name);
271     }
272
273     free(datapath_name);
274     free(datapath_type);
275     free(bridge_path);
276 }
277
278 static void
279 open_vconn(const char *name, struct vconn **vconnp)
280 {
281     return open_vconn__(name, "mgmt", vconnp);
282 }
283
284 static void *
285 alloc_stats_request(size_t body_len, uint16_t type, struct ofpbuf **bufferp)
286 {
287     struct ofp_stats_request *rq;
288     rq = make_openflow((offsetof(struct ofp_stats_request, body)
289                         + body_len), OFPT_STATS_REQUEST, bufferp);
290     rq->type = htons(type);
291     rq->flags = htons(0);
292     return rq->body;
293 }
294
295 static void
296 send_openflow_buffer(struct vconn *vconn, struct ofpbuf *buffer)
297 {
298     update_openflow_length(buffer);
299     run(vconn_send_block(vconn, buffer), "failed to send packet to switch");
300 }
301
302 static void
303 dump_transaction(const char *vconn_name, struct ofpbuf *request)
304 {
305     struct vconn *vconn;
306     struct ofpbuf *reply;
307
308     update_openflow_length(request);
309     open_vconn(vconn_name, &vconn);
310     run(vconn_transact(vconn, request, &reply), "talking to %s", vconn_name);
311     ofp_print(stdout, reply->data, reply->size, verbosity + 1);
312     vconn_close(vconn);
313 }
314
315 static void
316 dump_trivial_transaction(const char *vconn_name, uint8_t request_type)
317 {
318     struct ofpbuf *request;
319     make_openflow(sizeof(struct ofp_header), request_type, &request);
320     dump_transaction(vconn_name, request);
321 }
322
323 static void
324 dump_stats_transaction(const char *vconn_name, struct ofpbuf *request)
325 {
326     ovs_be32 send_xid = ((struct ofp_header *) request->data)->xid;
327     struct vconn *vconn;
328     bool done = false;
329
330     open_vconn(vconn_name, &vconn);
331     send_openflow_buffer(vconn, request);
332     while (!done) {
333         uint32_t recv_xid;
334         struct ofpbuf *reply;
335
336         run(vconn_recv_block(vconn, &reply), "OpenFlow packet receive failed");
337         recv_xid = ((struct ofp_header *) reply->data)->xid;
338         if (send_xid == recv_xid) {
339             struct ofp_stats_reply *osr;
340
341             ofp_print(stdout, reply->data, reply->size, verbosity + 1);
342
343             osr = ofpbuf_at(reply, 0, sizeof *osr);
344             done = !osr || !(ntohs(osr->flags) & OFPSF_REPLY_MORE);
345         } else {
346             VLOG_DBG("received reply with xid %08"PRIx32" "
347                      "!= expected %08"PRIx32, recv_xid, send_xid);
348         }
349         ofpbuf_delete(reply);
350     }
351     vconn_close(vconn);
352 }
353
354 static void
355 dump_trivial_stats_transaction(const char *vconn_name, uint8_t stats_type)
356 {
357     struct ofpbuf *request;
358     alloc_stats_request(0, stats_type, &request);
359     dump_stats_transaction(vconn_name, request);
360 }
361
362 /* Sends 'request', which should be a request that only has a reply if an error
363  * occurs, and waits for it to succeed or fail.  If an error does occur, prints
364  * it and exits with an error. */
365 static void
366 transact_multiple_noreply(struct vconn *vconn, struct list *requests)
367 {
368     struct ofpbuf *request, *reply;
369
370     LIST_FOR_EACH (request, list_node, requests) {
371         update_openflow_length(request);
372     }
373
374     run(vconn_transact_multiple_noreply(vconn, requests, &reply),
375         "talking to %s", vconn_get_name(vconn));
376     if (reply) {
377         ofp_print(stderr, reply->data, reply->size, verbosity + 2);
378         exit(1);
379     }
380     ofpbuf_delete(reply);
381 }
382
383 /* Sends 'request', which should be a request that only has a reply if an error
384  * occurs, and waits for it to succeed or fail.  If an error does occur, prints
385  * it and exits with an error. */
386 static void
387 transact_noreply(struct vconn *vconn, struct ofpbuf *request)
388 {
389     struct list requests;
390
391     list_init(&requests);
392     list_push_back(&requests, &request->list_node);
393     transact_multiple_noreply(vconn, &requests);
394 }
395
396 static void
397 do_show(int argc OVS_UNUSED, char *argv[])
398 {
399     dump_trivial_transaction(argv[1], OFPT_FEATURES_REQUEST);
400     dump_trivial_transaction(argv[1], OFPT_GET_CONFIG_REQUEST);
401 }
402
403 static void
404 do_status(int argc, char *argv[])
405 {
406     struct nicira_header *request, *reply;
407     struct vconn *vconn;
408     struct ofpbuf *b;
409
410     request = make_nxmsg(sizeof *request, NXT_STATUS_REQUEST, &b);
411     if (argc > 2) {
412         ofpbuf_put(b, argv[2], strlen(argv[2]));
413         update_openflow_length(b);
414     }
415     open_vconn(argv[1], &vconn);
416     run(vconn_transact(vconn, b, &b), "talking to %s", argv[1]);
417     vconn_close(vconn);
418
419     if (b->size < sizeof *reply) {
420         ovs_fatal(0, "short reply (%zu bytes)", b->size);
421     }
422     reply = b->data;
423     if (reply->header.type != OFPT_VENDOR
424         || reply->vendor != ntohl(NX_VENDOR_ID)
425         || reply->subtype != ntohl(NXT_STATUS_REPLY)) {
426         ofp_print(stderr, b->data, b->size, verbosity + 2);
427         ovs_fatal(0, "bad reply");
428     }
429
430     fwrite(reply + 1, b->size - sizeof *reply, 1, stdout);
431 }
432
433 static void
434 do_dump_desc(int argc OVS_UNUSED, char *argv[])
435 {
436     dump_trivial_stats_transaction(argv[1], OFPST_DESC);
437 }
438
439 static void
440 do_dump_tables(int argc OVS_UNUSED, char *argv[])
441 {
442     dump_trivial_stats_transaction(argv[1], OFPST_TABLE);
443 }
444
445 /* Opens a connection to 'vconn_name', fetches the ofp_phy_port structure for
446  * 'port_name' (which may be a port name or number), and copies it into
447  * '*oppp'. */
448 static void
449 fetch_ofp_phy_port(const char *vconn_name, const char *port_name,
450                    struct ofp_phy_port *oppp)
451 {
452     struct ofpbuf *request, *reply;
453     struct ofp_switch_features *osf;
454     unsigned int port_no;
455     struct vconn *vconn;
456     int n_ports;
457     int port_idx;
458
459     /* Try to interpret the argument as a port number. */
460     if (!str_to_uint(port_name, 10, &port_no)) {
461         port_no = UINT_MAX;
462     }
463
464     /* Fetch the switch's ofp_switch_features. */
465     make_openflow(sizeof(struct ofp_header), OFPT_FEATURES_REQUEST, &request);
466     open_vconn(vconn_name, &vconn);
467     run(vconn_transact(vconn, request, &reply), "talking to %s", vconn_name);
468
469     osf = reply->data;
470     if (reply->size < sizeof *osf) {
471         ovs_fatal(0, "%s: received too-short features reply (only %zu bytes)",
472                   vconn_name, reply->size);
473     }
474     n_ports = (reply->size - sizeof *osf) / sizeof *osf->ports;
475
476     for (port_idx = 0; port_idx < n_ports; port_idx++) {
477         const struct ofp_phy_port *opp = &osf->ports[port_idx];
478
479         if (port_no != UINT_MAX
480             ? htons(port_no) == opp->port_no
481             : !strncmp(opp->name, port_name, sizeof opp->name)) {
482             *oppp = *opp;
483             ofpbuf_delete(reply);
484             vconn_close(vconn);
485             return;
486         }
487     }
488     ovs_fatal(0, "%s: couldn't find port `%s'", vconn_name, port_name);
489 }
490
491 /* Returns the port number corresponding to 'port_name' (which may be a port
492  * name or number) within the switch 'vconn_name'. */
493 static uint16_t
494 str_to_port_no(const char *vconn_name, const char *port_name)
495 {
496     unsigned int port_no;
497
498     if (str_to_uint(port_name, 10, &port_no)) {
499         return port_no;
500     } else {
501         struct ofp_phy_port opp;
502
503         fetch_ofp_phy_port(vconn_name, port_name, &opp);
504         return ntohs(opp.port_no);
505     }
506 }
507
508 static bool
509 try_set_flow_format(struct vconn *vconn, enum nx_flow_format flow_format)
510 {
511     struct ofpbuf *sff, *reply;
512
513     sff = ofputil_make_set_flow_format(flow_format);
514     run(vconn_transact_noreply(vconn, sff, &reply),
515         "talking to %s", vconn_get_name(vconn));
516     if (reply) {
517         char *s = ofp_to_string(reply->data, reply->size, 2);
518         VLOG_DBG("%s: failed to set flow format %s, controller replied: %s",
519                  vconn_get_name(vconn),
520                  ofputil_flow_format_to_string(flow_format),
521                  s);
522         free(s);
523         ofpbuf_delete(reply);
524         return false;
525     }
526     return true;
527 }
528
529 static void
530 set_flow_format(struct vconn *vconn, enum nx_flow_format flow_format)
531 {
532     struct ofpbuf *sff = ofputil_make_set_flow_format(flow_format);
533     transact_noreply(vconn, sff);
534     VLOG_DBG("%s: using user-specified flow format %s",
535              vconn_get_name(vconn),
536              ofputil_flow_format_to_string(flow_format));
537 }
538
539 static enum nx_flow_format
540 negotiate_highest_flow_format(struct vconn *vconn, const struct cls_rule *rule,
541                               bool cookie_support, ovs_be64 cookie)
542 {
543     enum nx_flow_format min_format;
544
545     min_format = ofputil_min_flow_format(rule, cookie_support, cookie);
546     if (preferred_flow_format != -1) {
547         if (preferred_flow_format < min_format) {
548             ovs_fatal(0, "%s: cannot use requested flow format %s for "
549                       "specified flow", vconn_get_name(vconn),
550                       ofputil_flow_format_to_string(min_format));
551         }
552
553         set_flow_format(vconn, preferred_flow_format);
554         return preferred_flow_format;
555     } else {
556         enum nx_flow_format flow_format;
557
558         if (try_set_flow_format(vconn, NXFF_NXM)) {
559             flow_format = NXFF_NXM;
560         } else if (try_set_flow_format(vconn, NXFF_TUN_ID_FROM_COOKIE)) {
561             flow_format = NXFF_TUN_ID_FROM_COOKIE;
562         } else {
563             flow_format = NXFF_OPENFLOW10;
564         }
565
566         if (flow_format < min_format) {
567             ovs_fatal(0, "%s: cannot use switch's most advanced flow format "
568                       "%s for specified flow", vconn_get_name(vconn),
569                       ofputil_flow_format_to_string(min_format));
570         }
571
572         VLOG_DBG("%s: negotiated flow format %s", vconn_get_name(vconn),
573                  ofputil_flow_format_to_string(flow_format));
574         return flow_format;
575     }
576 }
577
578 static void
579 do_dump_flows__(int argc, char *argv[], bool aggregate)
580 {
581     enum nx_flow_format flow_format;
582     struct flow_stats_request fsr;
583     struct ofpbuf *request;
584     struct vconn *vconn;
585
586     parse_ofp_flow_stats_request_str(&fsr, aggregate, argc > 2 ? argv[2] : "");
587
588     open_vconn(argv[1], &vconn);
589     flow_format = negotiate_highest_flow_format(vconn, &fsr.match, false, 0);
590     request = ofputil_encode_flow_stats_request(&fsr, flow_format);
591     dump_stats_transaction(argv[1], request);
592     vconn_close(vconn);
593 }
594
595 static void
596 do_dump_flows(int argc, char *argv[])
597 {
598     return do_dump_flows__(argc, argv, false);
599 }
600
601 static void
602 do_dump_aggregate(int argc, char *argv[])
603 {
604     return do_dump_flows__(argc, argv, true);
605 }
606
607 static void
608 do_queue_stats(int argc, char *argv[])
609 {
610     struct ofp_queue_stats_request *req;
611     struct ofpbuf *request;
612
613     req = alloc_stats_request(sizeof *req, OFPST_QUEUE, &request);
614
615     if (argc > 2 && argv[2][0] && strcasecmp(argv[2], "all")) {
616         req->port_no = htons(str_to_port_no(argv[1], argv[2]));
617     } else {
618         req->port_no = htons(OFPP_ALL);
619     }
620     if (argc > 3 && argv[3][0] && strcasecmp(argv[3], "all")) {
621         req->queue_id = htonl(atoi(argv[3]));
622     } else {
623         req->queue_id = htonl(OFPQ_ALL);
624     }
625
626     memset(req->pad, 0, sizeof req->pad);
627
628     dump_stats_transaction(argv[1], request);
629 }
630
631 /* Sets up the flow format for a vconn that will be used to modify the flow
632  * table.  Returns the flow format used, after possibly adding an OpenFlow
633  * request to 'requests'.
634  *
635  * If 'preferred_flow_format' is -1, returns NXFF_OPENFLOW10 without modifying
636  * 'requests', since NXFF_OPENFLOW10 is the default flow format for any
637  * OpenFlow connection.
638  *
639  * If 'preferred_flow_format' is a specific format, adds a request to set that
640  * format to 'requests' and returns the format. */
641 static enum nx_flow_format
642 set_initial_format_for_flow_mod(struct list *requests)
643 {
644     if (preferred_flow_format < 0) {
645         return NXFF_OPENFLOW10;
646     } else {
647         struct ofpbuf *sff;
648
649         sff = ofputil_make_set_flow_format(preferred_flow_format);
650         list_push_back(requests, &sff->list_node);
651         return preferred_flow_format;
652     }
653 }
654
655 /* Checks that 'flow_format' is acceptable as a flow format after a flow_mod
656  * operation, given the global 'preferred_flow_format'. */
657 static void
658 check_final_format_for_flow_mod(enum nx_flow_format flow_format)
659 {
660     if (preferred_flow_format >= 0 && flow_format != preferred_flow_format) {
661         ovs_fatal(0, "flow cannot be expressed in flow format %s "
662                   "(flow format %s or better is required)",
663                   ofputil_flow_format_to_string(preferred_flow_format),
664                   ofputil_flow_format_to_string(flow_format));
665     }
666 }
667
668 static void
669 do_flow_mod__(int argc OVS_UNUSED, char *argv[], uint16_t command)
670 {
671     enum nx_flow_format flow_format;
672     struct list requests;
673     struct vconn *vconn;
674
675     list_init(&requests);
676     flow_format = set_initial_format_for_flow_mod(&requests);
677
678     parse_ofp_flow_mod_str(&requests, &flow_format, argc > 2 ? argv[2] : "",
679                            command);
680     check_final_format_for_flow_mod(flow_format);
681
682     open_vconn(argv[1], &vconn);
683     transact_multiple_noreply(vconn, &requests);
684     vconn_close(vconn);
685 }
686
687 static void
688 do_add_flow(int argc, char *argv[])
689 {
690     do_flow_mod__(argc, argv, OFPFC_ADD);
691 }
692
693 static void
694 do_add_flows(int argc OVS_UNUSED, char *argv[])
695 {
696     enum nx_flow_format flow_format;
697     struct list requests;
698     struct vconn *vconn;
699     FILE *file;
700
701     file = !strcmp(argv[2], "-") ? stdin : fopen(argv[2], "r");
702     if (file == NULL) {
703         ovs_fatal(errno, "%s: open", argv[2]);
704     }
705
706     list_init(&requests);
707     flow_format = set_initial_format_for_flow_mod(&requests);
708
709     open_vconn(argv[1], &vconn);
710     while (parse_ofp_add_flow_file(&requests, &flow_format, file)) {
711         check_final_format_for_flow_mod(flow_format);
712         transact_multiple_noreply(vconn, &requests);
713     }
714     vconn_close(vconn);
715
716     if (file != stdin) {
717         fclose(file);
718     }
719 }
720
721 static void
722 do_mod_flows(int argc, char *argv[])
723 {
724     do_flow_mod__(argc, argv, strict ? OFPFC_MODIFY_STRICT : OFPFC_MODIFY);
725 }
726
727 static void
728 do_del_flows(int argc, char *argv[])
729 {
730     do_flow_mod__(argc, argv, strict ? OFPFC_DELETE_STRICT : OFPFC_DELETE);
731 }
732
733 static void
734 monitor_vconn(struct vconn *vconn)
735 {
736     for (;;) {
737         struct ofpbuf *b;
738         run(vconn_recv_block(vconn, &b), "vconn_recv");
739         ofp_print(stderr, b->data, b->size, verbosity + 2);
740         ofpbuf_delete(b);
741     }
742 }
743
744 static void
745 do_monitor(int argc, char *argv[])
746 {
747     struct vconn *vconn;
748
749     open_vconn(argv[1], &vconn);
750     if (argc > 2) {
751         int miss_send_len = atoi(argv[2]);
752         struct ofp_switch_config *osc;
753         struct ofpbuf *buf;
754
755         osc = make_openflow(sizeof *osc, OFPT_SET_CONFIG, &buf);
756         osc->miss_send_len = htons(miss_send_len);
757         transact_noreply(vconn, buf);
758     }
759     monitor_vconn(vconn);
760 }
761
762 static void
763 do_snoop(int argc OVS_UNUSED, char *argv[])
764 {
765     struct vconn *vconn;
766
767     open_vconn__(argv[1], "snoop", &vconn);
768     monitor_vconn(vconn);
769 }
770
771 static void
772 do_dump_ports(int argc, char *argv[])
773 {
774     struct ofp_port_stats_request *req;
775     struct ofpbuf *request;
776     uint16_t port;
777
778     req = alloc_stats_request(sizeof *req, OFPST_PORT, &request);
779     port = argc > 2 ? str_to_port_no(argv[1], argv[2]) : OFPP_NONE;
780     req->port_no = htons(port);
781     dump_stats_transaction(argv[1], request);
782 }
783
784 static void
785 do_probe(int argc OVS_UNUSED, char *argv[])
786 {
787     struct ofpbuf *request;
788     struct vconn *vconn;
789     struct ofpbuf *reply;
790
791     make_openflow(sizeof(struct ofp_header), OFPT_ECHO_REQUEST, &request);
792     open_vconn(argv[1], &vconn);
793     run(vconn_transact(vconn, request, &reply), "talking to %s", argv[1]);
794     if (reply->size != sizeof(struct ofp_header)) {
795         ovs_fatal(0, "reply does not match request");
796     }
797     ofpbuf_delete(reply);
798     vconn_close(vconn);
799 }
800
801 static void
802 do_mod_port(int argc OVS_UNUSED, char *argv[])
803 {
804     struct ofp_port_mod *opm;
805     struct ofp_phy_port opp;
806     struct ofpbuf *request;
807     struct vconn *vconn;
808
809     fetch_ofp_phy_port(argv[1], argv[2], &opp);
810
811     opm = make_openflow(sizeof(struct ofp_port_mod), OFPT_PORT_MOD, &request);
812     opm->port_no = opp.port_no;
813     memcpy(opm->hw_addr, opp.hw_addr, sizeof opm->hw_addr);
814     opm->config = htonl(0);
815     opm->mask = htonl(0);
816     opm->advertise = htonl(0);
817
818     if (!strcasecmp(argv[3], "up")) {
819         opm->mask |= htonl(OFPPC_PORT_DOWN);
820     } else if (!strcasecmp(argv[3], "down")) {
821         opm->mask |= htonl(OFPPC_PORT_DOWN);
822         opm->config |= htonl(OFPPC_PORT_DOWN);
823     } else if (!strcasecmp(argv[3], "flood")) {
824         opm->mask |= htonl(OFPPC_NO_FLOOD);
825     } else if (!strcasecmp(argv[3], "noflood")) {
826         opm->mask |= htonl(OFPPC_NO_FLOOD);
827         opm->config |= htonl(OFPPC_NO_FLOOD);
828     } else {
829         ovs_fatal(0, "unknown mod-port command '%s'", argv[3]);
830     }
831
832     open_vconn(argv[1], &vconn);
833     transact_noreply(vconn, request);
834     vconn_close(vconn);
835 }
836
837 static void
838 do_ping(int argc, char *argv[])
839 {
840     size_t max_payload = 65535 - sizeof(struct ofp_header);
841     unsigned int payload;
842     struct vconn *vconn;
843     int i;
844
845     payload = argc > 2 ? atoi(argv[2]) : 64;
846     if (payload > max_payload) {
847         ovs_fatal(0, "payload must be between 0 and %zu bytes", max_payload);
848     }
849
850     open_vconn(argv[1], &vconn);
851     for (i = 0; i < 10; i++) {
852         struct timeval start, end;
853         struct ofpbuf *request, *reply;
854         struct ofp_header *rq_hdr, *rpy_hdr;
855
856         rq_hdr = make_openflow(sizeof(struct ofp_header) + payload,
857                                OFPT_ECHO_REQUEST, &request);
858         random_bytes(rq_hdr + 1, payload);
859
860         gettimeofday(&start, NULL);
861         run(vconn_transact(vconn, ofpbuf_clone(request), &reply), "transact");
862         gettimeofday(&end, NULL);
863
864         rpy_hdr = reply->data;
865         if (reply->size != request->size
866             || memcmp(rpy_hdr + 1, rq_hdr + 1, payload)
867             || rpy_hdr->xid != rq_hdr->xid
868             || rpy_hdr->type != OFPT_ECHO_REPLY) {
869             printf("Reply does not match request.  Request:\n");
870             ofp_print(stdout, request, request->size, verbosity + 2);
871             printf("Reply:\n");
872             ofp_print(stdout, reply, reply->size, verbosity + 2);
873         }
874         printf("%zu bytes from %s: xid=%08"PRIx32" time=%.1f ms\n",
875                reply->size - sizeof *rpy_hdr, argv[1], ntohl(rpy_hdr->xid),
876                    (1000*(double)(end.tv_sec - start.tv_sec))
877                    + (.001*(end.tv_usec - start.tv_usec)));
878         ofpbuf_delete(request);
879         ofpbuf_delete(reply);
880     }
881     vconn_close(vconn);
882 }
883
884 static void
885 do_benchmark(int argc OVS_UNUSED, char *argv[])
886 {
887     size_t max_payload = 65535 - sizeof(struct ofp_header);
888     struct timeval start, end;
889     unsigned int payload_size, message_size;
890     struct vconn *vconn;
891     double duration;
892     int count;
893     int i;
894
895     payload_size = atoi(argv[2]);
896     if (payload_size > max_payload) {
897         ovs_fatal(0, "payload must be between 0 and %zu bytes", max_payload);
898     }
899     message_size = sizeof(struct ofp_header) + payload_size;
900
901     count = atoi(argv[3]);
902
903     printf("Sending %d packets * %u bytes (with header) = %u bytes total\n",
904            count, message_size, count * message_size);
905
906     open_vconn(argv[1], &vconn);
907     gettimeofday(&start, NULL);
908     for (i = 0; i < count; i++) {
909         struct ofpbuf *request, *reply;
910         struct ofp_header *rq_hdr;
911
912         rq_hdr = make_openflow(message_size, OFPT_ECHO_REQUEST, &request);
913         memset(rq_hdr + 1, 0, payload_size);
914         run(vconn_transact(vconn, request, &reply), "transact");
915         ofpbuf_delete(reply);
916     }
917     gettimeofday(&end, NULL);
918     vconn_close(vconn);
919
920     duration = ((1000*(double)(end.tv_sec - start.tv_sec))
921                 + (.001*(end.tv_usec - start.tv_usec)));
922     printf("Finished in %.1f ms (%.0f packets/s) (%.0f bytes/s)\n",
923            duration, count / (duration / 1000.0),
924            count * message_size / (duration / 1000.0));
925 }
926
927 static void
928 do_help(int argc OVS_UNUSED, char *argv[] OVS_UNUSED)
929 {
930     usage();
931 }
932 \f
933 /* Undocumented commands for unit testing. */
934
935 static void
936 print_packet_list(struct list *packets)
937 {
938     struct ofpbuf *packet, *next;
939
940     LIST_FOR_EACH_SAFE (packet, next, list_node, packets) {
941         ofp_print(stdout, packet->data, packet->size, verbosity);
942         list_remove(&packet->list_node);
943         ofpbuf_delete(packet);
944     }
945 }
946
947 /* "parse-flow FLOW": parses the argument as a flow (like add-flow) and prints
948  * it back to stdout.  */
949 static void
950 do_parse_flow(int argc OVS_UNUSED, char *argv[])
951 {
952     enum nx_flow_format flow_format;
953     struct list packets;
954
955     flow_format = NXFF_OPENFLOW10;
956     if (preferred_flow_format > 0) {
957         flow_format = preferred_flow_format;
958     }
959
960     list_init(&packets);
961     parse_ofp_flow_mod_str(&packets, &flow_format, argv[1], OFPFC_ADD);
962     print_packet_list(&packets);
963 }
964
965 /* "parse-flows FILENAME": reads the named file as a sequence of flows (like
966  * add-flows) and prints each of the flows back to stdout.  */
967 static void
968 do_parse_flows(int argc OVS_UNUSED, char *argv[])
969 {
970     enum nx_flow_format flow_format;
971     struct list packets;
972     FILE *file;
973
974     file = fopen(argv[1], "r");
975     if (file == NULL) {
976         ovs_fatal(errno, "%s: open", argv[2]);
977     }
978
979     flow_format = NXFF_OPENFLOW10;
980     if (preferred_flow_format > 0) {
981         flow_format = preferred_flow_format;
982     }
983
984     list_init(&packets);
985     while (parse_ofp_add_flow_file(&packets, &flow_format, file)) {
986         print_packet_list(&packets);
987     }
988     fclose(file);
989 }
990
991 /* "parse-nx-match": reads a series of nx_match specifications as strings from
992  * stdin, does some internal fussing with them, and then prints them back as
993  * strings on stdout. */
994 static void
995 do_parse_nx_match(int argc OVS_UNUSED, char *argv[] OVS_UNUSED)
996 {
997     struct ds in;
998
999     ds_init(&in);
1000     while (!ds_get_line(&in, stdin)) {
1001         struct ofpbuf nx_match;
1002         struct cls_rule rule;
1003         int match_len;
1004         int error;
1005         char *s;
1006
1007         /* Delete comments, skip blank lines. */
1008         s = ds_cstr(&in);
1009         if (*s == '#') {
1010             puts(s);
1011             continue;
1012         }
1013         if (strchr(s, '#')) {
1014             *strchr(s, '#') = '\0';
1015         }
1016         if (s[strspn(s, " ")] == '\0') {
1017             putchar('\n');
1018             continue;
1019         }
1020
1021         /* Convert string to nx_match. */
1022         ofpbuf_init(&nx_match, 0);
1023         match_len = nx_match_from_string(ds_cstr(&in), &nx_match);
1024
1025         /* Convert nx_match to cls_rule. */
1026         error = nx_pull_match(&nx_match, match_len, 0, &rule);
1027         if (!error) {
1028             char *out;
1029
1030             /* Convert cls_rule back to nx_match. */
1031             ofpbuf_uninit(&nx_match);
1032             ofpbuf_init(&nx_match, 0);
1033             match_len = nx_put_match(&nx_match, &rule);
1034
1035             /* Convert nx_match to string. */
1036             out = nx_match_to_string(nx_match.data, match_len);
1037             puts(out);
1038             free(out);
1039         } else {
1040             printf("nx_pull_match() returned error %x\n", error);
1041         }
1042
1043         ofpbuf_uninit(&nx_match);
1044     }
1045     ds_destroy(&in);
1046 }
1047
1048 /* "ofp-print HEXSTRING [VERBOSITY]": Converts the hex digits in HEXSTRING into
1049  * binary data, interpreting them as an OpenFlow message, and prints the
1050  * OpenFlow message on stdout, at VERBOSITY (level 2 by default).  */
1051 static void
1052 do_ofp_print(int argc, char *argv[])
1053 {
1054     struct ofpbuf packet;
1055
1056     ofpbuf_init(&packet, strlen(argv[1]) / 2);
1057     if (ofpbuf_put_hex(&packet, argv[1], NULL)[0] != '\0') {
1058         ovs_fatal(0, "trailing garbage following hex bytes");
1059     }
1060     ofp_print(stdout, packet.data, packet.size, argc > 2 ? atoi(argv[2]) : 2);
1061     ofpbuf_uninit(&packet);
1062 }
1063
1064 static const struct command all_commands[] = {
1065     { "show", 1, 1, do_show },
1066     { "status", 1, 2, do_status },
1067     { "monitor", 1, 2, do_monitor },
1068     { "snoop", 1, 1, do_snoop },
1069     { "dump-desc", 1, 1, do_dump_desc },
1070     { "dump-tables", 1, 1, do_dump_tables },
1071     { "dump-flows", 1, 2, do_dump_flows },
1072     { "dump-aggregate", 1, 2, do_dump_aggregate },
1073     { "queue-stats", 1, 3, do_queue_stats },
1074     { "add-flow", 2, 2, do_add_flow },
1075     { "add-flows", 2, 2, do_add_flows },
1076     { "mod-flows", 2, 2, do_mod_flows },
1077     { "del-flows", 1, 2, do_del_flows },
1078     { "dump-ports", 1, 2, do_dump_ports },
1079     { "mod-port", 3, 3, do_mod_port },
1080     { "probe", 1, 1, do_probe },
1081     { "ping", 1, 2, do_ping },
1082     { "benchmark", 3, 3, do_benchmark },
1083     { "help", 0, INT_MAX, do_help },
1084
1085     /* Undocumented commands for testing. */
1086     { "parse-flow", 1, 1, do_parse_flow },
1087     { "parse-flows", 1, 1, do_parse_flows },
1088     { "parse-nx-match", 0, 0, do_parse_nx_match },
1089     { "ofp-print", 1, 2, do_ofp_print },
1090
1091     { NULL, 0, 0, NULL },
1092 };