Merge branch 'upstream-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/mfashe...
[linux-2.6] / net / atm / resources.c
1 /* net/atm/resources.c - Statically allocated resources */
2
3 /* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */
4
5 /* Fixes
6  * Arnaldo Carvalho de Melo <acme@conectiva.com.br>
7  * 2002/01 - don't free the whole struct sock on sk->destruct time,
8  *           use the default destruct function initialized by sock_init_data */
9
10
11 #include <linux/config.h>
12 #include <linux/ctype.h>
13 #include <linux/string.h>
14 #include <linux/atmdev.h>
15 #include <linux/sonet.h>
16 #include <linux/kernel.h> /* for barrier */
17 #include <linux/module.h>
18 #include <linux/bitops.h>
19 #include <linux/capability.h>
20 #include <linux/delay.h>
21 #include <linux/mutex.h>
22
23 #include <net/sock.h>    /* for struct sock */
24
25 #include "common.h"
26 #include "resources.h"
27 #include "addr.h"
28
29
30 LIST_HEAD(atm_devs);
31 DEFINE_MUTEX(atm_dev_mutex);
32
33 static struct atm_dev *__alloc_atm_dev(const char *type)
34 {
35         struct atm_dev *dev;
36
37         dev = kmalloc(sizeof(*dev), GFP_KERNEL);
38         if (!dev)
39                 return NULL;
40         memset(dev, 0, sizeof(*dev));
41         dev->type = type;
42         dev->signal = ATM_PHY_SIG_UNKNOWN;
43         dev->link_rate = ATM_OC3_PCR;
44         spin_lock_init(&dev->lock);
45         INIT_LIST_HEAD(&dev->local);
46         INIT_LIST_HEAD(&dev->lecs);
47
48         return dev;
49 }
50
51 static struct atm_dev *__atm_dev_lookup(int number)
52 {
53         struct atm_dev *dev;
54         struct list_head *p;
55
56         list_for_each(p, &atm_devs) {
57                 dev = list_entry(p, struct atm_dev, dev_list);
58                 if (dev->number == number) {
59                         atm_dev_hold(dev);
60                         return dev;
61                 }
62         }
63         return NULL;
64 }
65
66 struct atm_dev *atm_dev_lookup(int number)
67 {
68         struct atm_dev *dev;
69
70         mutex_lock(&atm_dev_mutex);
71         dev = __atm_dev_lookup(number);
72         mutex_unlock(&atm_dev_mutex);
73         return dev;
74 }
75
76
77 struct atm_dev *atm_dev_register(const char *type, const struct atmdev_ops *ops,
78                                  int number, unsigned long *flags)
79 {
80         struct atm_dev *dev, *inuse;
81
82         dev = __alloc_atm_dev(type);
83         if (!dev) {
84                 printk(KERN_ERR "atm_dev_register: no space for dev %s\n",
85                     type);
86                 return NULL;
87         }
88         mutex_lock(&atm_dev_mutex);
89         if (number != -1) {
90                 if ((inuse = __atm_dev_lookup(number))) {
91                         atm_dev_put(inuse);
92                         mutex_unlock(&atm_dev_mutex);
93                         kfree(dev);
94                         return NULL;
95                 }
96                 dev->number = number;
97         } else {
98                 dev->number = 0;
99                 while ((inuse = __atm_dev_lookup(dev->number))) {
100                         atm_dev_put(inuse);
101                         dev->number++;
102                 }
103         }
104
105         dev->ops = ops;
106         if (flags)
107                 dev->flags = *flags;
108         else
109                 memset(&dev->flags, 0, sizeof(dev->flags));
110         memset(&dev->stats, 0, sizeof(dev->stats));
111         atomic_set(&dev->refcnt, 1);
112
113         if (atm_proc_dev_register(dev) < 0) {
114                 printk(KERN_ERR "atm_dev_register: "
115                        "atm_proc_dev_register failed for dev %s\n",
116                        type);
117                 goto out_fail;
118         }
119
120         if (atm_register_sysfs(dev) < 0) {
121                 printk(KERN_ERR "atm_dev_register: "
122                        "atm_register_sysfs failed for dev %s\n",
123                        type);
124                 atm_proc_dev_deregister(dev);
125                 goto out_fail;
126         }
127
128         list_add_tail(&dev->dev_list, &atm_devs);
129
130 out:
131         mutex_unlock(&atm_dev_mutex);
132         return dev;
133
134 out_fail:
135         kfree(dev);
136         dev = NULL;
137         goto out;
138 }
139
140
141 void atm_dev_deregister(struct atm_dev *dev)
142 {
143         BUG_ON(test_bit(ATM_DF_REMOVED, &dev->flags));
144         set_bit(ATM_DF_REMOVED, &dev->flags);
145
146         /*
147          * if we remove current device from atm_devs list, new device 
148          * with same number can appear, such we need deregister proc, 
149          * release async all vccs and remove them from vccs list too
150          */
151         mutex_lock(&atm_dev_mutex);
152         list_del(&dev->dev_list);
153         mutex_unlock(&atm_dev_mutex);
154
155         atm_dev_release_vccs(dev);
156         atm_unregister_sysfs(dev);
157         atm_proc_dev_deregister(dev);
158
159         atm_dev_put(dev);
160 }
161
162
163 static void copy_aal_stats(struct k_atm_aal_stats *from,
164     struct atm_aal_stats *to)
165 {
166 #define __HANDLE_ITEM(i) to->i = atomic_read(&from->i)
167         __AAL_STAT_ITEMS
168 #undef __HANDLE_ITEM
169 }
170
171
172 static void subtract_aal_stats(struct k_atm_aal_stats *from,
173     struct atm_aal_stats *to)
174 {
175 #define __HANDLE_ITEM(i) atomic_sub(to->i, &from->i)
176         __AAL_STAT_ITEMS
177 #undef __HANDLE_ITEM
178 }
179
180
181 static int fetch_stats(struct atm_dev *dev, struct atm_dev_stats __user *arg, int zero)
182 {
183         struct atm_dev_stats tmp;
184         int error = 0;
185
186         copy_aal_stats(&dev->stats.aal0, &tmp.aal0);
187         copy_aal_stats(&dev->stats.aal34, &tmp.aal34);
188         copy_aal_stats(&dev->stats.aal5, &tmp.aal5);
189         if (arg)
190                 error = copy_to_user(arg, &tmp, sizeof(tmp));
191         if (zero && !error) {
192                 subtract_aal_stats(&dev->stats.aal0, &tmp.aal0);
193                 subtract_aal_stats(&dev->stats.aal34, &tmp.aal34);
194                 subtract_aal_stats(&dev->stats.aal5, &tmp.aal5);
195         }
196         return error ? -EFAULT : 0;
197 }
198
199
200 int atm_dev_ioctl(unsigned int cmd, void __user *arg)
201 {
202         void __user *buf;
203         int error, len, number, size = 0;
204         struct atm_dev *dev;
205         struct list_head *p;
206         int *tmp_buf, *tmp_p;
207         struct atm_iobuf __user *iobuf = arg;
208         struct atmif_sioc __user *sioc = arg;
209         switch (cmd) {
210                 case ATM_GETNAMES:
211                         if (get_user(buf, &iobuf->buffer))
212                                 return -EFAULT;
213                         if (get_user(len, &iobuf->length))
214                                 return -EFAULT;
215                         mutex_lock(&atm_dev_mutex);
216                         list_for_each(p, &atm_devs)
217                                 size += sizeof(int);
218                         if (size > len) {
219                                 mutex_unlock(&atm_dev_mutex);
220                                 return -E2BIG;
221                         }
222                         tmp_buf = kmalloc(size, GFP_ATOMIC);
223                         if (!tmp_buf) {
224                                 mutex_unlock(&atm_dev_mutex);
225                                 return -ENOMEM;
226                         }
227                         tmp_p = tmp_buf;
228                         list_for_each(p, &atm_devs) {
229                                 dev = list_entry(p, struct atm_dev, dev_list);
230                                 *tmp_p++ = dev->number;
231                         }
232                         mutex_unlock(&atm_dev_mutex);
233                         error = ((copy_to_user(buf, tmp_buf, size)) ||
234                                         put_user(size, &iobuf->length))
235                                                 ? -EFAULT : 0;
236                         kfree(tmp_buf);
237                         return error;
238                 default:
239                         break;
240         }
241
242         if (get_user(buf, &sioc->arg))
243                 return -EFAULT;
244         if (get_user(len, &sioc->length))
245                 return -EFAULT;
246         if (get_user(number, &sioc->number))
247                 return -EFAULT;
248
249         if (!(dev = try_then_request_module(atm_dev_lookup(number),
250                                             "atm-device-%d", number)))
251                 return -ENODEV;
252         
253         switch (cmd) {
254                 case ATM_GETTYPE:
255                         size = strlen(dev->type) + 1;
256                         if (copy_to_user(buf, dev->type, size)) {
257                                 error = -EFAULT;
258                                 goto done;
259                         }
260                         break;
261                 case ATM_GETESI:
262                         size = ESI_LEN;
263                         if (copy_to_user(buf, dev->esi, size)) {
264                                 error = -EFAULT;
265                                 goto done;
266                         }
267                         break;
268                 case ATM_SETESI:
269                         {
270                                 int i;
271
272                                 for (i = 0; i < ESI_LEN; i++)
273                                         if (dev->esi[i]) {
274                                                 error = -EEXIST;
275                                                 goto done;
276                                         }
277                         }
278                         /* fall through */
279                 case ATM_SETESIF:
280                         {
281                                 unsigned char esi[ESI_LEN];
282
283                                 if (!capable(CAP_NET_ADMIN)) {
284                                         error = -EPERM;
285                                         goto done;
286                                 }
287                                 if (copy_from_user(esi, buf, ESI_LEN)) {
288                                         error = -EFAULT;
289                                         goto done;
290                                 }
291                                 memcpy(dev->esi, esi, ESI_LEN);
292                                 error =  ESI_LEN;
293                                 goto done;
294                         }
295                 case ATM_GETSTATZ:
296                         if (!capable(CAP_NET_ADMIN)) {
297                                 error = -EPERM;
298                                 goto done;
299                         }
300                         /* fall through */
301                 case ATM_GETSTAT:
302                         size = sizeof(struct atm_dev_stats);
303                         error = fetch_stats(dev, buf, cmd == ATM_GETSTATZ);
304                         if (error)
305                                 goto done;
306                         break;
307                 case ATM_GETCIRANGE:
308                         size = sizeof(struct atm_cirange);
309                         if (copy_to_user(buf, &dev->ci_range, size)) {
310                                 error = -EFAULT;
311                                 goto done;
312                         }
313                         break;
314                 case ATM_GETLINKRATE:
315                         size = sizeof(int);
316                         if (copy_to_user(buf, &dev->link_rate, size)) {
317                                 error = -EFAULT;
318                                 goto done;
319                         }
320                         break;
321                 case ATM_RSTADDR:
322                         if (!capable(CAP_NET_ADMIN)) {
323                                 error = -EPERM;
324                                 goto done;
325                         }
326                         atm_reset_addr(dev, ATM_ADDR_LOCAL);
327                         break;
328                 case ATM_ADDADDR:
329                 case ATM_DELADDR:
330                 case ATM_ADDLECSADDR:
331                 case ATM_DELLECSADDR:
332                         if (!capable(CAP_NET_ADMIN)) {
333                                 error = -EPERM;
334                                 goto done;
335                         }
336                         {
337                                 struct sockaddr_atmsvc addr;
338
339                                 if (copy_from_user(&addr, buf, sizeof(addr))) {
340                                         error = -EFAULT;
341                                         goto done;
342                                 }
343                                 if (cmd == ATM_ADDADDR || cmd == ATM_ADDLECSADDR)
344                                         error = atm_add_addr(dev, &addr,
345                                                              (cmd == ATM_ADDADDR ?
346                                                               ATM_ADDR_LOCAL : ATM_ADDR_LECS));
347                                 else
348                                         error = atm_del_addr(dev, &addr,
349                                                              (cmd == ATM_DELADDR ?
350                                                               ATM_ADDR_LOCAL : ATM_ADDR_LECS));
351                                 goto done;
352                         }
353                 case ATM_GETADDR:
354                 case ATM_GETLECSADDR:
355                         error = atm_get_addr(dev, buf, len,
356                                              (cmd == ATM_GETADDR ?
357                                               ATM_ADDR_LOCAL : ATM_ADDR_LECS));
358                         if (error < 0)
359                                 goto done;
360                         size = error;
361                         /* may return 0, but later on size == 0 means "don't
362                            write the length" */
363                         error = put_user(size, &sioc->length)
364                                 ? -EFAULT : 0;
365                         goto done;
366                 case ATM_SETLOOP:
367                         if (__ATM_LM_XTRMT((int) (unsigned long) buf) &&
368                             __ATM_LM_XTLOC((int) (unsigned long) buf) >
369                             __ATM_LM_XTRMT((int) (unsigned long) buf)) {
370                                 error = -EINVAL;
371                                 goto done;
372                         }
373                         /* fall through */
374                 case ATM_SETCIRANGE:
375                 case SONET_GETSTATZ:
376                 case SONET_SETDIAG:
377                 case SONET_CLRDIAG:
378                 case SONET_SETFRAMING:
379                         if (!capable(CAP_NET_ADMIN)) {
380                                 error = -EPERM;
381                                 goto done;
382                         }
383                         /* fall through */
384                 default:
385                         if (!dev->ops->ioctl) {
386                                 error = -EINVAL;
387                                 goto done;
388                         }
389                         size = dev->ops->ioctl(dev, cmd, buf);
390                         if (size < 0) {
391                                 error = (size == -ENOIOCTLCMD ? -EINVAL : size);
392                                 goto done;
393                         }
394         }
395         
396         if (size)
397                 error = put_user(size, &sioc->length)
398                         ? -EFAULT : 0;
399         else
400                 error = 0;
401 done:
402         atm_dev_put(dev);
403         return error;
404 }
405
406 static __inline__ void *dev_get_idx(loff_t left)
407 {
408         struct list_head *p;
409
410         list_for_each(p, &atm_devs) {
411                 if (!--left)
412                         break;
413         }
414         return (p != &atm_devs) ? p : NULL;
415 }
416
417 void *atm_dev_seq_start(struct seq_file *seq, loff_t *pos)
418 {
419         mutex_lock(&atm_dev_mutex);
420         return *pos ? dev_get_idx(*pos) : (void *) 1;
421 }
422
423 void atm_dev_seq_stop(struct seq_file *seq, void *v)
424 {
425         mutex_unlock(&atm_dev_mutex);
426 }
427  
428 void *atm_dev_seq_next(struct seq_file *seq, void *v, loff_t *pos)
429 {
430         ++*pos;
431         v = (v == (void *)1) ? atm_devs.next : ((struct list_head *)v)->next;
432         return (v == &atm_devs) ? NULL : v;
433 }
434
435
436 EXPORT_SYMBOL(atm_dev_register);
437 EXPORT_SYMBOL(atm_dev_deregister);
438 EXPORT_SYMBOL(atm_dev_lookup);