ovs-ofctl: Make add-flows command read from stdin if file name is "-".
[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     int flow_format;
544
545     if (preferred_flow_format != -1) {
546         enum nx_flow_format min_format;
547
548         min_format = ofputil_min_flow_format(rule, cookie_support, cookie);
549         if (preferred_flow_format >= min_format) {
550             set_flow_format(vconn, preferred_flow_format);
551             return preferred_flow_format;
552         }
553
554         VLOG_WARN("%s: cannot use requested flow format %s for "
555                   "specified flow", vconn_get_name(vconn),
556                   ofputil_flow_format_to_string(min_format));
557     }
558
559     if (try_set_flow_format(vconn, NXFF_NXM)) {
560         flow_format = NXFF_NXM;
561     } else if (try_set_flow_format(vconn, NXFF_TUN_ID_FROM_COOKIE)) {
562         flow_format = NXFF_TUN_ID_FROM_COOKIE;
563     } else {
564         flow_format = NXFF_OPENFLOW10;
565     }
566
567     VLOG_DBG("%s: negotiated flow format %s", vconn_get_name(vconn),
568              ofputil_flow_format_to_string(flow_format));
569     return flow_format;
570 }
571
572 static void
573 do_dump_flows__(int argc, char *argv[], bool aggregate)
574 {
575     enum nx_flow_format flow_format;
576     struct flow_stats_request fsr;
577     struct ofpbuf *request;
578     struct vconn *vconn;
579
580     parse_ofp_flow_stats_request_str(&fsr, aggregate, argc > 2 ? argv[2] : "");
581
582     open_vconn(argv[1], &vconn);
583     flow_format = negotiate_highest_flow_format(vconn, &fsr.match, false, 0);
584     request = ofputil_encode_flow_stats_request(&fsr, flow_format);
585     dump_stats_transaction(argv[1], request);
586     vconn_close(vconn);
587 }
588
589 static void
590 do_dump_flows(int argc, char *argv[])
591 {
592     return do_dump_flows__(argc, argv, false);
593 }
594
595 static void
596 do_dump_aggregate(int argc, char *argv[])
597 {
598     return do_dump_flows__(argc, argv, true);
599 }
600
601 static void
602 do_queue_stats(int argc, char *argv[])
603 {
604     struct ofp_queue_stats_request *req;
605     struct ofpbuf *request;
606
607     req = alloc_stats_request(sizeof *req, OFPST_QUEUE, &request);
608
609     if (argc > 2 && argv[2][0] && strcasecmp(argv[2], "all")) {
610         req->port_no = htons(str_to_port_no(argv[1], argv[2]));
611     } else {
612         req->port_no = htons(OFPP_ALL);
613     }
614     if (argc > 3 && argv[3][0] && strcasecmp(argv[3], "all")) {
615         req->queue_id = htonl(atoi(argv[3]));
616     } else {
617         req->queue_id = htonl(OFPQ_ALL);
618     }
619
620     memset(req->pad, 0, sizeof req->pad);
621
622     dump_stats_transaction(argv[1], request);
623 }
624
625 /* Sets up the flow format for a vconn that will be used to modify the flow
626  * table.  Returns the flow format used, after possibly adding an OpenFlow
627  * request to 'requests'.
628  *
629  * If 'preferred_flow_format' is -1, returns NXFF_OPENFLOW10 without modifying
630  * 'requests', since NXFF_OPENFLOW10 is the default flow format for any
631  * OpenFlow connection.
632  *
633  * If 'preferred_flow_format' is a specific format, adds a request to set that
634  * format to 'requests' and returns the format. */
635 static enum nx_flow_format
636 set_initial_format_for_flow_mod(struct list *requests)
637 {
638     if (preferred_flow_format < 0) {
639         return NXFF_OPENFLOW10;
640     } else {
641         struct ofpbuf *sff;
642
643         sff = ofputil_make_set_flow_format(preferred_flow_format);
644         list_push_back(requests, &sff->list_node);
645         return preferred_flow_format;
646     }
647 }
648
649 /* Checks that 'flow_format' is acceptable as a flow format after a flow_mod
650  * operation, given the global 'preferred_flow_format'. */
651 static void
652 check_final_format_for_flow_mod(enum nx_flow_format flow_format)
653 {
654     if (preferred_flow_format >= 0 && flow_format != preferred_flow_format) {
655         ovs_fatal(0, "flow cannot be expressed in flow format %s "
656                   "(flow format %s or better is required)",
657                   ofputil_flow_format_to_string(preferred_flow_format),
658                   ofputil_flow_format_to_string(flow_format));
659     }
660 }
661
662 static void
663 do_flow_mod__(int argc OVS_UNUSED, char *argv[], uint16_t command)
664 {
665     enum nx_flow_format flow_format;
666     struct list requests;
667     struct vconn *vconn;
668
669     list_init(&requests);
670     flow_format = set_initial_format_for_flow_mod(&requests);
671
672     parse_ofp_flow_mod_str(&requests, &flow_format, argc > 2 ? argv[2] : "",
673                            command);
674     check_final_format_for_flow_mod(flow_format);
675
676     open_vconn(argv[1], &vconn);
677     transact_multiple_noreply(vconn, &requests);
678     vconn_close(vconn);
679 }
680
681 static void
682 do_add_flow(int argc, char *argv[])
683 {
684     do_flow_mod__(argc, argv, OFPFC_ADD);
685 }
686
687 static void
688 do_add_flows(int argc OVS_UNUSED, char *argv[])
689 {
690     enum nx_flow_format flow_format;
691     struct list requests;
692     struct vconn *vconn;
693     FILE *file;
694
695     file = !strcmp(argv[2], "-") ? stdin : fopen(argv[2], "r");
696     if (file == NULL) {
697         ovs_fatal(errno, "%s: open", argv[2]);
698     }
699
700     list_init(&requests);
701     flow_format = set_initial_format_for_flow_mod(&requests);
702
703     open_vconn(argv[1], &vconn);
704     while (parse_ofp_add_flow_file(&requests, &flow_format, file)) {
705         check_final_format_for_flow_mod(flow_format);
706         transact_multiple_noreply(vconn, &requests);
707     }
708     vconn_close(vconn);
709
710     if (file != stdin) {
711         fclose(file);
712     }
713 }
714
715 static void
716 do_mod_flows(int argc, char *argv[])
717 {
718     do_flow_mod__(argc, argv, strict ? OFPFC_MODIFY_STRICT : OFPFC_MODIFY);
719 }
720
721 static void
722 do_del_flows(int argc, char *argv[])
723 {
724     do_flow_mod__(argc, argv, strict ? OFPFC_DELETE_STRICT : OFPFC_DELETE);
725 }
726
727 static void
728 monitor_vconn(struct vconn *vconn)
729 {
730     for (;;) {
731         struct ofpbuf *b;
732         run(vconn_recv_block(vconn, &b), "vconn_recv");
733         ofp_print(stderr, b->data, b->size, verbosity + 2);
734         ofpbuf_delete(b);
735     }
736 }
737
738 static void
739 do_monitor(int argc, char *argv[])
740 {
741     struct vconn *vconn;
742
743     open_vconn(argv[1], &vconn);
744     if (argc > 2) {
745         int miss_send_len = atoi(argv[2]);
746         struct ofp_switch_config *osc;
747         struct ofpbuf *buf;
748
749         osc = make_openflow(sizeof *osc, OFPT_SET_CONFIG, &buf);
750         osc->miss_send_len = htons(miss_send_len);
751         transact_noreply(vconn, buf);
752     }
753     monitor_vconn(vconn);
754 }
755
756 static void
757 do_snoop(int argc OVS_UNUSED, char *argv[])
758 {
759     struct vconn *vconn;
760
761     open_vconn__(argv[1], "snoop", &vconn);
762     monitor_vconn(vconn);
763 }
764
765 static void
766 do_dump_ports(int argc, char *argv[])
767 {
768     struct ofp_port_stats_request *req;
769     struct ofpbuf *request;
770     uint16_t port;
771
772     req = alloc_stats_request(sizeof *req, OFPST_PORT, &request);
773     port = argc > 2 ? str_to_port_no(argv[1], argv[2]) : OFPP_NONE;
774     req->port_no = htons(port);
775     dump_stats_transaction(argv[1], request);
776 }
777
778 static void
779 do_probe(int argc OVS_UNUSED, char *argv[])
780 {
781     struct ofpbuf *request;
782     struct vconn *vconn;
783     struct ofpbuf *reply;
784
785     make_openflow(sizeof(struct ofp_header), OFPT_ECHO_REQUEST, &request);
786     open_vconn(argv[1], &vconn);
787     run(vconn_transact(vconn, request, &reply), "talking to %s", argv[1]);
788     if (reply->size != sizeof(struct ofp_header)) {
789         ovs_fatal(0, "reply does not match request");
790     }
791     ofpbuf_delete(reply);
792     vconn_close(vconn);
793 }
794
795 static void
796 do_mod_port(int argc OVS_UNUSED, char *argv[])
797 {
798     struct ofp_port_mod *opm;
799     struct ofp_phy_port opp;
800     struct ofpbuf *request;
801     struct vconn *vconn;
802
803     fetch_ofp_phy_port(argv[1], argv[2], &opp);
804
805     opm = make_openflow(sizeof(struct ofp_port_mod), OFPT_PORT_MOD, &request);
806     opm->port_no = opp.port_no;
807     memcpy(opm->hw_addr, opp.hw_addr, sizeof opm->hw_addr);
808     opm->config = htonl(0);
809     opm->mask = htonl(0);
810     opm->advertise = htonl(0);
811
812     if (!strcasecmp(argv[3], "up")) {
813         opm->mask |= htonl(OFPPC_PORT_DOWN);
814     } else if (!strcasecmp(argv[3], "down")) {
815         opm->mask |= htonl(OFPPC_PORT_DOWN);
816         opm->config |= htonl(OFPPC_PORT_DOWN);
817     } else if (!strcasecmp(argv[3], "flood")) {
818         opm->mask |= htonl(OFPPC_NO_FLOOD);
819     } else if (!strcasecmp(argv[3], "noflood")) {
820         opm->mask |= htonl(OFPPC_NO_FLOOD);
821         opm->config |= htonl(OFPPC_NO_FLOOD);
822     } else {
823         ovs_fatal(0, "unknown mod-port command '%s'", argv[3]);
824     }
825
826     open_vconn(argv[1], &vconn);
827     transact_noreply(vconn, request);
828     vconn_close(vconn);
829 }
830
831 static void
832 do_ping(int argc, char *argv[])
833 {
834     size_t max_payload = 65535 - sizeof(struct ofp_header);
835     unsigned int payload;
836     struct vconn *vconn;
837     int i;
838
839     payload = argc > 2 ? atoi(argv[2]) : 64;
840     if (payload > max_payload) {
841         ovs_fatal(0, "payload must be between 0 and %zu bytes", max_payload);
842     }
843
844     open_vconn(argv[1], &vconn);
845     for (i = 0; i < 10; i++) {
846         struct timeval start, end;
847         struct ofpbuf *request, *reply;
848         struct ofp_header *rq_hdr, *rpy_hdr;
849
850         rq_hdr = make_openflow(sizeof(struct ofp_header) + payload,
851                                OFPT_ECHO_REQUEST, &request);
852         random_bytes(rq_hdr + 1, payload);
853
854         gettimeofday(&start, NULL);
855         run(vconn_transact(vconn, ofpbuf_clone(request), &reply), "transact");
856         gettimeofday(&end, NULL);
857
858         rpy_hdr = reply->data;
859         if (reply->size != request->size
860             || memcmp(rpy_hdr + 1, rq_hdr + 1, payload)
861             || rpy_hdr->xid != rq_hdr->xid
862             || rpy_hdr->type != OFPT_ECHO_REPLY) {
863             printf("Reply does not match request.  Request:\n");
864             ofp_print(stdout, request, request->size, verbosity + 2);
865             printf("Reply:\n");
866             ofp_print(stdout, reply, reply->size, verbosity + 2);
867         }
868         printf("%zu bytes from %s: xid=%08"PRIx32" time=%.1f ms\n",
869                reply->size - sizeof *rpy_hdr, argv[1], ntohl(rpy_hdr->xid),
870                    (1000*(double)(end.tv_sec - start.tv_sec))
871                    + (.001*(end.tv_usec - start.tv_usec)));
872         ofpbuf_delete(request);
873         ofpbuf_delete(reply);
874     }
875     vconn_close(vconn);
876 }
877
878 static void
879 do_benchmark(int argc OVS_UNUSED, char *argv[])
880 {
881     size_t max_payload = 65535 - sizeof(struct ofp_header);
882     struct timeval start, end;
883     unsigned int payload_size, message_size;
884     struct vconn *vconn;
885     double duration;
886     int count;
887     int i;
888
889     payload_size = atoi(argv[2]);
890     if (payload_size > max_payload) {
891         ovs_fatal(0, "payload must be between 0 and %zu bytes", max_payload);
892     }
893     message_size = sizeof(struct ofp_header) + payload_size;
894
895     count = atoi(argv[3]);
896
897     printf("Sending %d packets * %u bytes (with header) = %u bytes total\n",
898            count, message_size, count * message_size);
899
900     open_vconn(argv[1], &vconn);
901     gettimeofday(&start, NULL);
902     for (i = 0; i < count; i++) {
903         struct ofpbuf *request, *reply;
904         struct ofp_header *rq_hdr;
905
906         rq_hdr = make_openflow(message_size, OFPT_ECHO_REQUEST, &request);
907         memset(rq_hdr + 1, 0, payload_size);
908         run(vconn_transact(vconn, request, &reply), "transact");
909         ofpbuf_delete(reply);
910     }
911     gettimeofday(&end, NULL);
912     vconn_close(vconn);
913
914     duration = ((1000*(double)(end.tv_sec - start.tv_sec))
915                 + (.001*(end.tv_usec - start.tv_usec)));
916     printf("Finished in %.1f ms (%.0f packets/s) (%.0f bytes/s)\n",
917            duration, count / (duration / 1000.0),
918            count * message_size / (duration / 1000.0));
919 }
920
921 static void
922 do_help(int argc OVS_UNUSED, char *argv[] OVS_UNUSED)
923 {
924     usage();
925 }
926 \f
927 /* Undocumented commands for unit testing. */
928
929 static void
930 print_packet_list(struct list *packets)
931 {
932     struct ofpbuf *packet, *next;
933
934     LIST_FOR_EACH_SAFE (packet, next, list_node, packets) {
935         ofp_print(stdout, packet->data, packet->size, verbosity);
936         list_remove(&packet->list_node);
937         ofpbuf_delete(packet);
938     }
939 }
940
941 /* "parse-flow FLOW": parses the argument as a flow (like add-flow) and prints
942  * it back to stdout.  */
943 static void
944 do_parse_flow(int argc OVS_UNUSED, char *argv[])
945 {
946     enum nx_flow_format flow_format;
947     struct list packets;
948
949     flow_format = NXFF_OPENFLOW10;
950     if (preferred_flow_format > 0) {
951         flow_format = preferred_flow_format;
952     }
953
954     list_init(&packets);
955     parse_ofp_flow_mod_str(&packets, &flow_format, argv[1], OFPFC_ADD);
956     print_packet_list(&packets);
957 }
958
959 /* "parse-flows FILENAME": reads the named file as a sequence of flows (like
960  * add-flows) and prints each of the flows back to stdout.  */
961 static void
962 do_parse_flows(int argc OVS_UNUSED, char *argv[])
963 {
964     enum nx_flow_format flow_format;
965     struct list packets;
966     FILE *file;
967
968     file = fopen(argv[1], "r");
969     if (file == NULL) {
970         ovs_fatal(errno, "%s: open", argv[2]);
971     }
972
973     flow_format = NXFF_OPENFLOW10;
974     if (preferred_flow_format > 0) {
975         flow_format = preferred_flow_format;
976     }
977
978     list_init(&packets);
979     while (parse_ofp_add_flow_file(&packets, &flow_format, file)) {
980         print_packet_list(&packets);
981     }
982     fclose(file);
983 }
984
985 /* "parse-nx-match": reads a series of nx_match specifications as strings from
986  * stdin, does some internal fussing with them, and then prints them back as
987  * strings on stdout. */
988 static void
989 do_parse_nx_match(int argc OVS_UNUSED, char *argv[] OVS_UNUSED)
990 {
991     struct ds in;
992
993     ds_init(&in);
994     while (!ds_get_line(&in, stdin)) {
995         struct ofpbuf nx_match;
996         struct cls_rule rule;
997         int match_len;
998         int error;
999         char *s;
1000
1001         /* Delete comments, skip blank lines. */
1002         s = ds_cstr(&in);
1003         if (*s == '#') {
1004             puts(s);
1005             continue;
1006         }
1007         if (strchr(s, '#')) {
1008             *strchr(s, '#') = '\0';
1009         }
1010         if (s[strspn(s, " ")] == '\0') {
1011             putchar('\n');
1012             continue;
1013         }
1014
1015         /* Convert string to nx_match. */
1016         ofpbuf_init(&nx_match, 0);
1017         match_len = nx_match_from_string(ds_cstr(&in), &nx_match);
1018
1019         /* Convert nx_match to cls_rule. */
1020         error = nx_pull_match(&nx_match, match_len, 0, &rule);
1021         if (!error) {
1022             char *out;
1023
1024             /* Convert cls_rule back to nx_match. */
1025             ofpbuf_uninit(&nx_match);
1026             ofpbuf_init(&nx_match, 0);
1027             match_len = nx_put_match(&nx_match, &rule);
1028
1029             /* Convert nx_match to string. */
1030             out = nx_match_to_string(nx_match.data, match_len);
1031             puts(out);
1032             free(out);
1033         } else {
1034             printf("nx_pull_match() returned error %x\n", error);
1035         }
1036
1037         ofpbuf_uninit(&nx_match);
1038     }
1039     ds_destroy(&in);
1040 }
1041
1042 /* "ofp-print HEXSTRING [VERBOSITY]": Converts the hex digits in HEXSTRING into
1043  * binary data, interpreting them as an OpenFlow message, and prints the
1044  * OpenFlow message on stdout, at VERBOSITY (level 2 by default).  */
1045 static void
1046 do_ofp_print(int argc, char *argv[])
1047 {
1048     struct ofpbuf packet;
1049
1050     ofpbuf_init(&packet, strlen(argv[1]) / 2);
1051     if (ofpbuf_put_hex(&packet, argv[1], NULL)[0] != '\0') {
1052         ovs_fatal(0, "trailing garbage following hex bytes");
1053     }
1054     ofp_print(stdout, packet.data, packet.size, argc > 2 ? atoi(argv[2]) : 2);
1055     ofpbuf_uninit(&packet);
1056 }
1057
1058 static const struct command all_commands[] = {
1059     { "show", 1, 1, do_show },
1060     { "status", 1, 2, do_status },
1061     { "monitor", 1, 2, do_monitor },
1062     { "snoop", 1, 1, do_snoop },
1063     { "dump-desc", 1, 1, do_dump_desc },
1064     { "dump-tables", 1, 1, do_dump_tables },
1065     { "dump-flows", 1, 2, do_dump_flows },
1066     { "dump-aggregate", 1, 2, do_dump_aggregate },
1067     { "queue-stats", 1, 3, do_queue_stats },
1068     { "add-flow", 2, 2, do_add_flow },
1069     { "add-flows", 2, 2, do_add_flows },
1070     { "mod-flows", 2, 2, do_mod_flows },
1071     { "del-flows", 1, 2, do_del_flows },
1072     { "dump-ports", 1, 2, do_dump_ports },
1073     { "mod-port", 3, 3, do_mod_port },
1074     { "probe", 1, 1, do_probe },
1075     { "ping", 1, 2, do_ping },
1076     { "benchmark", 3, 3, do_benchmark },
1077     { "help", 0, INT_MAX, do_help },
1078
1079     /* Undocumented commands for testing. */
1080     { "parse-flow", 1, 1, do_parse_flow },
1081     { "parse-flows", 1, 1, do_parse_flows },
1082     { "parse-nx-match", 0, 0, do_parse_nx_match },
1083     { "ofp-print", 1, 2, do_ofp_print },
1084
1085     { NULL, 0, 0, NULL },
1086 };