Add the rt linux 4.1.3-rt3 as base
[kvmfornfv.git] / kernel / fs / ocfs2 / cluster / netdebug.c
1 /* -*- mode: c; c-basic-offset: 8; -*-
2  * vim: noexpandtab sw=8 ts=8 sts=0:
3  *
4  * netdebug.c
5  *
6  * debug functionality for o2net
7  *
8  * Copyright (C) 2005, 2008 Oracle.  All rights reserved.
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public
12  * License as published by the Free Software Foundation; either
13  * version 2 of the License, or (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18  * General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public
21  * License along with this program; if not, write to the
22  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
23  * Boston, MA 021110-1307, USA.
24  *
25  */
26
27 #ifdef CONFIG_DEBUG_FS
28
29 #include <linux/module.h>
30 #include <linux/types.h>
31 #include <linux/slab.h>
32 #include <linux/idr.h>
33 #include <linux/kref.h>
34 #include <linux/seq_file.h>
35 #include <linux/debugfs.h>
36
37 #include <linux/uaccess.h>
38
39 #include "tcp.h"
40 #include "nodemanager.h"
41 #define MLOG_MASK_PREFIX ML_TCP
42 #include "masklog.h"
43
44 #include "tcp_internal.h"
45
46 #define O2NET_DEBUG_DIR         "o2net"
47 #define SC_DEBUG_NAME           "sock_containers"
48 #define NST_DEBUG_NAME          "send_tracking"
49 #define STATS_DEBUG_NAME        "stats"
50 #define NODES_DEBUG_NAME        "connected_nodes"
51
52 #define SHOW_SOCK_CONTAINERS    0
53 #define SHOW_SOCK_STATS         1
54
55 static struct dentry *o2net_dentry;
56 static struct dentry *sc_dentry;
57 static struct dentry *nst_dentry;
58 static struct dentry *stats_dentry;
59 static struct dentry *nodes_dentry;
60
61 static DEFINE_SPINLOCK(o2net_debug_lock);
62
63 static LIST_HEAD(sock_containers);
64 static LIST_HEAD(send_tracking);
65
66 void o2net_debug_add_nst(struct o2net_send_tracking *nst)
67 {
68         spin_lock(&o2net_debug_lock);
69         list_add(&nst->st_net_debug_item, &send_tracking);
70         spin_unlock(&o2net_debug_lock);
71 }
72
73 void o2net_debug_del_nst(struct o2net_send_tracking *nst)
74 {
75         spin_lock(&o2net_debug_lock);
76         if (!list_empty(&nst->st_net_debug_item))
77                 list_del_init(&nst->st_net_debug_item);
78         spin_unlock(&o2net_debug_lock);
79 }
80
81 static struct o2net_send_tracking
82                         *next_nst(struct o2net_send_tracking *nst_start)
83 {
84         struct o2net_send_tracking *nst, *ret = NULL;
85
86         assert_spin_locked(&o2net_debug_lock);
87
88         list_for_each_entry(nst, &nst_start->st_net_debug_item,
89                             st_net_debug_item) {
90                 /* discover the head of the list */
91                 if (&nst->st_net_debug_item == &send_tracking)
92                         break;
93
94                 /* use st_task to detect real nsts in the list */
95                 if (nst->st_task != NULL) {
96                         ret = nst;
97                         break;
98                 }
99         }
100
101         return ret;
102 }
103
104 static void *nst_seq_start(struct seq_file *seq, loff_t *pos)
105 {
106         struct o2net_send_tracking *nst, *dummy_nst = seq->private;
107
108         spin_lock(&o2net_debug_lock);
109         nst = next_nst(dummy_nst);
110         spin_unlock(&o2net_debug_lock);
111
112         return nst;
113 }
114
115 static void *nst_seq_next(struct seq_file *seq, void *v, loff_t *pos)
116 {
117         struct o2net_send_tracking *nst, *dummy_nst = seq->private;
118
119         spin_lock(&o2net_debug_lock);
120         nst = next_nst(dummy_nst);
121         list_del_init(&dummy_nst->st_net_debug_item);
122         if (nst)
123                 list_add(&dummy_nst->st_net_debug_item,
124                          &nst->st_net_debug_item);
125         spin_unlock(&o2net_debug_lock);
126
127         return nst; /* unused, just needs to be null when done */
128 }
129
130 static int nst_seq_show(struct seq_file *seq, void *v)
131 {
132         struct o2net_send_tracking *nst, *dummy_nst = seq->private;
133         ktime_t now;
134         s64 sock, send, status;
135
136         spin_lock(&o2net_debug_lock);
137         nst = next_nst(dummy_nst);
138         if (!nst)
139                 goto out;
140
141         now = ktime_get();
142         sock = ktime_to_us(ktime_sub(now, nst->st_sock_time));
143         send = ktime_to_us(ktime_sub(now, nst->st_send_time));
144         status = ktime_to_us(ktime_sub(now, nst->st_status_time));
145
146         /* get_task_comm isn't exported.  oh well. */
147         seq_printf(seq, "%p:\n"
148                    "  pid:          %lu\n"
149                    "  tgid:         %lu\n"
150                    "  process name: %s\n"
151                    "  node:         %u\n"
152                    "  sc:           %p\n"
153                    "  message id:   %d\n"
154                    "  message type: %u\n"
155                    "  message key:  0x%08x\n"
156                    "  sock acquiry: %lld usecs ago\n"
157                    "  send start:   %lld usecs ago\n"
158                    "  wait start:   %lld usecs ago\n",
159                    nst, (unsigned long)task_pid_nr(nst->st_task),
160                    (unsigned long)nst->st_task->tgid,
161                    nst->st_task->comm, nst->st_node,
162                    nst->st_sc, nst->st_id, nst->st_msg_type,
163                    nst->st_msg_key,
164                    (long long)sock,
165                    (long long)send,
166                    (long long)status);
167
168 out:
169         spin_unlock(&o2net_debug_lock);
170
171         return 0;
172 }
173
174 static void nst_seq_stop(struct seq_file *seq, void *v)
175 {
176 }
177
178 static const struct seq_operations nst_seq_ops = {
179         .start = nst_seq_start,
180         .next = nst_seq_next,
181         .stop = nst_seq_stop,
182         .show = nst_seq_show,
183 };
184
185 static int nst_fop_open(struct inode *inode, struct file *file)
186 {
187         struct o2net_send_tracking *dummy_nst;
188
189         dummy_nst = __seq_open_private(file, &nst_seq_ops, sizeof(*dummy_nst));
190         if (!dummy_nst)
191                 return -ENOMEM;
192         o2net_debug_add_nst(dummy_nst);
193
194         return 0;
195 }
196
197 static int nst_fop_release(struct inode *inode, struct file *file)
198 {
199         struct seq_file *seq = file->private_data;
200         struct o2net_send_tracking *dummy_nst = seq->private;
201
202         o2net_debug_del_nst(dummy_nst);
203         return seq_release_private(inode, file);
204 }
205
206 static const struct file_operations nst_seq_fops = {
207         .open = nst_fop_open,
208         .read = seq_read,
209         .llseek = seq_lseek,
210         .release = nst_fop_release,
211 };
212
213 void o2net_debug_add_sc(struct o2net_sock_container *sc)
214 {
215         spin_lock(&o2net_debug_lock);
216         list_add(&sc->sc_net_debug_item, &sock_containers);
217         spin_unlock(&o2net_debug_lock);
218 }
219
220 void o2net_debug_del_sc(struct o2net_sock_container *sc)
221 {
222         spin_lock(&o2net_debug_lock);
223         list_del_init(&sc->sc_net_debug_item);
224         spin_unlock(&o2net_debug_lock);
225 }
226
227 struct o2net_sock_debug {
228         int dbg_ctxt;
229         struct o2net_sock_container *dbg_sock;
230 };
231
232 static struct o2net_sock_container
233                         *next_sc(struct o2net_sock_container *sc_start)
234 {
235         struct o2net_sock_container *sc, *ret = NULL;
236
237         assert_spin_locked(&o2net_debug_lock);
238
239         list_for_each_entry(sc, &sc_start->sc_net_debug_item,
240                             sc_net_debug_item) {
241                 /* discover the head of the list miscast as a sc */
242                 if (&sc->sc_net_debug_item == &sock_containers)
243                         break;
244
245                 /* use sc_page to detect real scs in the list */
246                 if (sc->sc_page != NULL) {
247                         ret = sc;
248                         break;
249                 }
250         }
251
252         return ret;
253 }
254
255 static void *sc_seq_start(struct seq_file *seq, loff_t *pos)
256 {
257         struct o2net_sock_debug *sd = seq->private;
258         struct o2net_sock_container *sc, *dummy_sc = sd->dbg_sock;
259
260         spin_lock(&o2net_debug_lock);
261         sc = next_sc(dummy_sc);
262         spin_unlock(&o2net_debug_lock);
263
264         return sc;
265 }
266
267 static void *sc_seq_next(struct seq_file *seq, void *v, loff_t *pos)
268 {
269         struct o2net_sock_debug *sd = seq->private;
270         struct o2net_sock_container *sc, *dummy_sc = sd->dbg_sock;
271
272         spin_lock(&o2net_debug_lock);
273         sc = next_sc(dummy_sc);
274         list_del_init(&dummy_sc->sc_net_debug_item);
275         if (sc)
276                 list_add(&dummy_sc->sc_net_debug_item, &sc->sc_net_debug_item);
277         spin_unlock(&o2net_debug_lock);
278
279         return sc; /* unused, just needs to be null when done */
280 }
281
282 #ifdef CONFIG_OCFS2_FS_STATS
283 # define sc_send_count(_s)              ((_s)->sc_send_count)
284 # define sc_recv_count(_s)              ((_s)->sc_recv_count)
285 # define sc_tv_acquiry_total_ns(_s)     (ktime_to_ns((_s)->sc_tv_acquiry_total))
286 # define sc_tv_send_total_ns(_s)        (ktime_to_ns((_s)->sc_tv_send_total))
287 # define sc_tv_status_total_ns(_s)      (ktime_to_ns((_s)->sc_tv_status_total))
288 # define sc_tv_process_total_ns(_s)     (ktime_to_ns((_s)->sc_tv_process_total))
289 #else
290 # define sc_send_count(_s)              (0U)
291 # define sc_recv_count(_s)              (0U)
292 # define sc_tv_acquiry_total_ns(_s)     (0LL)
293 # define sc_tv_send_total_ns(_s)        (0LL)
294 # define sc_tv_status_total_ns(_s)      (0LL)
295 # define sc_tv_process_total_ns(_s)     (0LL)
296 #endif
297
298 /* So that debugfs.ocfs2 can determine which format is being used */
299 #define O2NET_STATS_STR_VERSION         1
300 static void sc_show_sock_stats(struct seq_file *seq,
301                                struct o2net_sock_container *sc)
302 {
303         if (!sc)
304                 return;
305
306         seq_printf(seq, "%d,%u,%lu,%lld,%lld,%lld,%lu,%lld\n", O2NET_STATS_STR_VERSION,
307                    sc->sc_node->nd_num, (unsigned long)sc_send_count(sc),
308                    (long long)sc_tv_acquiry_total_ns(sc),
309                    (long long)sc_tv_send_total_ns(sc),
310                    (long long)sc_tv_status_total_ns(sc),
311                    (unsigned long)sc_recv_count(sc),
312                    (long long)sc_tv_process_total_ns(sc));
313 }
314
315 static void sc_show_sock_container(struct seq_file *seq,
316                                    struct o2net_sock_container *sc)
317 {
318         struct inet_sock *inet = NULL;
319         __be32 saddr = 0, daddr = 0;
320         __be16 sport = 0, dport = 0;
321
322         if (!sc)
323                 return;
324
325         if (sc->sc_sock) {
326                 inet = inet_sk(sc->sc_sock->sk);
327                 /* the stack's structs aren't sparse endian clean */
328                 saddr = (__force __be32)inet->inet_saddr;
329                 daddr = (__force __be32)inet->inet_daddr;
330                 sport = (__force __be16)inet->inet_sport;
331                 dport = (__force __be16)inet->inet_dport;
332         }
333
334         /* XXX sigh, inet-> doesn't have sparse annotation so any
335          * use of it here generates a warning with -Wbitwise */
336         seq_printf(seq, "%p:\n"
337                    "  krefs:           %d\n"
338                    "  sock:            %pI4:%u -> "
339                                       "%pI4:%u\n"
340                    "  remote node:     %s\n"
341                    "  page off:        %zu\n"
342                    "  handshake ok:    %u\n"
343                    "  timer:           %lld usecs\n"
344                    "  data ready:      %lld usecs\n"
345                    "  advance start:   %lld usecs\n"
346                    "  advance stop:    %lld usecs\n"
347                    "  func start:      %lld usecs\n"
348                    "  func stop:       %lld usecs\n"
349                    "  func key:        0x%08x\n"
350                    "  func type:       %u\n",
351                    sc,
352                    atomic_read(&sc->sc_kref.refcount),
353                    &saddr, inet ? ntohs(sport) : 0,
354                    &daddr, inet ? ntohs(dport) : 0,
355                    sc->sc_node->nd_name,
356                    sc->sc_page_off,
357                    sc->sc_handshake_ok,
358                    (long long)ktime_to_us(sc->sc_tv_timer),
359                    (long long)ktime_to_us(sc->sc_tv_data_ready),
360                    (long long)ktime_to_us(sc->sc_tv_advance_start),
361                    (long long)ktime_to_us(sc->sc_tv_advance_stop),
362                    (long long)ktime_to_us(sc->sc_tv_func_start),
363                    (long long)ktime_to_us(sc->sc_tv_func_stop),
364                    sc->sc_msg_key,
365                    sc->sc_msg_type);
366 }
367
368 static int sc_seq_show(struct seq_file *seq, void *v)
369 {
370         struct o2net_sock_debug *sd = seq->private;
371         struct o2net_sock_container *sc, *dummy_sc = sd->dbg_sock;
372
373         spin_lock(&o2net_debug_lock);
374         sc = next_sc(dummy_sc);
375
376         if (sc) {
377                 if (sd->dbg_ctxt == SHOW_SOCK_CONTAINERS)
378                         sc_show_sock_container(seq, sc);
379                 else
380                         sc_show_sock_stats(seq, sc);
381         }
382
383         spin_unlock(&o2net_debug_lock);
384
385         return 0;
386 }
387
388 static void sc_seq_stop(struct seq_file *seq, void *v)
389 {
390 }
391
392 static const struct seq_operations sc_seq_ops = {
393         .start = sc_seq_start,
394         .next = sc_seq_next,
395         .stop = sc_seq_stop,
396         .show = sc_seq_show,
397 };
398
399 static int sc_common_open(struct file *file, int ctxt)
400 {
401         struct o2net_sock_debug *sd;
402         struct o2net_sock_container *dummy_sc;
403
404         dummy_sc = kzalloc(sizeof(*dummy_sc), GFP_KERNEL);
405         if (!dummy_sc)
406                 return -ENOMEM;
407
408         sd = __seq_open_private(file, &sc_seq_ops, sizeof(*sd));
409         if (!sd) {
410                 kfree(dummy_sc);
411                 return -ENOMEM;
412         }
413
414         sd->dbg_ctxt = ctxt;
415         sd->dbg_sock = dummy_sc;
416
417         o2net_debug_add_sc(dummy_sc);
418
419         return 0;
420 }
421
422 static int sc_fop_release(struct inode *inode, struct file *file)
423 {
424         struct seq_file *seq = file->private_data;
425         struct o2net_sock_debug *sd = seq->private;
426         struct o2net_sock_container *dummy_sc = sd->dbg_sock;
427
428         o2net_debug_del_sc(dummy_sc);
429         return seq_release_private(inode, file);
430 }
431
432 static int stats_fop_open(struct inode *inode, struct file *file)
433 {
434         return sc_common_open(file, SHOW_SOCK_STATS);
435 }
436
437 static const struct file_operations stats_seq_fops = {
438         .open = stats_fop_open,
439         .read = seq_read,
440         .llseek = seq_lseek,
441         .release = sc_fop_release,
442 };
443
444 static int sc_fop_open(struct inode *inode, struct file *file)
445 {
446         return sc_common_open(file, SHOW_SOCK_CONTAINERS);
447 }
448
449 static const struct file_operations sc_seq_fops = {
450         .open = sc_fop_open,
451         .read = seq_read,
452         .llseek = seq_lseek,
453         .release = sc_fop_release,
454 };
455
456 static int o2net_fill_bitmap(char *buf, int len)
457 {
458         unsigned long map[BITS_TO_LONGS(O2NM_MAX_NODES)];
459         int i = -1, out = 0;
460
461         o2net_fill_node_map(map, sizeof(map));
462
463         while ((i = find_next_bit(map, O2NM_MAX_NODES, i + 1)) < O2NM_MAX_NODES)
464                 out += snprintf(buf + out, PAGE_SIZE - out, "%d ", i);
465         out += snprintf(buf + out, PAGE_SIZE - out, "\n");
466
467         return out;
468 }
469
470 static int nodes_fop_open(struct inode *inode, struct file *file)
471 {
472         char *buf;
473
474         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
475         if (!buf)
476                 return -ENOMEM;
477
478         i_size_write(inode, o2net_fill_bitmap(buf, PAGE_SIZE));
479
480         file->private_data = buf;
481
482         return 0;
483 }
484
485 static int o2net_debug_release(struct inode *inode, struct file *file)
486 {
487         kfree(file->private_data);
488         return 0;
489 }
490
491 static ssize_t o2net_debug_read(struct file *file, char __user *buf,
492                                 size_t nbytes, loff_t *ppos)
493 {
494         return simple_read_from_buffer(buf, nbytes, ppos, file->private_data,
495                                        i_size_read(file->f_mapping->host));
496 }
497
498 static const struct file_operations nodes_fops = {
499         .open           = nodes_fop_open,
500         .release        = o2net_debug_release,
501         .read           = o2net_debug_read,
502         .llseek         = generic_file_llseek,
503 };
504
505 void o2net_debugfs_exit(void)
506 {
507         debugfs_remove(nodes_dentry);
508         debugfs_remove(stats_dentry);
509         debugfs_remove(sc_dentry);
510         debugfs_remove(nst_dentry);
511         debugfs_remove(o2net_dentry);
512 }
513
514 int o2net_debugfs_init(void)
515 {
516         umode_t mode = S_IFREG|S_IRUSR;
517
518         o2net_dentry = debugfs_create_dir(O2NET_DEBUG_DIR, NULL);
519         if (o2net_dentry)
520                 nst_dentry = debugfs_create_file(NST_DEBUG_NAME, mode,
521                                         o2net_dentry, NULL, &nst_seq_fops);
522         if (nst_dentry)
523                 sc_dentry = debugfs_create_file(SC_DEBUG_NAME, mode,
524                                         o2net_dentry, NULL, &sc_seq_fops);
525         if (sc_dentry)
526                 stats_dentry = debugfs_create_file(STATS_DEBUG_NAME, mode,
527                                         o2net_dentry, NULL, &stats_seq_fops);
528         if (stats_dentry)
529                 nodes_dentry = debugfs_create_file(NODES_DEBUG_NAME, mode,
530                                         o2net_dentry, NULL, &nodes_fops);
531         if (nodes_dentry)
532                 return 0;
533
534         o2net_debugfs_exit();
535         mlog_errno(-ENOMEM);
536         return -ENOMEM;
537 }
538
539 #endif  /* CONFIG_DEBUG_FS */