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 == (TIMER_FUNC_TYPE)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 == (TIMER_FUNC_TYPE)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