1 /*
2  * Copyright (c) 2004 Topspin Communications.  All rights reserved.
3  *
4  * This software is available to you under a choice of one of two
5  * licenses.  You may choose to be licensed under the terms of the GNU
6  * General Public License (GPL) Version 2, available from the file
7  * COPYING in the main directory of this source tree, or the
8  * OpenIB.org BSD license below:
9  *
10  *     Redistribution and use in source and binary forms, with or
11  *     without modification, are permitted provided that the following
12  *     conditions are met:
13  *
14  *      - Redistributions of source code must retain the above
15  *        copyright notice, this list of conditions and the following
16  *        disclaimer.
17  *
18  *      - Redistributions in binary form must reproduce the above
19  *        copyright notice, this list of conditions and the following
20  *        disclaimer in the documentation and/or other materials
21  *        provided with the distribution.
22  *
23  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
24  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
25  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
26  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
27  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
28  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
29  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
30  * SOFTWARE.
31  */
32 
33 #include <linux/module.h>
34 
35 #include <linux/init.h>
36 #include <linux/seq_file.h>
37 
38 #include <asm/uaccess.h>
39 
40 #include "ipoib.h"
41 
42 static ssize_t show_parent(struct device *d, struct device_attribute *attr,
43 			   char *buf)
44 {
45 	struct net_device *dev = to_net_dev(d);
46 	struct ipoib_dev_priv *priv = netdev_priv(dev);
47 
48 	return sprintf(buf, "%s\n", priv->parent->name);
49 }
50 static DEVICE_ATTR(parent, S_IRUGO, show_parent, NULL);
51 
52 int __ipoib_vlan_add(struct ipoib_dev_priv *ppriv, struct ipoib_dev_priv *priv,
53 		     u16 pkey, int type)
54 {
55 	int result;
56 
57 	priv->max_ib_mtu = ppriv->max_ib_mtu;
58 	/* MTU will be reset when mcast join happens */
59 	priv->dev->mtu   = IPOIB_UD_MTU(priv->max_ib_mtu);
60 	priv->mcast_mtu  = priv->admin_mtu = priv->dev->mtu;
61 	priv->parent = ppriv->dev;
62 	set_bit(IPOIB_FLAG_SUBINTERFACE, &priv->flags);
63 
64 	result = ipoib_set_dev_features(priv, ppriv->ca);
65 	if (result)
66 		goto err;
67 
68 	priv->pkey = pkey;
69 
70 	memcpy(priv->dev->dev_addr, ppriv->dev->dev_addr, INFINIBAND_ALEN);
71 	memcpy(&priv->local_gid, &ppriv->local_gid, sizeof(priv->local_gid));
72 	set_bit(IPOIB_FLAG_DEV_ADDR_SET, &priv->flags);
73 	priv->dev->broadcast[8] = pkey >> 8;
74 	priv->dev->broadcast[9] = pkey & 0xff;
75 
76 	result = ipoib_dev_init(priv->dev, ppriv->ca, ppriv->port);
77 	if (result < 0) {
78 		ipoib_warn(ppriv, "failed to initialize subinterface: "
79 			   "device %s, port %d",
80 			   ppriv->ca->name, ppriv->port);
81 		goto err;
82 	}
83 
84 	result = register_netdevice(priv->dev);
85 	if (result) {
86 		ipoib_warn(priv, "failed to initialize; error %i", result);
87 		goto register_failed;
88 	}
89 
90 	ipoib_create_debug_files(priv->dev);
91 
92 	/* RTNL childs don't need proprietary sysfs entries */
93 	if (type == IPOIB_LEGACY_CHILD) {
94 		if (ipoib_cm_add_mode_attr(priv->dev))
95 			goto sysfs_failed;
96 		if (ipoib_add_pkey_attr(priv->dev))
97 			goto sysfs_failed;
98 		if (ipoib_add_umcast_attr(priv->dev))
99 			goto sysfs_failed;
100 
101 		if (device_create_file(&priv->dev->dev, &dev_attr_parent))
102 			goto sysfs_failed;
103 	}
104 
105 	priv->child_type  = type;
106 	list_add_tail(&priv->list, &ppriv->child_intfs);
107 
108 	return 0;
109 
110 sysfs_failed:
111 	result = -ENOMEM;
112 	ipoib_delete_debug_files(priv->dev);
113 	unregister_netdevice(priv->dev);
114 
115 register_failed:
116 	ipoib_dev_cleanup(priv->dev);
117 
118 err:
119 	return result;
120 }
121 
122 int ipoib_vlan_add(struct net_device *pdev, unsigned short pkey)
123 {
124 	struct ipoib_dev_priv *ppriv, *priv;
125 	char intf_name[IFNAMSIZ];
126 	struct ipoib_dev_priv *tpriv;
127 	int result;
128 
129 	if (!capable(CAP_NET_ADMIN))
130 		return -EPERM;
131 
132 	ppriv = netdev_priv(pdev);
133 
134 	if (test_bit(IPOIB_FLAG_GOING_DOWN, &ppriv->flags))
135 		return -EPERM;
136 
137 	snprintf(intf_name, sizeof intf_name, "%s.%04x",
138 		 ppriv->dev->name, pkey);
139 	priv = ipoib_intf_alloc(intf_name);
140 	if (!priv)
141 		return -ENOMEM;
142 
143 	if (!rtnl_trylock())
144 		return restart_syscall();
145 
146 	down_write(&ppriv->vlan_rwsem);
147 
148 	/*
149 	 * First ensure this isn't a duplicate. We check the parent device and
150 	 * then all of the legacy child interfaces to make sure the Pkey
151 	 * doesn't match.
152 	 */
153 	if (ppriv->pkey == pkey) {
154 		result = -ENOTUNIQ;
155 		goto out;
156 	}
157 
158 	list_for_each_entry(tpriv, &ppriv->child_intfs, list) {
159 		if (tpriv->pkey == pkey &&
160 		    tpriv->child_type == IPOIB_LEGACY_CHILD) {
161 			result = -ENOTUNIQ;
162 			goto out;
163 		}
164 	}
165 
166 	result = __ipoib_vlan_add(ppriv, priv, pkey, IPOIB_LEGACY_CHILD);
167 
168 out:
169 	up_write(&ppriv->vlan_rwsem);
170 
171 	if (result)
172 		free_netdev(priv->dev);
173 
174 	rtnl_unlock();
175 
176 	return result;
177 }
178 
179 int ipoib_vlan_delete(struct net_device *pdev, unsigned short pkey)
180 {
181 	struct ipoib_dev_priv *ppriv, *priv, *tpriv;
182 	struct net_device *dev = NULL;
183 
184 	if (!capable(CAP_NET_ADMIN))
185 		return -EPERM;
186 
187 	ppriv = netdev_priv(pdev);
188 
189 	if (test_bit(IPOIB_FLAG_GOING_DOWN, &ppriv->flags))
190 		return -EPERM;
191 
192 	if (!rtnl_trylock())
193 		return restart_syscall();
194 
195 	down_write(&ppriv->vlan_rwsem);
196 	list_for_each_entry_safe(priv, tpriv, &ppriv->child_intfs, list) {
197 		if (priv->pkey == pkey &&
198 		    priv->child_type == IPOIB_LEGACY_CHILD) {
199 			unregister_netdevice(priv->dev);
200 			list_del(&priv->list);
201 			dev = priv->dev;
202 			break;
203 		}
204 	}
205 	up_write(&ppriv->vlan_rwsem);
206 
207 	rtnl_unlock();
208 
209 	if (dev) {
210 		free_netdev(dev);
211 		return 0;
212 	}
213 
214 	return -ENODEV;
215 }
216