b556510aef2c557a2d44ac9276580f6f1be8e9a6
[openwrt.git] / target / linux / generic / files / drivers / net / phy / swconfig.c
1 /*
2  * swconfig.c: Switch configuration API
3  *
4  * Copyright (C) 2008 Felix Fietkau <nbd@nbd.name>
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  */
16
17 #include <linux/types.h>
18 #include <linux/module.h>
19 #include <linux/init.h>
20 #include <linux/list.h>
21 #include <linux/if.h>
22 #include <linux/if_ether.h>
23 #include <linux/capability.h>
24 #include <linux/skbuff.h>
25 #include <linux/switch.h>
26 #include <linux/of.h>
27 #include <linux/version.h>
28 #include <uapi/linux/mii.h>
29
30 #define SWCONFIG_DEVNAME        "switch%d"
31
32 #include "swconfig_leds.c"
33
34 MODULE_AUTHOR("Felix Fietkau <nbd@nbd.name>");
35 MODULE_LICENSE("GPL");
36
37 static int swdev_id;
38 static struct list_head swdevs;
39 static DEFINE_SPINLOCK(swdevs_lock);
40 struct swconfig_callback;
41
42 struct swconfig_callback {
43         struct sk_buff *msg;
44         struct genlmsghdr *hdr;
45         struct genl_info *info;
46         int cmd;
47
48         /* callback for filling in the message data */
49         int (*fill)(struct swconfig_callback *cb, void *arg);
50
51         /* callback for closing the message before sending it */
52         int (*close)(struct swconfig_callback *cb, void *arg);
53
54         struct nlattr *nest[4];
55         int args[4];
56 };
57
58 /* defaults */
59
60 static int
61 swconfig_get_vlan_ports(struct switch_dev *dev, const struct switch_attr *attr,
62                         struct switch_val *val)
63 {
64         int ret;
65         if (val->port_vlan >= dev->vlans)
66                 return -EINVAL;
67
68         if (!dev->ops->get_vlan_ports)
69                 return -EOPNOTSUPP;
70
71         ret = dev->ops->get_vlan_ports(dev, val);
72         return ret;
73 }
74
75 static int
76 swconfig_set_vlan_ports(struct switch_dev *dev, const struct switch_attr *attr,
77                         struct switch_val *val)
78 {
79         struct switch_port *ports = val->value.ports;
80         const struct switch_dev_ops *ops = dev->ops;
81         int i;
82
83         if (val->port_vlan >= dev->vlans)
84                 return -EINVAL;
85
86         /* validate ports */
87         if (val->len > dev->ports)
88                 return -EINVAL;
89
90         if (!ops->set_vlan_ports)
91                 return -EOPNOTSUPP;
92
93         for (i = 0; i < val->len; i++) {
94                 if (ports[i].id >= dev->ports)
95                         return -EINVAL;
96
97                 if (ops->set_port_pvid &&
98                     !(ports[i].flags & (1 << SWITCH_PORT_FLAG_TAGGED)))
99                         ops->set_port_pvid(dev, ports[i].id, val->port_vlan);
100         }
101
102         return ops->set_vlan_ports(dev, val);
103 }
104
105 static int
106 swconfig_set_pvid(struct switch_dev *dev, const struct switch_attr *attr,
107                         struct switch_val *val)
108 {
109         if (val->port_vlan >= dev->ports)
110                 return -EINVAL;
111
112         if (!dev->ops->set_port_pvid)
113                 return -EOPNOTSUPP;
114
115         return dev->ops->set_port_pvid(dev, val->port_vlan, val->value.i);
116 }
117
118 static int
119 swconfig_get_pvid(struct switch_dev *dev, const struct switch_attr *attr,
120                         struct switch_val *val)
121 {
122         if (val->port_vlan >= dev->ports)
123                 return -EINVAL;
124
125         if (!dev->ops->get_port_pvid)
126                 return -EOPNOTSUPP;
127
128         return dev->ops->get_port_pvid(dev, val->port_vlan, &val->value.i);
129 }
130
131 static int
132 swconfig_set_link(struct switch_dev *dev, const struct switch_attr *attr,
133                         struct switch_val *val)
134 {
135         if (!dev->ops->set_port_link)
136                 return -EOPNOTSUPP;
137
138         return dev->ops->set_port_link(dev, val->port_vlan, val->value.link);
139 }
140
141 static int
142 swconfig_get_link(struct switch_dev *dev, const struct switch_attr *attr,
143                         struct switch_val *val)
144 {
145         struct switch_port_link *link = val->value.link;
146
147         if (val->port_vlan >= dev->ports)
148                 return -EINVAL;
149
150         if (!dev->ops->get_port_link)
151                 return -EOPNOTSUPP;
152
153         memset(link, 0, sizeof(*link));
154         return dev->ops->get_port_link(dev, val->port_vlan, link);
155 }
156
157 static int
158 swconfig_apply_config(struct switch_dev *dev, const struct switch_attr *attr,
159                         struct switch_val *val)
160 {
161         /* don't complain if not supported by the switch driver */
162         if (!dev->ops->apply_config)
163                 return 0;
164
165         return dev->ops->apply_config(dev);
166 }
167
168 static int
169 swconfig_reset_switch(struct switch_dev *dev, const struct switch_attr *attr,
170                         struct switch_val *val)
171 {
172         /* don't complain if not supported by the switch driver */
173         if (!dev->ops->reset_switch)
174                 return 0;
175
176         return dev->ops->reset_switch(dev);
177 }
178
179 enum global_defaults {
180         GLOBAL_APPLY,
181         GLOBAL_RESET,
182 };
183
184 enum vlan_defaults {
185         VLAN_PORTS,
186 };
187
188 enum port_defaults {
189         PORT_PVID,
190         PORT_LINK,
191 };
192
193 static struct switch_attr default_global[] = {
194         [GLOBAL_APPLY] = {
195                 .type = SWITCH_TYPE_NOVAL,
196                 .name = "apply",
197                 .description = "Activate changes in the hardware",
198                 .set = swconfig_apply_config,
199         },
200         [GLOBAL_RESET] = {
201                 .type = SWITCH_TYPE_NOVAL,
202                 .name = "reset",
203                 .description = "Reset the switch",
204                 .set = swconfig_reset_switch,
205         }
206 };
207
208 static struct switch_attr default_port[] = {
209         [PORT_PVID] = {
210                 .type = SWITCH_TYPE_INT,
211                 .name = "pvid",
212                 .description = "Primary VLAN ID",
213                 .set = swconfig_set_pvid,
214                 .get = swconfig_get_pvid,
215         },
216         [PORT_LINK] = {
217                 .type = SWITCH_TYPE_LINK,
218                 .name = "link",
219                 .description = "Get port link information",
220                 .set = swconfig_set_link,
221                 .get = swconfig_get_link,
222         }
223 };
224
225 static struct switch_attr default_vlan[] = {
226         [VLAN_PORTS] = {
227                 .type = SWITCH_TYPE_PORTS,
228                 .name = "ports",
229                 .description = "VLAN port mapping",
230                 .set = swconfig_set_vlan_ports,
231                 .get = swconfig_get_vlan_ports,
232         },
233 };
234
235 static const struct switch_attr *
236 swconfig_find_attr_by_name(const struct switch_attrlist *alist,
237                                 const char *name)
238 {
239         int i;
240
241         for (i = 0; i < alist->n_attr; i++)
242                 if (strcmp(name, alist->attr[i].name) == 0)
243                         return &alist->attr[i];
244
245         return NULL;
246 }
247
248 static void swconfig_defaults_init(struct switch_dev *dev)
249 {
250         const struct switch_dev_ops *ops = dev->ops;
251
252         dev->def_global = 0;
253         dev->def_vlan = 0;
254         dev->def_port = 0;
255
256         if (ops->get_vlan_ports || ops->set_vlan_ports)
257                 set_bit(VLAN_PORTS, &dev->def_vlan);
258
259         if (ops->get_port_pvid || ops->set_port_pvid)
260                 set_bit(PORT_PVID, &dev->def_port);
261
262         if (ops->get_port_link &&
263             !swconfig_find_attr_by_name(&ops->attr_port, "link"))
264                 set_bit(PORT_LINK, &dev->def_port);
265
266         /* always present, can be no-op */
267         set_bit(GLOBAL_APPLY, &dev->def_global);
268         set_bit(GLOBAL_RESET, &dev->def_global);
269 }
270
271
272 static struct genl_family switch_fam = {
273         .id = GENL_ID_GENERATE,
274         .name = "switch",
275         .hdrsize = 0,
276         .version = 1,
277         .maxattr = SWITCH_ATTR_MAX,
278 };
279
280 static const struct nla_policy switch_policy[SWITCH_ATTR_MAX+1] = {
281         [SWITCH_ATTR_ID] = { .type = NLA_U32 },
282         [SWITCH_ATTR_OP_ID] = { .type = NLA_U32 },
283         [SWITCH_ATTR_OP_PORT] = { .type = NLA_U32 },
284         [SWITCH_ATTR_OP_VLAN] = { .type = NLA_U32 },
285         [SWITCH_ATTR_OP_VALUE_INT] = { .type = NLA_U32 },
286         [SWITCH_ATTR_OP_VALUE_STR] = { .type = NLA_NUL_STRING },
287         [SWITCH_ATTR_OP_VALUE_PORTS] = { .type = NLA_NESTED },
288         [SWITCH_ATTR_TYPE] = { .type = NLA_U32 },
289 };
290
291 static const struct nla_policy port_policy[SWITCH_PORT_ATTR_MAX+1] = {
292         [SWITCH_PORT_ID] = { .type = NLA_U32 },
293         [SWITCH_PORT_FLAG_TAGGED] = { .type = NLA_FLAG },
294 };
295
296 static struct nla_policy link_policy[SWITCH_LINK_ATTR_MAX] = {
297         [SWITCH_LINK_FLAG_DUPLEX] = { .type = NLA_FLAG },
298         [SWITCH_LINK_FLAG_ANEG] = { .type = NLA_FLAG },
299         [SWITCH_LINK_SPEED] = { .type = NLA_U32 },
300 };
301
302 static inline void
303 swconfig_lock(void)
304 {
305         spin_lock(&swdevs_lock);
306 }
307
308 static inline void
309 swconfig_unlock(void)
310 {
311         spin_unlock(&swdevs_lock);
312 }
313
314 static struct switch_dev *
315 swconfig_get_dev(struct genl_info *info)
316 {
317         struct switch_dev *dev = NULL;
318         struct switch_dev *p;
319         int id;
320
321         if (!info->attrs[SWITCH_ATTR_ID])
322                 goto done;
323
324         id = nla_get_u32(info->attrs[SWITCH_ATTR_ID]);
325         swconfig_lock();
326         list_for_each_entry(p, &swdevs, dev_list) {
327                 if (id != p->id)
328                         continue;
329
330                 dev = p;
331                 break;
332         }
333         if (dev)
334                 mutex_lock(&dev->sw_mutex);
335         else
336                 pr_debug("device %d not found\n", id);
337         swconfig_unlock();
338 done:
339         return dev;
340 }
341
342 static inline void
343 swconfig_put_dev(struct switch_dev *dev)
344 {
345         mutex_unlock(&dev->sw_mutex);
346 }
347
348 static int
349 swconfig_dump_attr(struct swconfig_callback *cb, void *arg)
350 {
351         struct switch_attr *op = arg;
352         struct genl_info *info = cb->info;
353         struct sk_buff *msg = cb->msg;
354         int id = cb->args[0];
355         void *hdr;
356
357         hdr = genlmsg_put(msg, info->snd_portid, info->snd_seq, &switch_fam,
358                         NLM_F_MULTI, SWITCH_CMD_NEW_ATTR);
359         if (IS_ERR(hdr))
360                 return -1;
361
362         if (nla_put_u32(msg, SWITCH_ATTR_OP_ID, id))
363                 goto nla_put_failure;
364         if (nla_put_u32(msg, SWITCH_ATTR_OP_TYPE, op->type))
365                 goto nla_put_failure;
366         if (nla_put_string(msg, SWITCH_ATTR_OP_NAME, op->name))
367                 goto nla_put_failure;
368         if (op->description)
369                 if (nla_put_string(msg, SWITCH_ATTR_OP_DESCRIPTION,
370                         op->description))
371                         goto nla_put_failure;
372
373         genlmsg_end(msg, hdr);
374         return msg->len;
375 nla_put_failure:
376         genlmsg_cancel(msg, hdr);
377         return -EMSGSIZE;
378 }
379
380 /* spread multipart messages across multiple message buffers */
381 static int
382 swconfig_send_multipart(struct swconfig_callback *cb, void *arg)
383 {
384         struct genl_info *info = cb->info;
385         int restart = 0;
386         int err;
387
388         do {
389                 if (!cb->msg) {
390                         cb->msg = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
391                         if (cb->msg == NULL)
392                                 goto error;
393                 }
394
395                 if (!(cb->fill(cb, arg) < 0))
396                         break;
397
398                 /* fill failed, check if this was already the second attempt */
399                 if (restart)
400                         goto error;
401
402                 /* try again in a new message, send the current one */
403                 restart = 1;
404                 if (cb->close) {
405                         if (cb->close(cb, arg) < 0)
406                                 goto error;
407                 }
408                 err = genlmsg_reply(cb->msg, info);
409                 cb->msg = NULL;
410                 if (err < 0)
411                         goto error;
412
413         } while (restart);
414
415         return 0;
416
417 error:
418         if (cb->msg)
419                 nlmsg_free(cb->msg);
420         return -1;
421 }
422
423 static int
424 swconfig_list_attrs(struct sk_buff *skb, struct genl_info *info)
425 {
426         struct genlmsghdr *hdr = nlmsg_data(info->nlhdr);
427         const struct switch_attrlist *alist;
428         struct switch_dev *dev;
429         struct swconfig_callback cb;
430         int err = -EINVAL;
431         int i;
432
433         /* defaults */
434         struct switch_attr *def_list;
435         unsigned long *def_active;
436         int n_def;
437
438         dev = swconfig_get_dev(info);
439         if (!dev)
440                 return -EINVAL;
441
442         switch (hdr->cmd) {
443         case SWITCH_CMD_LIST_GLOBAL:
444                 alist = &dev->ops->attr_global;
445                 def_list = default_global;
446                 def_active = &dev->def_global;
447                 n_def = ARRAY_SIZE(default_global);
448                 break;
449         case SWITCH_CMD_LIST_VLAN:
450                 alist = &dev->ops->attr_vlan;
451                 def_list = default_vlan;
452                 def_active = &dev->def_vlan;
453                 n_def = ARRAY_SIZE(default_vlan);
454                 break;
455         case SWITCH_CMD_LIST_PORT:
456                 alist = &dev->ops->attr_port;
457                 def_list = default_port;
458                 def_active = &dev->def_port;
459                 n_def = ARRAY_SIZE(default_port);
460                 break;
461         default:
462                 WARN_ON(1);
463                 goto out;
464         }
465
466         memset(&cb, 0, sizeof(cb));
467         cb.info = info;
468         cb.fill = swconfig_dump_attr;
469         for (i = 0; i < alist->n_attr; i++) {
470                 if (alist->attr[i].disabled)
471                         continue;
472                 cb.args[0] = i;
473                 err = swconfig_send_multipart(&cb, (void *) &alist->attr[i]);
474                 if (err < 0)
475                         goto error;
476         }
477
478         /* defaults */
479         for (i = 0; i < n_def; i++) {
480                 if (!test_bit(i, def_active))
481                         continue;
482                 cb.args[0] = SWITCH_ATTR_DEFAULTS_OFFSET + i;
483                 err = swconfig_send_multipart(&cb, (void *) &def_list[i]);
484                 if (err < 0)
485                         goto error;
486         }
487         swconfig_put_dev(dev);
488
489         if (!cb.msg)
490                 return 0;
491
492         return genlmsg_reply(cb.msg, info);
493
494 error:
495         if (cb.msg)
496                 nlmsg_free(cb.msg);
497 out:
498         swconfig_put_dev(dev);
499         return err;
500 }
501
502 static const struct switch_attr *
503 swconfig_lookup_attr(struct switch_dev *dev, struct genl_info *info,
504                 struct switch_val *val)
505 {
506         struct genlmsghdr *hdr = nlmsg_data(info->nlhdr);
507         const struct switch_attrlist *alist;
508         const struct switch_attr *attr = NULL;
509         int attr_id;
510
511         /* defaults */
512         struct switch_attr *def_list;
513         unsigned long *def_active;
514         int n_def;
515
516         if (!info->attrs[SWITCH_ATTR_OP_ID])
517                 goto done;
518
519         switch (hdr->cmd) {
520         case SWITCH_CMD_SET_GLOBAL:
521         case SWITCH_CMD_GET_GLOBAL:
522                 alist = &dev->ops->attr_global;
523                 def_list = default_global;
524                 def_active = &dev->def_global;
525                 n_def = ARRAY_SIZE(default_global);
526                 break;
527         case SWITCH_CMD_SET_VLAN:
528         case SWITCH_CMD_GET_VLAN:
529                 alist = &dev->ops->attr_vlan;
530                 def_list = default_vlan;
531                 def_active = &dev->def_vlan;
532                 n_def = ARRAY_SIZE(default_vlan);
533                 if (!info->attrs[SWITCH_ATTR_OP_VLAN])
534                         goto done;
535                 val->port_vlan = nla_get_u32(info->attrs[SWITCH_ATTR_OP_VLAN]);
536                 if (val->port_vlan >= dev->vlans)
537                         goto done;
538                 break;
539         case SWITCH_CMD_SET_PORT:
540         case SWITCH_CMD_GET_PORT:
541                 alist = &dev->ops->attr_port;
542                 def_list = default_port;
543                 def_active = &dev->def_port;
544                 n_def = ARRAY_SIZE(default_port);
545                 if (!info->attrs[SWITCH_ATTR_OP_PORT])
546                         goto done;
547                 val->port_vlan = nla_get_u32(info->attrs[SWITCH_ATTR_OP_PORT]);
548                 if (val->port_vlan >= dev->ports)
549                         goto done;
550                 break;
551         default:
552                 WARN_ON(1);
553                 goto done;
554         }
555
556         if (!alist)
557                 goto done;
558
559         attr_id = nla_get_u32(info->attrs[SWITCH_ATTR_OP_ID]);
560         if (attr_id >= SWITCH_ATTR_DEFAULTS_OFFSET) {
561                 attr_id -= SWITCH_ATTR_DEFAULTS_OFFSET;
562                 if (attr_id >= n_def)
563                         goto done;
564                 if (!test_bit(attr_id, def_active))
565                         goto done;
566                 attr = &def_list[attr_id];
567         } else {
568                 if (attr_id >= alist->n_attr)
569                         goto done;
570                 attr = &alist->attr[attr_id];
571         }
572
573         if (attr->disabled)
574                 attr = NULL;
575
576 done:
577         if (!attr)
578                 pr_debug("attribute lookup failed\n");
579         val->attr = attr;
580         return attr;
581 }
582
583 static int
584 swconfig_parse_ports(struct sk_buff *msg, struct nlattr *head,
585                 struct switch_val *val, int max)
586 {
587         struct nlattr *nla;
588         int rem;
589
590         val->len = 0;
591         nla_for_each_nested(nla, head, rem) {
592                 struct nlattr *tb[SWITCH_PORT_ATTR_MAX+1];
593                 struct switch_port *port = &val->value.ports[val->len];
594
595                 if (val->len >= max)
596                         return -EINVAL;
597
598                 if (nla_parse_nested(tb, SWITCH_PORT_ATTR_MAX, nla,
599                                 port_policy))
600                         return -EINVAL;
601
602                 if (!tb[SWITCH_PORT_ID])
603                         return -EINVAL;
604
605                 port->id = nla_get_u32(tb[SWITCH_PORT_ID]);
606                 if (tb[SWITCH_PORT_FLAG_TAGGED])
607                         port->flags |= (1 << SWITCH_PORT_FLAG_TAGGED);
608                 val->len++;
609         }
610
611         return 0;
612 }
613
614 static int
615 swconfig_parse_link(struct sk_buff *msg, struct nlattr *nla,
616                     struct switch_port_link *link)
617 {
618         struct nlattr *tb[SWITCH_LINK_ATTR_MAX + 1];
619
620         if (nla_parse_nested(tb, SWITCH_LINK_ATTR_MAX, nla, link_policy))
621                 return -EINVAL;
622
623         link->duplex = !!tb[SWITCH_LINK_FLAG_DUPLEX];
624         link->aneg = !!tb[SWITCH_LINK_FLAG_ANEG];
625         link->speed = nla_get_u32(tb[SWITCH_LINK_SPEED]);
626
627         return 0;
628 }
629
630 static int
631 swconfig_set_attr(struct sk_buff *skb, struct genl_info *info)
632 {
633         const struct switch_attr *attr;
634         struct switch_dev *dev;
635         struct switch_val val;
636         int err = -EINVAL;
637
638         dev = swconfig_get_dev(info);
639         if (!dev)
640                 return -EINVAL;
641
642         memset(&val, 0, sizeof(val));
643         attr = swconfig_lookup_attr(dev, info, &val);
644         if (!attr || !attr->set)
645                 goto error;
646
647         val.attr = attr;
648         switch (attr->type) {
649         case SWITCH_TYPE_NOVAL:
650                 break;
651         case SWITCH_TYPE_INT:
652                 if (!info->attrs[SWITCH_ATTR_OP_VALUE_INT])
653                         goto error;
654                 val.value.i =
655                         nla_get_u32(info->attrs[SWITCH_ATTR_OP_VALUE_INT]);
656                 break;
657         case SWITCH_TYPE_STRING:
658                 if (!info->attrs[SWITCH_ATTR_OP_VALUE_STR])
659                         goto error;
660                 val.value.s =
661                         nla_data(info->attrs[SWITCH_ATTR_OP_VALUE_STR]);
662                 break;
663         case SWITCH_TYPE_PORTS:
664                 val.value.ports = dev->portbuf;
665                 memset(dev->portbuf, 0,
666                         sizeof(struct switch_port) * dev->ports);
667
668                 /* TODO: implement multipart? */
669                 if (info->attrs[SWITCH_ATTR_OP_VALUE_PORTS]) {
670                         err = swconfig_parse_ports(skb,
671                                 info->attrs[SWITCH_ATTR_OP_VALUE_PORTS],
672                                 &val, dev->ports);
673                         if (err < 0)
674                                 goto error;
675                 } else {
676                         val.len = 0;
677                         err = 0;
678                 }
679                 break;
680         case SWITCH_TYPE_LINK:
681                 val.value.link = &dev->linkbuf;
682                 memset(&dev->linkbuf, 0, sizeof(struct switch_port_link));
683
684                 if (info->attrs[SWITCH_ATTR_OP_VALUE_LINK]) {
685                         err = swconfig_parse_link(skb,
686                                                   info->attrs[SWITCH_ATTR_OP_VALUE_LINK],
687                                                   val.value.link);
688                         if (err < 0)
689                                 goto error;
690                 } else {
691                         val.len = 0;
692                         err = 0;
693                 }
694                 break;
695         default:
696                 goto error;
697         }
698
699         err = attr->set(dev, attr, &val);
700 error:
701         swconfig_put_dev(dev);
702         return err;
703 }
704
705 static int
706 swconfig_close_portlist(struct swconfig_callback *cb, void *arg)
707 {
708         if (cb->nest[0])
709                 nla_nest_end(cb->msg, cb->nest[0]);
710         return 0;
711 }
712
713 static int
714 swconfig_send_port(struct swconfig_callback *cb, void *arg)
715 {
716         const struct switch_port *port = arg;
717         struct nlattr *p = NULL;
718
719         if (!cb->nest[0]) {
720                 cb->nest[0] = nla_nest_start(cb->msg, cb->cmd);
721                 if (!cb->nest[0])
722                         return -1;
723         }
724
725         p = nla_nest_start(cb->msg, SWITCH_ATTR_PORT);
726         if (!p)
727                 goto error;
728
729         if (nla_put_u32(cb->msg, SWITCH_PORT_ID, port->id))
730                 goto nla_put_failure;
731         if (port->flags & (1 << SWITCH_PORT_FLAG_TAGGED)) {
732                 if (nla_put_flag(cb->msg, SWITCH_PORT_FLAG_TAGGED))
733                         goto nla_put_failure;
734         }
735
736         nla_nest_end(cb->msg, p);
737         return 0;
738
739 nla_put_failure:
740                 nla_nest_cancel(cb->msg, p);
741 error:
742         nla_nest_cancel(cb->msg, cb->nest[0]);
743         return -1;
744 }
745
746 static int
747 swconfig_send_ports(struct sk_buff **msg, struct genl_info *info, int attr,
748                 const struct switch_val *val)
749 {
750         struct swconfig_callback cb;
751         int err = 0;
752         int i;
753
754         if (!val->value.ports)
755                 return -EINVAL;
756
757         memset(&cb, 0, sizeof(cb));
758         cb.cmd = attr;
759         cb.msg = *msg;
760         cb.info = info;
761         cb.fill = swconfig_send_port;
762         cb.close = swconfig_close_portlist;
763
764         cb.nest[0] = nla_nest_start(cb.msg, cb.cmd);
765         for (i = 0; i < val->len; i++) {
766                 err = swconfig_send_multipart(&cb, &val->value.ports[i]);
767                 if (err)
768                         goto done;
769         }
770         err = val->len;
771         swconfig_close_portlist(&cb, NULL);
772         *msg = cb.msg;
773
774 done:
775         return err;
776 }
777
778 static int
779 swconfig_send_link(struct sk_buff *msg, struct genl_info *info, int attr,
780                    const struct switch_port_link *link)
781 {
782         struct nlattr *p = NULL;
783         int err = 0;
784
785         p = nla_nest_start(msg, attr);
786         if (link->link) {
787                 if (nla_put_flag(msg, SWITCH_LINK_FLAG_LINK))
788                         goto nla_put_failure;
789         }
790         if (link->duplex) {
791                 if (nla_put_flag(msg, SWITCH_LINK_FLAG_DUPLEX))
792                         goto nla_put_failure;
793         }
794         if (link->aneg) {
795                 if (nla_put_flag(msg, SWITCH_LINK_FLAG_ANEG))
796                         goto nla_put_failure;
797         }
798         if (link->tx_flow) {
799                 if (nla_put_flag(msg, SWITCH_LINK_FLAG_TX_FLOW))
800                         goto nla_put_failure;
801         }
802         if (link->rx_flow) {
803                 if (nla_put_flag(msg, SWITCH_LINK_FLAG_RX_FLOW))
804                         goto nla_put_failure;
805         }
806         if (nla_put_u32(msg, SWITCH_LINK_SPEED, link->speed))
807                 goto nla_put_failure;
808         if (link->eee & ADVERTISED_100baseT_Full) {
809                 if (nla_put_flag(msg, SWITCH_LINK_FLAG_EEE_100BASET))
810                         goto nla_put_failure;
811         }
812         if (link->eee & ADVERTISED_1000baseT_Full) {
813                 if (nla_put_flag(msg, SWITCH_LINK_FLAG_EEE_1000BASET))
814                         goto nla_put_failure;
815         }
816         nla_nest_end(msg, p);
817
818         return err;
819
820 nla_put_failure:
821         nla_nest_cancel(msg, p);
822         return -1;
823 }
824
825 static int
826 swconfig_get_attr(struct sk_buff *skb, struct genl_info *info)
827 {
828         struct genlmsghdr *hdr = nlmsg_data(info->nlhdr);
829         const struct switch_attr *attr;
830         struct switch_dev *dev;
831         struct sk_buff *msg = NULL;
832         struct switch_val val;
833         int err = -EINVAL;
834         int cmd = hdr->cmd;
835
836         dev = swconfig_get_dev(info);
837         if (!dev)
838                 return -EINVAL;
839
840         memset(&val, 0, sizeof(val));
841         attr = swconfig_lookup_attr(dev, info, &val);
842         if (!attr || !attr->get)
843                 goto error;
844
845         if (attr->type == SWITCH_TYPE_PORTS) {
846                 val.value.ports = dev->portbuf;
847                 memset(dev->portbuf, 0,
848                         sizeof(struct switch_port) * dev->ports);
849         } else if (attr->type == SWITCH_TYPE_LINK) {
850                 val.value.link = &dev->linkbuf;
851                 memset(&dev->linkbuf, 0, sizeof(struct switch_port_link));
852         }
853
854         err = attr->get(dev, attr, &val);
855         if (err)
856                 goto error;
857
858         msg = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
859         if (!msg)
860                 goto error;
861
862         hdr = genlmsg_put(msg, info->snd_portid, info->snd_seq, &switch_fam,
863                         0, cmd);
864         if (IS_ERR(hdr))
865                 goto nla_put_failure;
866
867         switch (attr->type) {
868         case SWITCH_TYPE_INT:
869                 if (nla_put_u32(msg, SWITCH_ATTR_OP_VALUE_INT, val.value.i))
870                         goto nla_put_failure;
871                 break;
872         case SWITCH_TYPE_STRING:
873                 if (nla_put_string(msg, SWITCH_ATTR_OP_VALUE_STR, val.value.s))
874                         goto nla_put_failure;
875                 break;
876         case SWITCH_TYPE_PORTS:
877                 err = swconfig_send_ports(&msg, info,
878                                 SWITCH_ATTR_OP_VALUE_PORTS, &val);
879                 if (err < 0)
880                         goto nla_put_failure;
881                 break;
882         case SWITCH_TYPE_LINK:
883                 err = swconfig_send_link(msg, info,
884                                          SWITCH_ATTR_OP_VALUE_LINK, val.value.link);
885                 if (err < 0)
886                         goto nla_put_failure;
887                 break;
888         default:
889                 pr_debug("invalid type in attribute\n");
890                 err = -EINVAL;
891                 goto error;
892         }
893         genlmsg_end(msg, hdr);
894         err = msg->len;
895         if (err < 0)
896                 goto nla_put_failure;
897
898         swconfig_put_dev(dev);
899         return genlmsg_reply(msg, info);
900
901 nla_put_failure:
902         if (msg)
903                 nlmsg_free(msg);
904 error:
905         swconfig_put_dev(dev);
906         if (!err)
907                 err = -ENOMEM;
908         return err;
909 }
910
911 static int
912 swconfig_send_switch(struct sk_buff *msg, u32 pid, u32 seq, int flags,
913                 const struct switch_dev *dev)
914 {
915         struct nlattr *p = NULL, *m = NULL;
916         void *hdr;
917         int i;
918
919         hdr = genlmsg_put(msg, pid, seq, &switch_fam, flags,
920                         SWITCH_CMD_NEW_ATTR);
921         if (IS_ERR(hdr))
922                 return -1;
923
924         if (nla_put_u32(msg, SWITCH_ATTR_ID, dev->id))
925                 goto nla_put_failure;
926         if (nla_put_string(msg, SWITCH_ATTR_DEV_NAME, dev->devname))
927                 goto nla_put_failure;
928         if (nla_put_string(msg, SWITCH_ATTR_ALIAS, dev->alias))
929                 goto nla_put_failure;
930         if (nla_put_string(msg, SWITCH_ATTR_NAME, dev->name))
931                 goto nla_put_failure;
932         if (nla_put_u32(msg, SWITCH_ATTR_VLANS, dev->vlans))
933                 goto nla_put_failure;
934         if (nla_put_u32(msg, SWITCH_ATTR_PORTS, dev->ports))
935                 goto nla_put_failure;
936         if (nla_put_u32(msg, SWITCH_ATTR_CPU_PORT, dev->cpu_port))
937                 goto nla_put_failure;
938
939         m = nla_nest_start(msg, SWITCH_ATTR_PORTMAP);
940         if (!m)
941                 goto nla_put_failure;
942         for (i = 0; i < dev->ports; i++) {
943                 p = nla_nest_start(msg, SWITCH_ATTR_PORTS);
944                 if (!p)
945                         continue;
946                 if (dev->portmap[i].s) {
947                         if (nla_put_string(msg, SWITCH_PORTMAP_SEGMENT,
948                                                 dev->portmap[i].s))
949                                 goto nla_put_failure;
950                         if (nla_put_u32(msg, SWITCH_PORTMAP_VIRT,
951                                                 dev->portmap[i].virt))
952                                 goto nla_put_failure;
953                 }
954                 nla_nest_end(msg, p);
955         }
956         nla_nest_end(msg, m);
957         genlmsg_end(msg, hdr);
958         return msg->len;
959 nla_put_failure:
960         genlmsg_cancel(msg, hdr);
961         return -EMSGSIZE;
962 }
963
964 static int swconfig_dump_switches(struct sk_buff *skb,
965                 struct netlink_callback *cb)
966 {
967         struct switch_dev *dev;
968         int start = cb->args[0];
969         int idx = 0;
970
971         swconfig_lock();
972         list_for_each_entry(dev, &swdevs, dev_list) {
973                 if (++idx <= start)
974                         continue;
975                 if (swconfig_send_switch(skb, NETLINK_CB(cb->skb).portid,
976                                 cb->nlh->nlmsg_seq, NLM_F_MULTI,
977                                 dev) < 0)
978                         break;
979         }
980         swconfig_unlock();
981         cb->args[0] = idx;
982
983         return skb->len;
984 }
985
986 static int
987 swconfig_done(struct netlink_callback *cb)
988 {
989         return 0;
990 }
991
992 static struct genl_ops swconfig_ops[] = {
993         {
994                 .cmd = SWITCH_CMD_LIST_GLOBAL,
995                 .doit = swconfig_list_attrs,
996                 .policy = switch_policy,
997         },
998         {
999                 .cmd = SWITCH_CMD_LIST_VLAN,
1000                 .doit = swconfig_list_attrs,
1001                 .policy = switch_policy,
1002         },
1003         {
1004                 .cmd = SWITCH_CMD_LIST_PORT,
1005                 .doit = swconfig_list_attrs,
1006                 .policy = switch_policy,
1007         },
1008         {
1009                 .cmd = SWITCH_CMD_GET_GLOBAL,
1010                 .doit = swconfig_get_attr,
1011                 .policy = switch_policy,
1012         },
1013         {
1014                 .cmd = SWITCH_CMD_GET_VLAN,
1015                 .doit = swconfig_get_attr,
1016                 .policy = switch_policy,
1017         },
1018         {
1019                 .cmd = SWITCH_CMD_GET_PORT,
1020                 .doit = swconfig_get_attr,
1021                 .policy = switch_policy,
1022         },
1023         {
1024                 .cmd = SWITCH_CMD_SET_GLOBAL,
1025                 .doit = swconfig_set_attr,
1026                 .policy = switch_policy,
1027         },
1028         {
1029                 .cmd = SWITCH_CMD_SET_VLAN,
1030                 .doit = swconfig_set_attr,
1031                 .policy = switch_policy,
1032         },
1033         {
1034                 .cmd = SWITCH_CMD_SET_PORT,
1035                 .doit = swconfig_set_attr,
1036                 .policy = switch_policy,
1037         },
1038         {
1039                 .cmd = SWITCH_CMD_GET_SWITCH,
1040                 .dumpit = swconfig_dump_switches,
1041                 .policy = switch_policy,
1042                 .done = swconfig_done,
1043         }
1044 };
1045
1046 #ifdef CONFIG_OF
1047 void
1048 of_switch_load_portmap(struct switch_dev *dev)
1049 {
1050         struct device_node *port;
1051
1052         if (!dev->of_node)
1053                 return;
1054
1055         for_each_child_of_node(dev->of_node, port) {
1056                 const __be32 *prop;
1057                 const char *segment;
1058                 int size, phys;
1059
1060                 if (!of_device_is_compatible(port, "swconfig,port"))
1061                         continue;
1062
1063                 if (of_property_read_string(port, "swconfig,segment", &segment))
1064                         continue;
1065
1066                 prop = of_get_property(port, "swconfig,portmap", &size);
1067                 if (!prop)
1068                         continue;
1069
1070                 if (size != (2 * sizeof(*prop))) {
1071                         pr_err("%s: failed to parse port mapping\n",
1072                                         port->name);
1073                         continue;
1074                 }
1075
1076                 phys = be32_to_cpup(prop++);
1077                 if ((phys < 0) | (phys >= dev->ports)) {
1078                         pr_err("%s: physical port index out of range\n",
1079                                         port->name);
1080                         continue;
1081                 }
1082
1083                 dev->portmap[phys].s = kstrdup(segment, GFP_KERNEL);
1084                 dev->portmap[phys].virt = be32_to_cpup(prop);
1085                 pr_debug("Found port: %s, physical: %d, virtual: %d\n",
1086                         segment, phys, dev->portmap[phys].virt);
1087         }
1088 }
1089 #endif
1090
1091 int
1092 register_switch(struct switch_dev *dev, struct net_device *netdev)
1093 {
1094         struct switch_dev *sdev;
1095         const int max_switches = 8 * sizeof(unsigned long);
1096         unsigned long in_use = 0;
1097         int err;
1098         int i;
1099
1100         INIT_LIST_HEAD(&dev->dev_list);
1101         if (netdev) {
1102                 dev->netdev = netdev;
1103                 if (!dev->alias)
1104                         dev->alias = netdev->name;
1105         }
1106         BUG_ON(!dev->alias);
1107
1108         if (dev->ports > 0) {
1109                 dev->portbuf = kzalloc(sizeof(struct switch_port) *
1110                                 dev->ports, GFP_KERNEL);
1111                 if (!dev->portbuf)
1112                         return -ENOMEM;
1113                 dev->portmap = kzalloc(sizeof(struct switch_portmap) *
1114                                 dev->ports, GFP_KERNEL);
1115                 if (!dev->portmap) {
1116                         kfree(dev->portbuf);
1117                         return -ENOMEM;
1118                 }
1119         }
1120         swconfig_defaults_init(dev);
1121         mutex_init(&dev->sw_mutex);
1122         swconfig_lock();
1123         dev->id = ++swdev_id;
1124
1125         list_for_each_entry(sdev, &swdevs, dev_list) {
1126                 if (!sscanf(sdev->devname, SWCONFIG_DEVNAME, &i))
1127                         continue;
1128                 if (i < 0 || i > max_switches)
1129                         continue;
1130
1131                 set_bit(i, &in_use);
1132         }
1133         i = find_first_zero_bit(&in_use, max_switches);
1134
1135         if (i == max_switches) {
1136                 swconfig_unlock();
1137                 return -ENFILE;
1138         }
1139
1140 #ifdef CONFIG_OF
1141         if (dev->ports)
1142                 of_switch_load_portmap(dev);
1143 #endif
1144
1145         /* fill device name */
1146         snprintf(dev->devname, IFNAMSIZ, SWCONFIG_DEVNAME, i);
1147
1148         list_add_tail(&dev->dev_list, &swdevs);
1149         swconfig_unlock();
1150
1151         err = swconfig_create_led_trigger(dev);
1152         if (err)
1153                 return err;
1154
1155         return 0;
1156 }
1157 EXPORT_SYMBOL_GPL(register_switch);
1158
1159 void
1160 unregister_switch(struct switch_dev *dev)
1161 {
1162         swconfig_destroy_led_trigger(dev);
1163         kfree(dev->portbuf);
1164         mutex_lock(&dev->sw_mutex);
1165         swconfig_lock();
1166         list_del(&dev->dev_list);
1167         swconfig_unlock();
1168         mutex_unlock(&dev->sw_mutex);
1169 }
1170 EXPORT_SYMBOL_GPL(unregister_switch);
1171
1172 int
1173 switch_generic_set_link(struct switch_dev *dev, int port,
1174                         struct switch_port_link *link)
1175 {
1176         if (WARN_ON(!dev->ops->phy_write16))
1177                 return -ENOTSUPP;
1178
1179         /* Generic implementation */
1180         if (link->aneg) {
1181                 dev->ops->phy_write16(dev, port, MII_BMCR, 0x0000);
1182                 dev->ops->phy_write16(dev, port, MII_BMCR, BMCR_ANENABLE | BMCR_ANRESTART);
1183         } else {
1184                 u16 bmcr = 0;
1185
1186                 if (link->duplex)
1187                         bmcr |= BMCR_FULLDPLX;
1188
1189                 switch (link->speed) {
1190                 case SWITCH_PORT_SPEED_10:
1191                         break;
1192                 case SWITCH_PORT_SPEED_100:
1193                         bmcr |= BMCR_SPEED100;
1194                         break;
1195                 case SWITCH_PORT_SPEED_1000:
1196                         bmcr |= BMCR_SPEED1000;
1197                         break;
1198                 default:
1199                         return -ENOTSUPP;
1200                 }
1201
1202                 dev->ops->phy_write16(dev, port, MII_BMCR, bmcr);
1203         }
1204
1205         return 0;
1206 }
1207
1208 static int __init
1209 swconfig_init(void)
1210 {
1211         INIT_LIST_HEAD(&swdevs);
1212         
1213         return genl_register_family_with_ops(&switch_fam, swconfig_ops);
1214 }
1215
1216 static void __exit
1217 swconfig_exit(void)
1218 {
1219         genl_unregister_family(&switch_fam);
1220 }
1221
1222 module_init(swconfig_init);
1223 module_exit(swconfig_exit);
1224