xref: /openbmc/linux/net/can/proc.c (revision 4a3fad70)
1 /*
2  * proc.c - procfs support for Protocol family CAN core module
3  *
4  * Copyright (c) 2002-2007 Volkswagen Group Electronic Research
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of Volkswagen nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * Alternatively, provided that this notice is retained in full, this
20  * software may be distributed under the terms of the GNU General
21  * Public License ("GPL") version 2, in which case the provisions of the
22  * GPL apply INSTEAD OF those given above.
23  *
24  * The provided data structures and external interfaces from this code
25  * are not restricted to be used by modules with a GPL compatible license.
26  *
27  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
28  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
29  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
30  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
31  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
32  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
33  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
34  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
35  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
36  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
37  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH
38  * DAMAGE.
39  *
40  */
41 
42 #include <linux/module.h>
43 #include <linux/proc_fs.h>
44 #include <linux/list.h>
45 #include <linux/rcupdate.h>
46 #include <linux/if_arp.h>
47 #include <linux/can/core.h>
48 
49 #include "af_can.h"
50 
51 /*
52  * proc filenames for the PF_CAN core
53  */
54 
55 #define CAN_PROC_VERSION     "version"
56 #define CAN_PROC_STATS       "stats"
57 #define CAN_PROC_RESET_STATS "reset_stats"
58 #define CAN_PROC_RCVLIST_ALL "rcvlist_all"
59 #define CAN_PROC_RCVLIST_FIL "rcvlist_fil"
60 #define CAN_PROC_RCVLIST_INV "rcvlist_inv"
61 #define CAN_PROC_RCVLIST_SFF "rcvlist_sff"
62 #define CAN_PROC_RCVLIST_EFF "rcvlist_eff"
63 #define CAN_PROC_RCVLIST_ERR "rcvlist_err"
64 
65 static int user_reset;
66 
67 static const char rx_list_name[][8] = {
68 	[RX_ERR] = "rx_err",
69 	[RX_ALL] = "rx_all",
70 	[RX_FIL] = "rx_fil",
71 	[RX_INV] = "rx_inv",
72 };
73 
74 /*
75  * af_can statistics stuff
76  */
77 
78 static void can_init_stats(struct net *net)
79 {
80 	struct s_stats *can_stats = net->can.can_stats;
81 	struct s_pstats *can_pstats = net->can.can_pstats;
82 	/*
83 	 * This memset function is called from a timer context (when
84 	 * can_stattimer is active which is the default) OR in a process
85 	 * context (reading the proc_fs when can_stattimer is disabled).
86 	 */
87 	memset(can_stats, 0, sizeof(struct s_stats));
88 	can_stats->jiffies_init = jiffies;
89 
90 	can_pstats->stats_reset++;
91 
92 	if (user_reset) {
93 		user_reset = 0;
94 		can_pstats->user_reset++;
95 	}
96 }
97 
98 static unsigned long calc_rate(unsigned long oldjif, unsigned long newjif,
99 			       unsigned long count)
100 {
101 	unsigned long rate;
102 
103 	if (oldjif == newjif)
104 		return 0;
105 
106 	/* see can_stat_update() - this should NEVER happen! */
107 	if (count > (ULONG_MAX / HZ)) {
108 		printk(KERN_ERR "can: calc_rate: count exceeded! %ld\n",
109 		       count);
110 		return 99999999;
111 	}
112 
113 	rate = (count * HZ) / (newjif - oldjif);
114 
115 	return rate;
116 }
117 
118 void can_stat_update(struct timer_list *t)
119 {
120 	struct net *net = from_timer(net, t, can.can_stattimer);
121 	struct s_stats *can_stats = net->can.can_stats;
122 	unsigned long j = jiffies; /* snapshot */
123 
124 	/* restart counting in timer context on user request */
125 	if (user_reset)
126 		can_init_stats(net);
127 
128 	/* restart counting on jiffies overflow */
129 	if (j < can_stats->jiffies_init)
130 		can_init_stats(net);
131 
132 	/* prevent overflow in calc_rate() */
133 	if (can_stats->rx_frames > (ULONG_MAX / HZ))
134 		can_init_stats(net);
135 
136 	/* prevent overflow in calc_rate() */
137 	if (can_stats->tx_frames > (ULONG_MAX / HZ))
138 		can_init_stats(net);
139 
140 	/* matches overflow - very improbable */
141 	if (can_stats->matches > (ULONG_MAX / 100))
142 		can_init_stats(net);
143 
144 	/* calc total values */
145 	if (can_stats->rx_frames)
146 		can_stats->total_rx_match_ratio = (can_stats->matches * 100) /
147 			can_stats->rx_frames;
148 
149 	can_stats->total_tx_rate = calc_rate(can_stats->jiffies_init, j,
150 					    can_stats->tx_frames);
151 	can_stats->total_rx_rate = calc_rate(can_stats->jiffies_init, j,
152 					    can_stats->rx_frames);
153 
154 	/* calc current values */
155 	if (can_stats->rx_frames_delta)
156 		can_stats->current_rx_match_ratio =
157 			(can_stats->matches_delta * 100) /
158 			can_stats->rx_frames_delta;
159 
160 	can_stats->current_tx_rate = calc_rate(0, HZ, can_stats->tx_frames_delta);
161 	can_stats->current_rx_rate = calc_rate(0, HZ, can_stats->rx_frames_delta);
162 
163 	/* check / update maximum values */
164 	if (can_stats->max_tx_rate < can_stats->current_tx_rate)
165 		can_stats->max_tx_rate = can_stats->current_tx_rate;
166 
167 	if (can_stats->max_rx_rate < can_stats->current_rx_rate)
168 		can_stats->max_rx_rate = can_stats->current_rx_rate;
169 
170 	if (can_stats->max_rx_match_ratio < can_stats->current_rx_match_ratio)
171 		can_stats->max_rx_match_ratio = can_stats->current_rx_match_ratio;
172 
173 	/* clear values for 'current rate' calculation */
174 	can_stats->tx_frames_delta = 0;
175 	can_stats->rx_frames_delta = 0;
176 	can_stats->matches_delta   = 0;
177 
178 	/* restart timer (one second) */
179 	mod_timer(&net->can.can_stattimer, round_jiffies(jiffies + HZ));
180 }
181 
182 /*
183  * proc read functions
184  */
185 
186 static void can_print_rcvlist(struct seq_file *m, struct hlist_head *rx_list,
187 			      struct net_device *dev)
188 {
189 	struct receiver *r;
190 
191 	hlist_for_each_entry_rcu(r, rx_list, list) {
192 		char *fmt = (r->can_id & CAN_EFF_FLAG)?
193 			"   %-5s  %08x  %08x  %pK  %pK  %8ld  %s\n" :
194 			"   %-5s     %03x    %08x  %pK  %pK  %8ld  %s\n";
195 
196 		seq_printf(m, fmt, DNAME(dev), r->can_id, r->mask,
197 				r->func, r->data, r->matches, r->ident);
198 	}
199 }
200 
201 static void can_print_recv_banner(struct seq_file *m)
202 {
203 	/*
204 	 *                  can1.  00000000  00000000  00000000
205 	 *                 .......          0  tp20
206 	 */
207 	seq_puts(m, "  device   can_id   can_mask  function"
208 			"  userdata   matches  ident\n");
209 }
210 
211 static int can_stats_proc_show(struct seq_file *m, void *v)
212 {
213 	struct net *net = m->private;
214 	struct s_stats *can_stats = net->can.can_stats;
215 	struct s_pstats *can_pstats = net->can.can_pstats;
216 
217 	seq_putc(m, '\n');
218 	seq_printf(m, " %8ld transmitted frames (TXF)\n", can_stats->tx_frames);
219 	seq_printf(m, " %8ld received frames (RXF)\n", can_stats->rx_frames);
220 	seq_printf(m, " %8ld matched frames (RXMF)\n", can_stats->matches);
221 
222 	seq_putc(m, '\n');
223 
224 	if (net->can.can_stattimer.function == can_stat_update) {
225 		seq_printf(m, " %8ld %% total match ratio (RXMR)\n",
226 				can_stats->total_rx_match_ratio);
227 
228 		seq_printf(m, " %8ld frames/s total tx rate (TXR)\n",
229 				can_stats->total_tx_rate);
230 		seq_printf(m, " %8ld frames/s total rx rate (RXR)\n",
231 				can_stats->total_rx_rate);
232 
233 		seq_putc(m, '\n');
234 
235 		seq_printf(m, " %8ld %% current match ratio (CRXMR)\n",
236 				can_stats->current_rx_match_ratio);
237 
238 		seq_printf(m, " %8ld frames/s current tx rate (CTXR)\n",
239 				can_stats->current_tx_rate);
240 		seq_printf(m, " %8ld frames/s current rx rate (CRXR)\n",
241 				can_stats->current_rx_rate);
242 
243 		seq_putc(m, '\n');
244 
245 		seq_printf(m, " %8ld %% max match ratio (MRXMR)\n",
246 				can_stats->max_rx_match_ratio);
247 
248 		seq_printf(m, " %8ld frames/s max tx rate (MTXR)\n",
249 				can_stats->max_tx_rate);
250 		seq_printf(m, " %8ld frames/s max rx rate (MRXR)\n",
251 				can_stats->max_rx_rate);
252 
253 		seq_putc(m, '\n');
254 	}
255 
256 	seq_printf(m, " %8ld current receive list entries (CRCV)\n",
257 			can_pstats->rcv_entries);
258 	seq_printf(m, " %8ld maximum receive list entries (MRCV)\n",
259 			can_pstats->rcv_entries_max);
260 
261 	if (can_pstats->stats_reset)
262 		seq_printf(m, "\n %8ld statistic resets (STR)\n",
263 				can_pstats->stats_reset);
264 
265 	if (can_pstats->user_reset)
266 		seq_printf(m, " %8ld user statistic resets (USTR)\n",
267 				can_pstats->user_reset);
268 
269 	seq_putc(m, '\n');
270 	return 0;
271 }
272 
273 static int can_stats_proc_open(struct inode *inode, struct file *file)
274 {
275 	return single_open_net(inode, file, can_stats_proc_show);
276 }
277 
278 static const struct file_operations can_stats_proc_fops = {
279 	.owner		= THIS_MODULE,
280 	.open		= can_stats_proc_open,
281 	.read		= seq_read,
282 	.llseek		= seq_lseek,
283 	.release	= single_release,
284 };
285 
286 static int can_reset_stats_proc_show(struct seq_file *m, void *v)
287 {
288 	struct net *net = m->private;
289 	struct s_pstats *can_pstats = net->can.can_pstats;
290 	struct s_stats *can_stats = net->can.can_stats;
291 
292 	user_reset = 1;
293 
294 	if (net->can.can_stattimer.function == can_stat_update) {
295 		seq_printf(m, "Scheduled statistic reset #%ld.\n",
296 				can_pstats->stats_reset + 1);
297 	} else {
298 		if (can_stats->jiffies_init != jiffies)
299 			can_init_stats(net);
300 
301 		seq_printf(m, "Performed statistic reset #%ld.\n",
302 				can_pstats->stats_reset);
303 	}
304 	return 0;
305 }
306 
307 static int can_reset_stats_proc_open(struct inode *inode, struct file *file)
308 {
309 	return single_open_net(inode, file, can_reset_stats_proc_show);
310 }
311 
312 static const struct file_operations can_reset_stats_proc_fops = {
313 	.owner		= THIS_MODULE,
314 	.open		= can_reset_stats_proc_open,
315 	.read		= seq_read,
316 	.llseek		= seq_lseek,
317 	.release	= single_release,
318 };
319 
320 static int can_version_proc_show(struct seq_file *m, void *v)
321 {
322 	seq_printf(m, "%s\n", CAN_VERSION_STRING);
323 	return 0;
324 }
325 
326 static int can_version_proc_open(struct inode *inode, struct file *file)
327 {
328 	return single_open_net(inode, file, can_version_proc_show);
329 }
330 
331 static const struct file_operations can_version_proc_fops = {
332 	.owner		= THIS_MODULE,
333 	.open		= can_version_proc_open,
334 	.read		= seq_read,
335 	.llseek		= seq_lseek,
336 	.release	= single_release,
337 };
338 
339 static inline void can_rcvlist_proc_show_one(struct seq_file *m, int idx,
340 					     struct net_device *dev,
341 					     struct dev_rcv_lists *d)
342 {
343 	if (!hlist_empty(&d->rx[idx])) {
344 		can_print_recv_banner(m);
345 		can_print_rcvlist(m, &d->rx[idx], dev);
346 	} else
347 		seq_printf(m, "  (%s: no entry)\n", DNAME(dev));
348 
349 }
350 
351 static int can_rcvlist_proc_show(struct seq_file *m, void *v)
352 {
353 	/* double cast to prevent GCC warning */
354 	int idx = (int)(long)PDE_DATA(m->file->f_inode);
355 	struct net_device *dev;
356 	struct dev_rcv_lists *d;
357 	struct net *net = m->private;
358 
359 	seq_printf(m, "\nreceive list '%s':\n", rx_list_name[idx]);
360 
361 	rcu_read_lock();
362 
363 	/* receive list for 'all' CAN devices (dev == NULL) */
364 	d = net->can.can_rx_alldev_list;
365 	can_rcvlist_proc_show_one(m, idx, NULL, d);
366 
367 	/* receive list for registered CAN devices */
368 	for_each_netdev_rcu(net, dev) {
369 		if (dev->type == ARPHRD_CAN && dev->ml_priv)
370 			can_rcvlist_proc_show_one(m, idx, dev, dev->ml_priv);
371 	}
372 
373 	rcu_read_unlock();
374 
375 	seq_putc(m, '\n');
376 	return 0;
377 }
378 
379 static int can_rcvlist_proc_open(struct inode *inode, struct file *file)
380 {
381 	return single_open_net(inode, file, can_rcvlist_proc_show);
382 }
383 
384 static const struct file_operations can_rcvlist_proc_fops = {
385 	.owner		= THIS_MODULE,
386 	.open		= can_rcvlist_proc_open,
387 	.read		= seq_read,
388 	.llseek		= seq_lseek,
389 	.release	= single_release,
390 };
391 
392 static inline void can_rcvlist_proc_show_array(struct seq_file *m,
393 					       struct net_device *dev,
394 					       struct hlist_head *rcv_array,
395 					       unsigned int rcv_array_sz)
396 {
397 	unsigned int i;
398 	int all_empty = 1;
399 
400 	/* check whether at least one list is non-empty */
401 	for (i = 0; i < rcv_array_sz; i++)
402 		if (!hlist_empty(&rcv_array[i])) {
403 			all_empty = 0;
404 			break;
405 		}
406 
407 	if (!all_empty) {
408 		can_print_recv_banner(m);
409 		for (i = 0; i < rcv_array_sz; i++) {
410 			if (!hlist_empty(&rcv_array[i]))
411 				can_print_rcvlist(m, &rcv_array[i], dev);
412 		}
413 	} else
414 		seq_printf(m, "  (%s: no entry)\n", DNAME(dev));
415 }
416 
417 static int can_rcvlist_sff_proc_show(struct seq_file *m, void *v)
418 {
419 	struct net_device *dev;
420 	struct dev_rcv_lists *d;
421 	struct net *net = m->private;
422 
423 	/* RX_SFF */
424 	seq_puts(m, "\nreceive list 'rx_sff':\n");
425 
426 	rcu_read_lock();
427 
428 	/* sff receive list for 'all' CAN devices (dev == NULL) */
429 	d = net->can.can_rx_alldev_list;
430 	can_rcvlist_proc_show_array(m, NULL, d->rx_sff, ARRAY_SIZE(d->rx_sff));
431 
432 	/* sff receive list for registered CAN devices */
433 	for_each_netdev_rcu(net, dev) {
434 		if (dev->type == ARPHRD_CAN && dev->ml_priv) {
435 			d = dev->ml_priv;
436 			can_rcvlist_proc_show_array(m, dev, d->rx_sff,
437 						    ARRAY_SIZE(d->rx_sff));
438 		}
439 	}
440 
441 	rcu_read_unlock();
442 
443 	seq_putc(m, '\n');
444 	return 0;
445 }
446 
447 static int can_rcvlist_sff_proc_open(struct inode *inode, struct file *file)
448 {
449 	return single_open_net(inode, file, can_rcvlist_sff_proc_show);
450 }
451 
452 static const struct file_operations can_rcvlist_sff_proc_fops = {
453 	.owner		= THIS_MODULE,
454 	.open		= can_rcvlist_sff_proc_open,
455 	.read		= seq_read,
456 	.llseek		= seq_lseek,
457 	.release	= single_release,
458 };
459 
460 
461 static int can_rcvlist_eff_proc_show(struct seq_file *m, void *v)
462 {
463 	struct net_device *dev;
464 	struct dev_rcv_lists *d;
465 	struct net *net = m->private;
466 
467 	/* RX_EFF */
468 	seq_puts(m, "\nreceive list 'rx_eff':\n");
469 
470 	rcu_read_lock();
471 
472 	/* eff receive list for 'all' CAN devices (dev == NULL) */
473 	d = net->can.can_rx_alldev_list;
474 	can_rcvlist_proc_show_array(m, NULL, d->rx_eff, ARRAY_SIZE(d->rx_eff));
475 
476 	/* eff receive list for registered CAN devices */
477 	for_each_netdev_rcu(net, dev) {
478 		if (dev->type == ARPHRD_CAN && dev->ml_priv) {
479 			d = dev->ml_priv;
480 			can_rcvlist_proc_show_array(m, dev, d->rx_eff,
481 						    ARRAY_SIZE(d->rx_eff));
482 		}
483 	}
484 
485 	rcu_read_unlock();
486 
487 	seq_putc(m, '\n');
488 	return 0;
489 }
490 
491 static int can_rcvlist_eff_proc_open(struct inode *inode, struct file *file)
492 {
493 	return single_open_net(inode, file, can_rcvlist_eff_proc_show);
494 }
495 
496 static const struct file_operations can_rcvlist_eff_proc_fops = {
497 	.owner		= THIS_MODULE,
498 	.open		= can_rcvlist_eff_proc_open,
499 	.read		= seq_read,
500 	.llseek		= seq_lseek,
501 	.release	= single_release,
502 };
503 
504 /*
505  * can_init_proc - create main CAN proc directory and procfs entries
506  */
507 void can_init_proc(struct net *net)
508 {
509 	/* create /proc/net/can directory */
510 	net->can.proc_dir = proc_net_mkdir(net, "can", net->proc_net);
511 
512 	if (!net->can.proc_dir) {
513 		printk(KERN_INFO "can: failed to create /proc/net/can . "
514 			   "CONFIG_PROC_FS missing?\n");
515 		return;
516 	}
517 
518 	/* own procfs entries from the AF_CAN core */
519 	net->can.pde_version     = proc_create(CAN_PROC_VERSION, 0644,
520 					       net->can.proc_dir,
521 					       &can_version_proc_fops);
522 	net->can.pde_stats       = proc_create(CAN_PROC_STATS, 0644,
523 					       net->can.proc_dir,
524 					       &can_stats_proc_fops);
525 	net->can.pde_reset_stats = proc_create(CAN_PROC_RESET_STATS, 0644,
526 					       net->can.proc_dir,
527 					       &can_reset_stats_proc_fops);
528 	net->can.pde_rcvlist_err = proc_create_data(CAN_PROC_RCVLIST_ERR, 0644,
529 						    net->can.proc_dir,
530 						    &can_rcvlist_proc_fops,
531 						    (void *)RX_ERR);
532 	net->can.pde_rcvlist_all = proc_create_data(CAN_PROC_RCVLIST_ALL, 0644,
533 						    net->can.proc_dir,
534 						    &can_rcvlist_proc_fops,
535 						    (void *)RX_ALL);
536 	net->can.pde_rcvlist_fil = proc_create_data(CAN_PROC_RCVLIST_FIL, 0644,
537 						    net->can.proc_dir,
538 						    &can_rcvlist_proc_fops,
539 						    (void *)RX_FIL);
540 	net->can.pde_rcvlist_inv = proc_create_data(CAN_PROC_RCVLIST_INV, 0644,
541 						    net->can.proc_dir,
542 						    &can_rcvlist_proc_fops,
543 						    (void *)RX_INV);
544 	net->can.pde_rcvlist_eff = proc_create(CAN_PROC_RCVLIST_EFF, 0644,
545 					       net->can.proc_dir,
546 					       &can_rcvlist_eff_proc_fops);
547 	net->can.pde_rcvlist_sff = proc_create(CAN_PROC_RCVLIST_SFF, 0644,
548 					       net->can.proc_dir,
549 					       &can_rcvlist_sff_proc_fops);
550 }
551 
552 /*
553  * can_remove_proc - remove procfs entries and main CAN proc directory
554  */
555 void can_remove_proc(struct net *net)
556 {
557 	if (net->can.pde_version)
558 		remove_proc_entry(CAN_PROC_VERSION, net->can.proc_dir);
559 
560 	if (net->can.pde_stats)
561 		remove_proc_entry(CAN_PROC_STATS, net->can.proc_dir);
562 
563 	if (net->can.pde_reset_stats)
564 		remove_proc_entry(CAN_PROC_RESET_STATS, net->can.proc_dir);
565 
566 	if (net->can.pde_rcvlist_err)
567 		remove_proc_entry(CAN_PROC_RCVLIST_ERR, net->can.proc_dir);
568 
569 	if (net->can.pde_rcvlist_all)
570 		remove_proc_entry(CAN_PROC_RCVLIST_ALL, net->can.proc_dir);
571 
572 	if (net->can.pde_rcvlist_fil)
573 		remove_proc_entry(CAN_PROC_RCVLIST_FIL, net->can.proc_dir);
574 
575 	if (net->can.pde_rcvlist_inv)
576 		remove_proc_entry(CAN_PROC_RCVLIST_INV, net->can.proc_dir);
577 
578 	if (net->can.pde_rcvlist_eff)
579 		remove_proc_entry(CAN_PROC_RCVLIST_EFF, net->can.proc_dir);
580 
581 	if (net->can.pde_rcvlist_sff)
582 		remove_proc_entry(CAN_PROC_RCVLIST_SFF, net->can.proc_dir);
583 
584 	if (net->can.proc_dir)
585 		remove_proc_entry("can", net->proc_net);
586 }
587