net/atm/proc.c

   1 /* net/atm/proc.c - ATM /proc interface
   2  *
   3  * Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA
   4  *
   5  * seq_file api usage by romieu@fr.zoreil.com
   6  *
   7  * Evaluating the efficiency of the whole thing if left as an exercise to
   8  * the reader.
   9  */
  10
  11 #include <linux/config.h>
  12 #include <linux/module.h> /* for EXPORT_SYMBOL */
  13 #include <linux/string.h>
  14 #include <linux/types.h>
  15 #include <linux/mm.h>
  16 #include <linux/fs.h>
  17 #include <linux/stat.h>
  18 #include <linux/proc_fs.h>
  19 #include <linux/seq_file.h>
  20 #include <linux/errno.h>
  21 #include <linux/atm.h>
  22 #include <linux/atmdev.h>
  23 #include <linux/netdevice.h>
  24 #include <linux/atmclip.h>
  25 #include <linux/init.h> /* for __init */
  26 #include <net/atmclip.h>
  27 #include <asm/uaccess.h>
  28 #include <asm/atomic.h>
  29 #include <asm/param.h> /* for HZ */
  30 #include "resources.h"
  31 #include "common.h" /* atm_proc_init prototype */
  32 #include "signaling.h" /* to get sigd - ugly too */
  33
  34 static ssize_t proc_dev_atm_read(struct file *file,char __user *buf,size_t count,
  35     loff_t *pos);
  36
  37 static struct file_operations proc_atm_dev_ops = {
  38         .owner =        THIS_MODULE,
  39         .read =         proc_dev_atm_read,
  40 };
  41
  42 static void add_stats(struct seq_file *seq, const char *aal,
  43   const struct k_atm_aal_stats *stats)
  44 {
  45         seq_printf(seq, "%s ( %d %d %d %d %d )", aal,
  46             atomic_read(&stats->tx),atomic_read(&stats->tx_err),
  47             atomic_read(&stats->rx),atomic_read(&stats->rx_err),
  48             atomic_read(&stats->rx_drop));
  49 }
  50
  51 static void atm_dev_info(struct seq_file *seq, const struct atm_dev *dev)
  52 {
  53         int i;
  54
  55         seq_printf(seq, "%3d %-8s", dev->number, dev->type);
  56         for (i = 0; i < ESI_LEN; i++)
  57                 seq_printf(seq, "%02x", dev->esi[i]);
  58         seq_puts(seq, "  ");
  59         add_stats(seq, "0", &dev->stats.aal0);
  60         seq_puts(seq, "  ");
  61         add_stats(seq, "5", &dev->stats.aal5);
  62         seq_printf(seq, "\t[%d]", atomic_read(&dev->refcnt));
  63         seq_putc(seq, '\n');
  64 }
  65
  66 struct vcc_state {
  67         int bucket;
  68         struct sock *sk;
  69         int family;
  70 };
  71
  72 static inline int compare_family(struct sock *sk, int family)
  73 {
  74         struct atm_vcc *vcc = atm_sk(sk);
  75
  76         return !family || (vcc->sk->sk_family == family);
  77 }
  78
  79 static int __vcc_walk(struct sock **sock, int family, int *bucket, loff_t l)
  80 {
  81         struct sock *sk = *sock;
  82
  83         if (sk == (void *)1) {
  84                 for (*bucket = 0; *bucket < VCC_HTABLE_SIZE; ++*bucket) {
  85                         struct hlist_head *head = &vcc_hash[*bucket];
  86
  87                         sk = hlist_empty(head) ? NULL : __sk_head(head);
  88                         if (sk)
  89                                 break;
  90                 }
  91                 l--;
  92         }
  93 try_again:
  94         for (; sk; sk = sk_next(sk)) {
  95                 l -= compare_family(sk, family);
  96                 if (l < 0)
  97                         goto out;
  98         }
  99         if (!sk && ++*bucket < VCC_HTABLE_SIZE) {
 100                 sk = sk_head(&vcc_hash[*bucket]);
 101                 goto try_again;
 102         }
 103         sk = (void *)1;
 104 out:
 105         *sock = sk;
 106         return (l < 0);
 107 }
 108
 109 static inline void *vcc_walk(struct vcc_state *state, loff_t l)
 110 {
 111         return __vcc_walk(&state->sk, state->family, &state->bucket, l) ?
 112                state : NULL;
 113 }
 114
 115 static int __vcc_seq_open(struct inode *inode, struct file *file,
 116         int family, struct seq_operations *ops)
 117 {
 118         struct vcc_state *state;
 119         struct seq_file *seq;
 120         int rc = -ENOMEM;
 121
 122         state = kmalloc(sizeof(*state), GFP_KERNEL);
 123         if (!state)
 124                 goto out;
 125
 126         rc = seq_open(file, ops);
 127         if (rc)
 128                 goto out_kfree;
 129
 130         state->family = family;
 131
 132         seq = file->private_data;
 133         seq->private = state;
 134 out:
 135         return rc;
 136 out_kfree:
 137         kfree(state);
 138         goto out;
 139 }
 140
 141 static int vcc_seq_release(struct inode *inode, struct file *file)
 142 {
 143         return seq_release_private(inode, file);
 144 }
 145
 146 static void *vcc_seq_start(struct seq_file *seq, loff_t *pos)
 147 {
 148         struct vcc_state *state = seq->private;
 149         loff_t left = *pos;
 150
 151         read_lock(&vcc_sklist_lock);
 152         state->sk = (void *)1;
 153         return left ? vcc_walk(state, left) : (void *)1;
 154 }
 155
 156 static void vcc_seq_stop(struct seq_file *seq, void *v)
 157 {
 158         read_unlock(&vcc_sklist_lock);
 159 }
 160
 161 static void *vcc_seq_next(struct seq_file *seq, void *v, loff_t *pos)
 162 {
 163         struct vcc_state *state = seq->private;
 164
 165         v = vcc_walk(state, 1);
 166         *pos += !!PTR_ERR(v);
 167         return v;
 168 }
 169
 170 static void pvc_info(struct seq_file *seq, struct atm_vcc *vcc)
 171 {
 172         static const char *class_name[] = { "off","UBR","CBR","VBR","ABR" };
 173         static const char *aal_name[] = {
 174                 "---",  "1",    "2",    "3/4",  /*  0- 3 */
 175                 "???",  "5",    "???",  "???",  /*  4- 7 */
 176                 "???",  "???",  "???",  "???",  /*  8-11 */
 177                 "???",  "0",    "???",  "???"}; /* 12-15 */
 178
 179         seq_printf(seq, "%3d %3d %5d %-3s %7d %-5s %7d %-6s",
 180             vcc->dev->number,vcc->vpi,vcc->vci,
 181             vcc->qos.aal >= sizeof(aal_name)/sizeof(aal_name[0]) ? "err" :
 182             aal_name[vcc->qos.aal],vcc->qos.rxtp.min_pcr,
 183             class_name[vcc->qos.rxtp.traffic_class],vcc->qos.txtp.min_pcr,
 184             class_name[vcc->qos.txtp.traffic_class]);
 185         if (test_bit(ATM_VF_IS_CLIP, &vcc->flags)) {
 186                 struct clip_vcc *clip_vcc = CLIP_VCC(vcc);
 187                 struct net_device *dev;
 188
 189                 dev = clip_vcc->entry ? clip_vcc->entry->neigh->dev : NULL;
 190                 seq_printf(seq, "CLIP, Itf:%s, Encap:",
 191                     dev ? dev->name : "none?");
 192                 seq_printf(seq, "%s", clip_vcc->encap ? "LLC/SNAP" : "None");
 193         }
 194         seq_putc(seq, '\n');
 195 }
 196
 197 static const char *vcc_state(struct atm_vcc *vcc)
 198 {
 199         static const char *map[] = { ATM_VS2TXT_MAP };
 200
 201         return map[ATM_VF2VS(vcc->flags)];
 202 }
 203
 204 static void vcc_info(struct seq_file *seq, struct atm_vcc *vcc)
 205 {
 206         seq_printf(seq, "%p ", vcc);
 207         if (!vcc->dev)
 208                 seq_printf(seq, "Unassigned    ");
 209         else
 210                 seq_printf(seq, "%3d %3d %5d ", vcc->dev->number, vcc->vpi,
 211                         vcc->vci);
 212         switch (vcc->sk->sk_family) {
 213                 case AF_ATMPVC:
 214                         seq_printf(seq, "PVC");
 215                         break;
 216                 case AF_ATMSVC:
 217                         seq_printf(seq, "SVC");
 218                         break;
 219                 default:
 220                         seq_printf(seq, "%3d", vcc->sk->sk_family);
 221         }
 222         seq_printf(seq, " %04lx  %5d %7d/%7d %7d/%7d [%d]\n", vcc->flags, vcc->sk->sk_err,
 223                 atomic_read(&vcc->sk->sk_wmem_alloc),vcc->sk->sk_sndbuf,
 224                 atomic_read(&vcc->sk->sk_rmem_alloc),vcc->sk->sk_rcvbuf,
 225                 atomic_read(&vcc->sk->sk_refcnt));
 226 }
 227
 228 static void svc_info(struct seq_file *seq, struct atm_vcc *vcc)
 229 {
 230         if (!vcc->dev)
 231                 seq_printf(seq, sizeof(void *) == 4 ?
 232                            "N/A@%p%10s" : "N/A@%p%2s", vcc, "");
 233         else
 234                 seq_printf(seq, "%3d %3d %5d         ",
 235                            vcc->dev->number, vcc->vpi, vcc->vci);
 236         seq_printf(seq, "%-10s ", vcc_state(vcc));
 237         seq_printf(seq, "%s%s", vcc->remote.sas_addr.pub,
 238             *vcc->remote.sas_addr.pub && *vcc->remote.sas_addr.prv ? "+" : "");
 239         if (*vcc->remote.sas_addr.prv) {
 240                 int i;
 241
 242                 for (i = 0; i < ATM_ESA_LEN; i++)
 243                         seq_printf(seq, "%02x", vcc->remote.sas_addr.prv[i]);
 244         }
 245         seq_putc(seq, '\n');
 246 }
 247
 248 static int atm_dev_seq_show(struct seq_file *seq, void *v)
 249 {
 250         static char atm_dev_banner[] =
 251                 "Itf Type    ESI/\"MAC\"addr "
 252                 "AAL(TX,err,RX,err,drop) ...               [refcnt]\n";
 253
 254         if (v == (void *)1)
 255                 seq_puts(seq, atm_dev_banner);
 256         else {
 257                 struct atm_dev *dev = list_entry(v, struct atm_dev, dev_list);
 258
 259                 atm_dev_info(seq, dev);
 260         }
 261         return 0;
 262 }
 263
 264 static struct seq_operations atm_dev_seq_ops = {
 265         .start  = atm_dev_seq_start,
 266         .next   = atm_dev_seq_next,
 267         .stop   = atm_dev_seq_stop,
 268         .show   = atm_dev_seq_show,
 269 };
 270
 271 static int atm_dev_seq_open(struct inode *inode, struct file *file)
 272 {
 273         return seq_open(file, &atm_dev_seq_ops);
 274 }
 275
 276 static struct file_operations devices_seq_fops = {
 277         .open           = atm_dev_seq_open,
 278         .read           = seq_read,
 279         .llseek         = seq_lseek,
 280         .release        = seq_release,
 281 };
 282
 283 static int pvc_seq_show(struct seq_file *seq, void *v)
 284 {
 285         static char atm_pvc_banner[] =
 286                 "Itf VPI VCI   AAL RX(PCR,Class) TX(PCR,Class)\n";
 287
 288         if (v == (void *)1)
 289                 seq_puts(seq, atm_pvc_banner);
 290         else {
 291                 struct vcc_state *state = seq->private;
 292                 struct atm_vcc *vcc = atm_sk(state->sk);
 293
 294                 pvc_info(seq, vcc);
 295         }
 296         return 0;
 297 }
 298
 299 static struct seq_operations pvc_seq_ops = {
 300         .start  = vcc_seq_start,
 301         .next   = vcc_seq_next,
 302         .stop   = vcc_seq_stop,
 303         .show   = pvc_seq_show,
 304 };
 305
 306 static int pvc_seq_open(struct inode *inode, struct file *file)
 307 {
 308         return __vcc_seq_open(inode, file, PF_ATMPVC, &pvc_seq_ops);
 309 }
 310
 311 static struct file_operations pvc_seq_fops = {
 312         .open           = pvc_seq_open,
 313         .read           = seq_read,
 314         .llseek         = seq_lseek,
 315         .release        = vcc_seq_release,
 316 };
 317
 318 static int vcc_seq_show(struct seq_file *seq, void *v)
 319 {
 320         if (v == (void *)1) {
 321                 seq_printf(seq, sizeof(void *) == 4 ? "%-8s%s" : "%-16s%s",
 322                         "Address ", "Itf VPI VCI   Fam Flags Reply "
 323                         "Send buffer     Recv buffer      [refcnt]\n");
 324         } else {
 325                 struct vcc_state *state = seq->private;
 326                 struct atm_vcc *vcc = atm_sk(state->sk);
 327
 328                 vcc_info(seq, vcc);
 329         }
 330         return 0;
 331 }
 332
 333 static struct seq_operations vcc_seq_ops = {
 334         .start  = vcc_seq_start,
 335         .next   = vcc_seq_next,
 336         .stop   = vcc_seq_stop,
 337         .show   = vcc_seq_show,
 338 };
 339
 340 static int vcc_seq_open(struct inode *inode, struct file *file)
 341 {
 342         return __vcc_seq_open(inode, file, 0, &vcc_seq_ops);
 343 }
 344
 345 static struct file_operations vcc_seq_fops = {
 346         .open           = vcc_seq_open,
 347         .read           = seq_read,
 348         .llseek         = seq_lseek,
 349         .release        = vcc_seq_release,
 350 };
 351
 352 static int svc_seq_show(struct seq_file *seq, void *v)
 353 {
 354         static char atm_svc_banner[] =
 355                 "Itf VPI VCI           State      Remote\n";
 356
 357         if (v == (void *)1)
 358                 seq_puts(seq, atm_svc_banner);
 359         else {
 360                 struct vcc_state *state = seq->private;
 361                 struct atm_vcc *vcc = atm_sk(state->sk);
 362
 363                 svc_info(seq, vcc);
 364         }
 365         return 0;
 366 }
 367
 368 static struct seq_operations svc_seq_ops = {
 369         .start  = vcc_seq_start,
 370         .next   = vcc_seq_next,
 371         .stop   = vcc_seq_stop,
 372         .show   = svc_seq_show,
 373 };
 374
 375 static int svc_seq_open(struct inode *inode, struct file *file)
 376 {
 377         return __vcc_seq_open(inode, file, PF_ATMSVC, &svc_seq_ops);
 378 }
 379
 380 static struct file_operations svc_seq_fops = {
 381         .open           = svc_seq_open,
 382         .read           = seq_read,
 383         .llseek         = seq_lseek,
 384         .release        = vcc_seq_release,
 385 };
 386
 387 static ssize_t proc_dev_atm_read(struct file *file, char __user *buf,
 388                                  size_t count, loff_t *pos)
 389 {
 390         struct atm_dev *dev;
 391         unsigned long page;
 392         int length;
 393
 394         if (count == 0) return 0;
 395         page = get_zeroed_page(GFP_KERNEL);
 396         if (!page) return -ENOMEM;
 397         dev = PDE(file->f_dentry->d_inode)->data;
 398         if (!dev->ops->proc_read)
 399                 length = -EINVAL;
 400         else {
 401                 length = dev->ops->proc_read(dev,pos,(char *) page);
 402                 if (length > count) length = -EINVAL;
 403         }
 404         if (length >= 0) {
 405                 if (copy_to_user(buf,(char *) page,length)) length = -EFAULT;
 406                 (*pos)++;
 407         }
 408         free_page(page);
 409         return length;
 410 }
 411
 412
 413 struct proc_dir_entry *atm_proc_root;
 414 EXPORT_SYMBOL(atm_proc_root);
 415
 416
 417 int atm_proc_dev_register(struct atm_dev *dev)
 418 {
 419         int digits,num;
 420         int error;
 421
 422         /* No proc info */
 423         if (!dev->ops->proc_read)
 424                 return 0;
 425
 426         error = -ENOMEM;
 427         digits = 0;
 428         for (num = dev->number; num; num /= 10) digits++;
 429         if (!digits) digits++;
 430
 431         dev->proc_name = kmalloc(strlen(dev->type) + digits + 2, GFP_KERNEL);
 432         if (!dev->proc_name)
 433                 goto err_out;
 434         sprintf(dev->proc_name,"%s:%d",dev->type, dev->number);
 435
 436         dev->proc_entry = create_proc_entry(dev->proc_name, 0, atm_proc_root);
 437         if (!dev->proc_entry)
 438                 goto err_free_name;
 439         dev->proc_entry->data = dev;
 440         dev->proc_entry->proc_fops = &proc_atm_dev_ops;
 441         dev->proc_entry->owner = THIS_MODULE;
 442         return 0;
 443 err_free_name:
 444         kfree(dev->proc_name);
 445 err_out:
 446         return error;
 447 }
 448
 449
 450 void atm_proc_dev_deregister(struct atm_dev *dev)
 451 {
 452         if (!dev->ops->proc_read)
 453                 return;
 454
 455         remove_proc_entry(dev->proc_name, atm_proc_root);
 456         kfree(dev->proc_name);
 457 }
 458
 459 static struct atm_proc_entry {
 460         char *name;
 461         struct file_operations *proc_fops;
 462         struct proc_dir_entry *dirent;
 463 } atm_proc_ents[] = {
 464         { .name = "devices",    .proc_fops = &devices_seq_fops },
 465         { .name = "pvc",        .proc_fops = &pvc_seq_fops },
 466         { .name = "svc",        .proc_fops = &svc_seq_fops },
 467         { .name = "vc",         .proc_fops = &vcc_seq_fops },
 468         { .name = NULL,         .proc_fops = NULL }
 469 };
 470
 471 static void atm_proc_dirs_remove(void)
 472 {
 473         static struct atm_proc_entry *e;
 474
 475         for (e = atm_proc_ents; e->name; e++) {
 476                 if (e->dirent)
 477                         remove_proc_entry(e->name, atm_proc_root);
 478         }
 479         remove_proc_entry("net/atm", NULL);
 480 }
 481
 482 int __init atm_proc_init(void)
 483 {
 484         static struct atm_proc_entry *e;
 485         int ret;
 486
 487         atm_proc_root = proc_mkdir("net/atm",NULL);
 488         if (!atm_proc_root)
 489                 goto err_out;
 490         for (e = atm_proc_ents; e->name; e++) {
 491                 struct proc_dir_entry *dirent;
 492
 493                 dirent = create_proc_entry(e->name, S_IRUGO, atm_proc_root);
 494                 if (!dirent)
 495                         goto err_out_remove;
 496                 dirent->proc_fops = e->proc_fops;
 497                 dirent->owner = THIS_MODULE;
 498                 e->dirent = dirent;
 499         }
 500         ret = 0;
 501 out:
 502         return ret;
 503
 504 err_out_remove:
 505         atm_proc_dirs_remove();
 506 err_out:
 507         ret = -ENOMEM;
 508         goto out;
 509 }
 510
 511 void __exit atm_proc_exit(void)
 512 {
 513         atm_proc_dirs_remove();
 514 }