xref: /openbmc/linux/fs/ocfs2/cluster/netdebug.c (revision ef2b56df)
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 		   kref_read(&sc->sc_kref),
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 	kfree(dummy_sc);
430 	return seq_release_private(inode, file);
431 }
432 
433 static int stats_fop_open(struct inode *inode, struct file *file)
434 {
435 	return sc_common_open(file, SHOW_SOCK_STATS);
436 }
437 
438 static const struct file_operations stats_seq_fops = {
439 	.open = stats_fop_open,
440 	.read = seq_read,
441 	.llseek = seq_lseek,
442 	.release = sc_fop_release,
443 };
444 
445 static int sc_fop_open(struct inode *inode, struct file *file)
446 {
447 	return sc_common_open(file, SHOW_SOCK_CONTAINERS);
448 }
449 
450 static const struct file_operations sc_seq_fops = {
451 	.open = sc_fop_open,
452 	.read = seq_read,
453 	.llseek = seq_lseek,
454 	.release = sc_fop_release,
455 };
456 
457 static int o2net_fill_bitmap(char *buf, int len)
458 {
459 	unsigned long map[BITS_TO_LONGS(O2NM_MAX_NODES)];
460 	int i = -1, out = 0;
461 
462 	o2net_fill_node_map(map, sizeof(map));
463 
464 	while ((i = find_next_bit(map, O2NM_MAX_NODES, i + 1)) < O2NM_MAX_NODES)
465 		out += snprintf(buf + out, PAGE_SIZE - out, "%d ", i);
466 	out += snprintf(buf + out, PAGE_SIZE - out, "\n");
467 
468 	return out;
469 }
470 
471 static int nodes_fop_open(struct inode *inode, struct file *file)
472 {
473 	char *buf;
474 
475 	buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
476 	if (!buf)
477 		return -ENOMEM;
478 
479 	i_size_write(inode, o2net_fill_bitmap(buf, PAGE_SIZE));
480 
481 	file->private_data = buf;
482 
483 	return 0;
484 }
485 
486 static int o2net_debug_release(struct inode *inode, struct file *file)
487 {
488 	kfree(file->private_data);
489 	return 0;
490 }
491 
492 static ssize_t o2net_debug_read(struct file *file, char __user *buf,
493 				size_t nbytes, loff_t *ppos)
494 {
495 	return simple_read_from_buffer(buf, nbytes, ppos, file->private_data,
496 				       i_size_read(file->f_mapping->host));
497 }
498 
499 static const struct file_operations nodes_fops = {
500 	.open		= nodes_fop_open,
501 	.release	= o2net_debug_release,
502 	.read		= o2net_debug_read,
503 	.llseek		= generic_file_llseek,
504 };
505 
506 void o2net_debugfs_exit(void)
507 {
508 	debugfs_remove(nodes_dentry);
509 	debugfs_remove(stats_dentry);
510 	debugfs_remove(sc_dentry);
511 	debugfs_remove(nst_dentry);
512 	debugfs_remove(o2net_dentry);
513 }
514 
515 int o2net_debugfs_init(void)
516 {
517 	umode_t mode = S_IFREG|S_IRUSR;
518 
519 	o2net_dentry = debugfs_create_dir(O2NET_DEBUG_DIR, NULL);
520 	if (o2net_dentry)
521 		nst_dentry = debugfs_create_file(NST_DEBUG_NAME, mode,
522 					o2net_dentry, NULL, &nst_seq_fops);
523 	if (nst_dentry)
524 		sc_dentry = debugfs_create_file(SC_DEBUG_NAME, mode,
525 					o2net_dentry, NULL, &sc_seq_fops);
526 	if (sc_dentry)
527 		stats_dentry = debugfs_create_file(STATS_DEBUG_NAME, mode,
528 					o2net_dentry, NULL, &stats_seq_fops);
529 	if (stats_dentry)
530 		nodes_dentry = debugfs_create_file(NODES_DEBUG_NAME, mode,
531 					o2net_dentry, NULL, &nodes_fops);
532 	if (nodes_dentry)
533 		return 0;
534 
535 	o2net_debugfs_exit();
536 	mlog_errno(-ENOMEM);
537 	return -ENOMEM;
538 }
539 
540 #endif	/* CONFIG_DEBUG_FS */
541