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