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