1 /* 2 * This file is part of the Chelsio T4 Ethernet driver for Linux. 3 * Copyright (C) 2003-2014 Chelsio Communications. All rights reserved. 4 * 5 * Written by Deepak (deepak.s@chelsio.com) 6 * 7 * This program is distributed in the hope that it will be useful, but WITHOUT 8 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 9 * FITNESS FOR A PARTICULAR PURPOSE. See the LICENSE file included in this 10 * release for licensing terms and conditions. 11 */ 12 13 #include <linux/module.h> 14 #include <linux/netdevice.h> 15 #include <linux/jhash.h> 16 #include <linux/if_vlan.h> 17 #include <net/addrconf.h> 18 #include "cxgb4.h" 19 #include "clip_tbl.h" 20 21 static inline unsigned int ipv4_clip_hash(struct clip_tbl *c, const u32 *key) 22 { 23 unsigned int clipt_size_half = c->clipt_size / 2; 24 25 return jhash_1word(*key, 0) % clipt_size_half; 26 } 27 28 static inline unsigned int ipv6_clip_hash(struct clip_tbl *d, const u32 *key) 29 { 30 unsigned int clipt_size_half = d->clipt_size / 2; 31 u32 xor = key[0] ^ key[1] ^ key[2] ^ key[3]; 32 33 return clipt_size_half + 34 (jhash_1word(xor, 0) % clipt_size_half); 35 } 36 37 static unsigned int clip_addr_hash(struct clip_tbl *ctbl, const u32 *addr, 38 u8 v6) 39 { 40 return v6 ? ipv6_clip_hash(ctbl, addr) : 41 ipv4_clip_hash(ctbl, addr); 42 } 43 44 static int clip6_get_mbox(const struct net_device *dev, 45 const struct in6_addr *lip) 46 { 47 struct adapter *adap = netdev2adap(dev); 48 struct fw_clip_cmd c; 49 50 memset(&c, 0, sizeof(c)); 51 c.op_to_write = htonl(FW_CMD_OP_V(FW_CLIP_CMD) | 52 FW_CMD_REQUEST_F | FW_CMD_WRITE_F); 53 c.alloc_to_len16 = htonl(FW_CLIP_CMD_ALLOC_F | FW_LEN16(c)); 54 *(__be64 *)&c.ip_hi = *(__be64 *)(lip->s6_addr); 55 *(__be64 *)&c.ip_lo = *(__be64 *)(lip->s6_addr + 8); 56 return t4_wr_mbox_meat(adap, adap->mbox, &c, sizeof(c), &c, false); 57 } 58 59 static int clip6_release_mbox(const struct net_device *dev, 60 const struct in6_addr *lip) 61 { 62 struct adapter *adap = netdev2adap(dev); 63 struct fw_clip_cmd c; 64 65 memset(&c, 0, sizeof(c)); 66 c.op_to_write = htonl(FW_CMD_OP_V(FW_CLIP_CMD) | 67 FW_CMD_REQUEST_F | FW_CMD_READ_F); 68 c.alloc_to_len16 = htonl(FW_CLIP_CMD_FREE_F | FW_LEN16(c)); 69 *(__be64 *)&c.ip_hi = *(__be64 *)(lip->s6_addr); 70 *(__be64 *)&c.ip_lo = *(__be64 *)(lip->s6_addr + 8); 71 return t4_wr_mbox_meat(adap, adap->mbox, &c, sizeof(c), &c, false); 72 } 73 74 int cxgb4_clip_get(const struct net_device *dev, const u32 *lip, u8 v6) 75 { 76 struct adapter *adap = netdev2adap(dev); 77 struct clip_tbl *ctbl = adap->clipt; 78 struct clip_entry *ce, *cte; 79 u32 *addr = (u32 *)lip; 80 int hash; 81 int ret = -1; 82 83 if (!ctbl) 84 return 0; 85 86 hash = clip_addr_hash(ctbl, addr, v6); 87 88 read_lock_bh(&ctbl->lock); 89 list_for_each_entry(cte, &ctbl->hash_list[hash], list) { 90 if (cte->addr6.sin6_family == AF_INET6 && v6) 91 ret = memcmp(lip, cte->addr6.sin6_addr.s6_addr, 92 sizeof(struct in6_addr)); 93 else if (cte->addr.sin_family == AF_INET && !v6) 94 ret = memcmp(lip, (char *)(&cte->addr.sin_addr), 95 sizeof(struct in_addr)); 96 if (!ret) { 97 ce = cte; 98 read_unlock_bh(&ctbl->lock); 99 goto found; 100 } 101 } 102 read_unlock_bh(&ctbl->lock); 103 104 write_lock_bh(&ctbl->lock); 105 if (!list_empty(&ctbl->ce_free_head)) { 106 ce = list_first_entry(&ctbl->ce_free_head, 107 struct clip_entry, list); 108 list_del(&ce->list); 109 INIT_LIST_HEAD(&ce->list); 110 spin_lock_init(&ce->lock); 111 atomic_set(&ce->refcnt, 0); 112 atomic_dec(&ctbl->nfree); 113 list_add_tail(&ce->list, &ctbl->hash_list[hash]); 114 if (v6) { 115 ce->addr6.sin6_family = AF_INET6; 116 memcpy(ce->addr6.sin6_addr.s6_addr, 117 lip, sizeof(struct in6_addr)); 118 ret = clip6_get_mbox(dev, (const struct in6_addr *)lip); 119 if (ret) { 120 write_unlock_bh(&ctbl->lock); 121 return ret; 122 } 123 } else { 124 ce->addr.sin_family = AF_INET; 125 memcpy((char *)(&ce->addr.sin_addr), lip, 126 sizeof(struct in_addr)); 127 } 128 } else { 129 write_unlock_bh(&ctbl->lock); 130 return -ENOMEM; 131 } 132 write_unlock_bh(&ctbl->lock); 133 found: 134 atomic_inc(&ce->refcnt); 135 136 return 0; 137 } 138 EXPORT_SYMBOL(cxgb4_clip_get); 139 140 void cxgb4_clip_release(const struct net_device *dev, const u32 *lip, u8 v6) 141 { 142 struct adapter *adap = netdev2adap(dev); 143 struct clip_tbl *ctbl = adap->clipt; 144 struct clip_entry *ce, *cte; 145 u32 *addr = (u32 *)lip; 146 int hash; 147 int ret = -1; 148 149 hash = clip_addr_hash(ctbl, addr, v6); 150 151 read_lock_bh(&ctbl->lock); 152 list_for_each_entry(cte, &ctbl->hash_list[hash], list) { 153 if (cte->addr6.sin6_family == AF_INET6 && v6) 154 ret = memcmp(lip, cte->addr6.sin6_addr.s6_addr, 155 sizeof(struct in6_addr)); 156 else if (cte->addr.sin_family == AF_INET && !v6) 157 ret = memcmp(lip, (char *)(&cte->addr.sin_addr), 158 sizeof(struct in_addr)); 159 if (!ret) { 160 ce = cte; 161 read_unlock_bh(&ctbl->lock); 162 goto found; 163 } 164 } 165 read_unlock_bh(&ctbl->lock); 166 167 return; 168 found: 169 write_lock_bh(&ctbl->lock); 170 spin_lock_bh(&ce->lock); 171 if (atomic_dec_and_test(&ce->refcnt)) { 172 list_del(&ce->list); 173 INIT_LIST_HEAD(&ce->list); 174 list_add_tail(&ce->list, &ctbl->ce_free_head); 175 atomic_inc(&ctbl->nfree); 176 if (v6) 177 clip6_release_mbox(dev, (const struct in6_addr *)lip); 178 } 179 spin_unlock_bh(&ce->lock); 180 write_unlock_bh(&ctbl->lock); 181 } 182 EXPORT_SYMBOL(cxgb4_clip_release); 183 184 /* Retrieves IPv6 addresses from a root device (bond, vlan) associated with 185 * a physical device. 186 * The physical device reference is needed to send the actul CLIP command. 187 */ 188 static int cxgb4_update_dev_clip(struct net_device *root_dev, 189 struct net_device *dev) 190 { 191 struct inet6_dev *idev = NULL; 192 struct inet6_ifaddr *ifa; 193 int ret = 0; 194 195 idev = __in6_dev_get(root_dev); 196 if (!idev) 197 return ret; 198 199 read_lock_bh(&idev->lock); 200 list_for_each_entry(ifa, &idev->addr_list, if_list) { 201 ret = cxgb4_clip_get(dev, (const u32 *)ifa->addr.s6_addr, 1); 202 if (ret < 0) 203 break; 204 } 205 read_unlock_bh(&idev->lock); 206 207 return ret; 208 } 209 210 int cxgb4_update_root_dev_clip(struct net_device *dev) 211 { 212 struct net_device *root_dev = NULL; 213 int i, ret = 0; 214 215 /* First populate the real net device's IPv6 addresses */ 216 ret = cxgb4_update_dev_clip(dev, dev); 217 if (ret) 218 return ret; 219 220 /* Parse all bond and vlan devices layered on top of the physical dev */ 221 root_dev = netdev_master_upper_dev_get_rcu(dev); 222 if (root_dev) { 223 ret = cxgb4_update_dev_clip(root_dev, dev); 224 if (ret) 225 return ret; 226 } 227 228 for (i = 0; i < VLAN_N_VID; i++) { 229 root_dev = __vlan_find_dev_deep_rcu(dev, htons(ETH_P_8021Q), i); 230 if (!root_dev) 231 continue; 232 233 ret = cxgb4_update_dev_clip(root_dev, dev); 234 if (ret) 235 break; 236 } 237 238 return ret; 239 } 240 EXPORT_SYMBOL(cxgb4_update_root_dev_clip); 241 242 int clip_tbl_show(struct seq_file *seq, void *v) 243 { 244 struct adapter *adapter = seq->private; 245 struct clip_tbl *ctbl = adapter->clipt; 246 struct clip_entry *ce; 247 char ip[60]; 248 int i; 249 250 read_lock_bh(&ctbl->lock); 251 252 seq_puts(seq, "IP Address Users\n"); 253 for (i = 0 ; i < ctbl->clipt_size; ++i) { 254 list_for_each_entry(ce, &ctbl->hash_list[i], list) { 255 ip[0] = '\0'; 256 sprintf(ip, "%pISc", &ce->addr); 257 seq_printf(seq, "%-25s %u\n", ip, 258 atomic_read(&ce->refcnt)); 259 } 260 } 261 seq_printf(seq, "Free clip entries : %d\n", atomic_read(&ctbl->nfree)); 262 263 read_unlock_bh(&ctbl->lock); 264 265 return 0; 266 } 267 268 struct clip_tbl *t4_init_clip_tbl(unsigned int clipt_start, 269 unsigned int clipt_end) 270 { 271 struct clip_entry *cl_list; 272 struct clip_tbl *ctbl; 273 unsigned int clipt_size; 274 int i; 275 276 if (clipt_start >= clipt_end) 277 return NULL; 278 clipt_size = clipt_end - clipt_start + 1; 279 if (clipt_size < CLIPT_MIN_HASH_BUCKETS) 280 return NULL; 281 282 ctbl = t4_alloc_mem(sizeof(*ctbl) + 283 clipt_size*sizeof(struct list_head)); 284 if (!ctbl) 285 return NULL; 286 287 ctbl->clipt_start = clipt_start; 288 ctbl->clipt_size = clipt_size; 289 INIT_LIST_HEAD(&ctbl->ce_free_head); 290 291 atomic_set(&ctbl->nfree, clipt_size); 292 rwlock_init(&ctbl->lock); 293 294 for (i = 0; i < ctbl->clipt_size; ++i) 295 INIT_LIST_HEAD(&ctbl->hash_list[i]); 296 297 cl_list = t4_alloc_mem(clipt_size*sizeof(struct clip_entry)); 298 ctbl->cl_list = (void *)cl_list; 299 300 for (i = 0; i < clipt_size; i++) { 301 INIT_LIST_HEAD(&cl_list[i].list); 302 list_add_tail(&cl_list[i].list, &ctbl->ce_free_head); 303 } 304 305 return ctbl; 306 } 307 308 void t4_cleanup_clip_tbl(struct adapter *adap) 309 { 310 struct clip_tbl *ctbl = adap->clipt; 311 312 if (ctbl) { 313 if (ctbl->cl_list) 314 t4_free_mem(ctbl->cl_list); 315 t4_free_mem(ctbl); 316 } 317 } 318 EXPORT_SYMBOL(t4_cleanup_clip_tbl); 319