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