Merge citrix branch into master.
[sliver-openvswitch.git] / ofproto / status.c
1 /*
2  * Copyright (c) 2008, 2009 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 "status.h"
19 #include <arpa/inet.h>
20 #include <assert.h>
21 #include <errno.h>
22 #include <inttypes.h>
23 #include <stdlib.h>
24 #include <unistd.h>
25 #include "dynamic-string.h"
26 #include "list.h"
27 #include "ofpbuf.h"
28 #include "ofproto.h"
29 #include "openflow/nicira-ext.h"
30 #include "packets.h"
31 #include "rconn.h"
32 #include "svec.h"
33 #include "timeval.h"
34 #include "vconn.h"
35
36 #define THIS_MODULE VLM_status
37 #include "vlog.h"
38
39 struct status_category {
40     struct list node;
41     char *name;
42     void (*cb)(struct status_reply *, void *aux);
43     void *aux;
44 };
45
46 struct switch_status {
47     time_t booted;
48     struct status_category *config_cat;
49     struct status_category *switch_cat;
50     struct list categories;
51 };
52
53 struct status_reply {
54     struct status_category *category;
55     struct ds request;
56     struct ds output;
57 };
58
59 int
60 switch_status_handle_request(struct switch_status *ss, struct rconn *rconn,
61                              struct nicira_header *request)
62 {
63     struct status_category *c;
64     struct nicira_header *reply;
65     struct status_reply sr;
66     struct ofpbuf *b;
67     int retval;
68
69     sr.request.string = (void *) (request + 1);
70     sr.request.length = ntohs(request->header.length) - sizeof *request;
71     ds_init(&sr.output);
72     LIST_FOR_EACH (c, struct status_category, node, &ss->categories) {
73         if (!memcmp(c->name, sr.request.string,
74                     MIN(strlen(c->name), sr.request.length))) {
75             sr.category = c;
76             c->cb(&sr, c->aux);
77         }
78     }
79     reply = make_openflow_xid(sizeof *reply + sr.output.length,
80                               OFPT_VENDOR, request->header.xid, &b);
81     reply->vendor = htonl(NX_VENDOR_ID);
82     reply->subtype = htonl(NXT_STATUS_REPLY);
83     memcpy(reply + 1, sr.output.string, sr.output.length);
84     retval = rconn_send(rconn, b, NULL);
85     if (retval && retval != EAGAIN) {
86         VLOG_WARN("send failed (%s)", strerror(retval));
87     }
88     ds_destroy(&sr.output);
89     return 0;
90 }
91
92 void
93 rconn_status_cb(struct status_reply *sr, void *rconn_)
94 {
95     struct rconn *rconn = rconn_;
96     time_t now = time_now();
97     uint32_t remote_ip = rconn_get_remote_ip(rconn);
98     uint32_t local_ip = rconn_get_local_ip(rconn);
99
100     status_reply_put(sr, "name=%s", rconn_get_name(rconn));
101     if (remote_ip) {
102         status_reply_put(sr, "remote-ip="IP_FMT, IP_ARGS(&remote_ip));
103         status_reply_put(sr, "remote-port=%d", 
104                          ntohs(rconn_get_remote_port(rconn)));
105         status_reply_put(sr, "local-ip="IP_FMT, IP_ARGS(&local_ip));
106         status_reply_put(sr, "local-port=%d", 
107                          ntohs(rconn_get_local_port(rconn)));
108     }
109     status_reply_put(sr, "state=%s", rconn_get_state(rconn));
110     status_reply_put(sr, "backoff=%d", rconn_get_backoff(rconn));
111     status_reply_put(sr, "probe-interval=%d", rconn_get_probe_interval(rconn));
112     status_reply_put(sr, "is-connected=%s",
113                      rconn_is_connected(rconn) ? "true" : "false");
114     status_reply_put(sr, "sent-msgs=%u", rconn_packets_sent(rconn));
115     status_reply_put(sr, "received-msgs=%u", rconn_packets_received(rconn));
116     status_reply_put(sr, "attempted-connections=%u",
117                      rconn_get_attempted_connections(rconn));
118     status_reply_put(sr, "successful-connections=%u",
119                      rconn_get_successful_connections(rconn));
120     status_reply_put(sr, "last-connection=%ld",
121                      (long int) (now - rconn_get_last_connection(rconn)));
122     status_reply_put(sr, "last-received=%ld",
123                      (long int) (now - rconn_get_last_received(rconn)));
124     status_reply_put(sr, "time-connected=%lu",
125                      rconn_get_total_time_connected(rconn));
126     status_reply_put(sr, "state-elapsed=%u", rconn_get_state_elapsed(rconn));
127 }
128
129 static void
130 config_status_cb(struct status_reply *sr, void *ofproto_)
131 {
132     const struct ofproto *ofproto = ofproto_;
133     uint64_t datapath_id, mgmt_id;
134     struct svec listeners;
135     int probe_interval, max_backoff;
136     size_t i;
137
138     datapath_id = ofproto_get_datapath_id(ofproto);
139     if (datapath_id) {
140         status_reply_put(sr, "datapath-id=%"PRIx64, datapath_id);
141     }
142
143     mgmt_id = ofproto_get_mgmt_id(ofproto);
144     if (mgmt_id) {
145         status_reply_put(sr, "mgmt-id=%"PRIx64, mgmt_id);
146     }
147
148     svec_init(&listeners);
149     ofproto_get_listeners(ofproto, &listeners);
150     for (i = 0; i < listeners.n; i++) {
151         status_reply_put(sr, "management%zu=%s", i, listeners.names[i]);
152     }
153     svec_destroy(&listeners);
154
155     probe_interval = ofproto_get_probe_interval(ofproto);
156     if (probe_interval) {
157         status_reply_put(sr, "probe-interval=%d", probe_interval);
158     }
159
160     max_backoff = ofproto_get_max_backoff(ofproto);
161     if (max_backoff) {
162         status_reply_put(sr, "max-backoff=%d", max_backoff);
163     }
164 }
165
166 static void
167 switch_status_cb(struct status_reply *sr, void *ss_)
168 {
169     struct switch_status *ss = ss_;
170     time_t now = time_now();
171
172     status_reply_put(sr, "now=%ld", (long int) now);
173     status_reply_put(sr, "uptime=%ld", (long int) (now - ss->booted));
174     status_reply_put(sr, "pid=%ld", (long int) getpid());
175 }
176
177 struct switch_status *
178 switch_status_create(const struct ofproto *ofproto)
179 {
180     struct switch_status *ss = xcalloc(1, sizeof *ss);
181     ss->booted = time_now();
182     list_init(&ss->categories);
183     ss->config_cat = switch_status_register(ss, "config", config_status_cb,
184                                             (void *) ofproto);
185     ss->switch_cat = switch_status_register(ss, "switch", switch_status_cb,
186                                             ss);
187     return ss;
188 }
189
190 void
191 switch_status_destroy(struct switch_status *ss)
192 {
193     if (ss) {
194         /* Orphan any remaining categories, so that unregistering them later
195          * won't write to bad memory. */
196         struct status_category *c, *next;
197         LIST_FOR_EACH_SAFE (c, next,
198                             struct status_category, node, &ss->categories) {
199             list_init(&c->node);
200         }
201         switch_status_unregister(ss->config_cat);
202         switch_status_unregister(ss->switch_cat);
203         free(ss);
204     }
205 }
206
207 struct status_category *
208 switch_status_register(struct switch_status *ss,
209                        const char *category,
210                        status_cb_func *cb, void *aux)
211 {
212     struct status_category *c = xmalloc(sizeof *c);
213     c->cb = cb;
214     c->aux = aux;
215     c->name = xstrdup(category);
216     list_push_back(&ss->categories, &c->node);
217     return c;
218 }
219
220 void
221 switch_status_unregister(struct status_category *c)
222 {
223     if (c) {
224         if (!list_is_empty(&c->node)) {
225             list_remove(&c->node);
226         }
227         free(c->name);
228         free(c);
229     }
230 }
231
232 void
233 status_reply_put(struct status_reply *sr, const char *content, ...)
234 {
235     size_t old_length = sr->output.length;
236     size_t added;
237     va_list args;
238
239     /* Append the status reply to the output. */
240     ds_put_format(&sr->output, "%s.", sr->category->name);
241     va_start(args, content);
242     ds_put_format_valist(&sr->output, content, args);
243     va_end(args);
244     if (ds_last(&sr->output) != '\n') {
245         ds_put_char(&sr->output, '\n');
246     }
247
248     /* Drop what we just added if it doesn't match the request. */
249     added = sr->output.length - old_length;
250     if (added < sr->request.length
251         || memcmp(&sr->output.string[old_length],
252                   sr->request.string, sr->request.length)) {
253         ds_truncate(&sr->output, old_length);
254     }
255 }