1 // SPDX-License-Identifier: GPL-2.0
2 /*
3 * Copyright IBM Corp. 2007, 2009
4 * Author(s): Utz Bacher <utz.bacher@de.ibm.com>,
5 * Frank Pavlic <fpavlic@de.ibm.com>,
6 * Thomas Spatzier <tspat@de.ibm.com>,
7 * Frank Blaschka <frank.blaschka@de.ibm.com>
8 */
9
10 #define KMSG_COMPONENT "qeth"
11 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
12
13 #include <linux/module.h>
14 #include <linux/moduleparam.h>
15 #include <linux/bitops.h>
16 #include <linux/string.h>
17 #include <linux/errno.h>
18 #include <linux/kernel.h>
19 #include <linux/etherdevice.h>
20 #include <linux/ip.h>
21 #include <linux/in.h>
22 #include <linux/ipv6.h>
23 #include <linux/inetdevice.h>
24 #include <linux/igmp.h>
25 #include <linux/slab.h>
26 #include <linux/if_ether.h>
27 #include <linux/if_vlan.h>
28 #include <linux/skbuff.h>
29
30 #include <net/ip.h>
31 #include <net/arp.h>
32 #include <net/route.h>
33 #include <net/ipv6.h>
34 #include <net/ip6_route.h>
35 #include <net/iucv/af_iucv.h>
36 #include <linux/hashtable.h>
37
38 #include "qeth_l3.h"
39
40 static int qeth_l3_register_addr_entry(struct qeth_card *,
41 struct qeth_ipaddr *);
42 static int qeth_l3_deregister_addr_entry(struct qeth_card *,
43 struct qeth_ipaddr *);
44
qeth_l3_ipaddr_to_string(enum qeth_prot_versions proto,const u8 * addr,char * buf)45 int qeth_l3_ipaddr_to_string(enum qeth_prot_versions proto, const u8 *addr,
46 char *buf)
47 {
48 if (proto == QETH_PROT_IPV4)
49 return sprintf(buf, "%pI4", addr);
50 else
51 return sprintf(buf, "%pI6", addr);
52 }
53
qeth_l3_find_addr_by_ip(struct qeth_card * card,struct qeth_ipaddr * query)54 static struct qeth_ipaddr *qeth_l3_find_addr_by_ip(struct qeth_card *card,
55 struct qeth_ipaddr *query)
56 {
57 u32 key = qeth_l3_ipaddr_hash(query);
58 struct qeth_ipaddr *addr;
59
60 if (query->is_multicast) {
61 hash_for_each_possible(card->rx_mode_addrs, addr, hnode, key)
62 if (qeth_l3_addr_match_ip(addr, query))
63 return addr;
64 } else {
65 hash_for_each_possible(card->ip_htable, addr, hnode, key)
66 if (qeth_l3_addr_match_ip(addr, query))
67 return addr;
68 }
69 return NULL;
70 }
71
qeth_l3_convert_addr_to_bits(u8 * addr,u8 * bits,int len)72 static void qeth_l3_convert_addr_to_bits(u8 *addr, u8 *bits, int len)
73 {
74 int i, j;
75 u8 octet;
76
77 for (i = 0; i < len; ++i) {
78 octet = addr[i];
79 for (j = 7; j >= 0; --j) {
80 bits[i*8 + j] = octet & 1;
81 octet >>= 1;
82 }
83 }
84 }
85
qeth_l3_is_addr_covered_by_ipato(struct qeth_card * card,struct qeth_ipaddr * addr)86 static bool qeth_l3_is_addr_covered_by_ipato(struct qeth_card *card,
87 struct qeth_ipaddr *addr)
88 {
89 struct qeth_ipato_entry *ipatoe;
90 u8 addr_bits[128] = {0, };
91 u8 ipatoe_bits[128] = {0, };
92 int rc = 0;
93
94 if (!card->ipato.enabled)
95 return false;
96 if (addr->type != QETH_IP_TYPE_NORMAL)
97 return false;
98
99 qeth_l3_convert_addr_to_bits((u8 *) &addr->u, addr_bits,
100 (addr->proto == QETH_PROT_IPV4) ? 4 : 16);
101 list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
102 if (addr->proto != ipatoe->proto)
103 continue;
104 qeth_l3_convert_addr_to_bits(ipatoe->addr, ipatoe_bits,
105 (ipatoe->proto == QETH_PROT_IPV4) ?
106 4 : 16);
107 rc = !memcmp(addr_bits, ipatoe_bits, ipatoe->mask_bits);
108 if (rc)
109 break;
110 }
111 /* invert? */
112 if ((addr->proto == QETH_PROT_IPV4) && card->ipato.invert4)
113 rc = !rc;
114 else if ((addr->proto == QETH_PROT_IPV6) && card->ipato.invert6)
115 rc = !rc;
116
117 return rc;
118 }
119
qeth_l3_delete_ip(struct qeth_card * card,struct qeth_ipaddr * tmp_addr)120 static int qeth_l3_delete_ip(struct qeth_card *card,
121 struct qeth_ipaddr *tmp_addr)
122 {
123 int rc = 0;
124 struct qeth_ipaddr *addr;
125
126 if (tmp_addr->type == QETH_IP_TYPE_RXIP)
127 QETH_CARD_TEXT(card, 2, "delrxip");
128 else if (tmp_addr->type == QETH_IP_TYPE_VIPA)
129 QETH_CARD_TEXT(card, 2, "delvipa");
130 else
131 QETH_CARD_TEXT(card, 2, "delip");
132
133 if (tmp_addr->proto == QETH_PROT_IPV4)
134 QETH_CARD_HEX(card, 4, &tmp_addr->u.a4.addr, 4);
135 else {
136 QETH_CARD_HEX(card, 4, &tmp_addr->u.a6.addr, 8);
137 QETH_CARD_HEX(card, 4, ((char *)&tmp_addr->u.a6.addr) + 8, 8);
138 }
139
140 addr = qeth_l3_find_addr_by_ip(card, tmp_addr);
141 if (!addr || !qeth_l3_addr_match_all(addr, tmp_addr))
142 return -ENOENT;
143
144 addr->ref_counter--;
145 if (addr->type == QETH_IP_TYPE_NORMAL && addr->ref_counter > 0)
146 return rc;
147
148 if (qeth_card_hw_is_reachable(card))
149 rc = qeth_l3_deregister_addr_entry(card, addr);
150
151 hash_del(&addr->hnode);
152 kfree(addr);
153
154 return rc;
155 }
156
qeth_l3_add_ip(struct qeth_card * card,struct qeth_ipaddr * tmp_addr)157 static int qeth_l3_add_ip(struct qeth_card *card, struct qeth_ipaddr *tmp_addr)
158 {
159 int rc = 0;
160 struct qeth_ipaddr *addr;
161 char buf[40];
162
163 if (tmp_addr->type == QETH_IP_TYPE_RXIP)
164 QETH_CARD_TEXT(card, 2, "addrxip");
165 else if (tmp_addr->type == QETH_IP_TYPE_VIPA)
166 QETH_CARD_TEXT(card, 2, "addvipa");
167 else
168 QETH_CARD_TEXT(card, 2, "addip");
169
170 if (tmp_addr->proto == QETH_PROT_IPV4)
171 QETH_CARD_HEX(card, 4, &tmp_addr->u.a4.addr, 4);
172 else {
173 QETH_CARD_HEX(card, 4, &tmp_addr->u.a6.addr, 8);
174 QETH_CARD_HEX(card, 4, ((char *)&tmp_addr->u.a6.addr) + 8, 8);
175 }
176
177 addr = qeth_l3_find_addr_by_ip(card, tmp_addr);
178 if (addr) {
179 if (tmp_addr->type != QETH_IP_TYPE_NORMAL)
180 return -EADDRINUSE;
181 if (qeth_l3_addr_match_all(addr, tmp_addr)) {
182 addr->ref_counter++;
183 return 0;
184 }
185 qeth_l3_ipaddr_to_string(tmp_addr->proto, (u8 *)&tmp_addr->u,
186 buf);
187 dev_warn(&card->gdev->dev,
188 "Registering IP address %s failed\n", buf);
189 return -EADDRINUSE;
190 } else {
191 addr = kmemdup(tmp_addr, sizeof(*tmp_addr), GFP_KERNEL);
192 if (!addr)
193 return -ENOMEM;
194
195 if (qeth_l3_is_addr_covered_by_ipato(card, addr)) {
196 QETH_CARD_TEXT(card, 2, "tkovaddr");
197 addr->ipato = 1;
198 }
199 hash_add(card->ip_htable, &addr->hnode,
200 qeth_l3_ipaddr_hash(addr));
201
202 if (!qeth_card_hw_is_reachable(card)) {
203 addr->disp_flag = QETH_DISP_ADDR_ADD;
204 return 0;
205 }
206
207 rc = qeth_l3_register_addr_entry(card, addr);
208
209 if (!rc || rc == -EADDRINUSE || rc == -ENETDOWN) {
210 addr->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
211 } else {
212 hash_del(&addr->hnode);
213 kfree(addr);
214 }
215 }
216 return rc;
217 }
218
qeth_l3_modify_ip(struct qeth_card * card,struct qeth_ipaddr * addr,bool add)219 static int qeth_l3_modify_ip(struct qeth_card *card, struct qeth_ipaddr *addr,
220 bool add)
221 {
222 int rc;
223
224 mutex_lock(&card->ip_lock);
225 rc = add ? qeth_l3_add_ip(card, addr) : qeth_l3_delete_ip(card, addr);
226 mutex_unlock(&card->ip_lock);
227
228 return rc;
229 }
230
qeth_l3_drain_rx_mode_cache(struct qeth_card * card)231 static void qeth_l3_drain_rx_mode_cache(struct qeth_card *card)
232 {
233 struct qeth_ipaddr *addr;
234 struct hlist_node *tmp;
235 int i;
236
237 hash_for_each_safe(card->rx_mode_addrs, i, tmp, addr, hnode) {
238 hash_del(&addr->hnode);
239 kfree(addr);
240 }
241 }
242
qeth_l3_clear_ip_htable(struct qeth_card * card,int recover)243 static void qeth_l3_clear_ip_htable(struct qeth_card *card, int recover)
244 {
245 struct qeth_ipaddr *addr;
246 struct hlist_node *tmp;
247 int i;
248
249 QETH_CARD_TEXT(card, 4, "clearip");
250
251 mutex_lock(&card->ip_lock);
252
253 hash_for_each_safe(card->ip_htable, i, tmp, addr, hnode) {
254 if (!recover) {
255 hash_del(&addr->hnode);
256 kfree(addr);
257 } else {
258 /* prepare for recovery */
259 addr->disp_flag = QETH_DISP_ADDR_ADD;
260 }
261 }
262
263 mutex_unlock(&card->ip_lock);
264 }
265
qeth_l3_recover_ip(struct qeth_card * card)266 static void qeth_l3_recover_ip(struct qeth_card *card)
267 {
268 struct qeth_ipaddr *addr;
269 struct hlist_node *tmp;
270 int i;
271 int rc;
272
273 QETH_CARD_TEXT(card, 4, "recovrip");
274
275 mutex_lock(&card->ip_lock);
276
277 hash_for_each_safe(card->ip_htable, i, tmp, addr, hnode) {
278 if (addr->disp_flag == QETH_DISP_ADDR_ADD) {
279 rc = qeth_l3_register_addr_entry(card, addr);
280
281 if (!rc || rc == -EADDRINUSE || rc == -ENETDOWN) {
282 /* keep it in the records */
283 addr->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
284 } else {
285 /* bad address */
286 hash_del(&addr->hnode);
287 kfree(addr);
288 }
289 }
290 }
291
292 mutex_unlock(&card->ip_lock);
293 }
294
qeth_l3_setdelip_cb(struct qeth_card * card,struct qeth_reply * reply,unsigned long data)295 static int qeth_l3_setdelip_cb(struct qeth_card *card, struct qeth_reply *reply,
296 unsigned long data)
297 {
298 struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
299
300 switch (cmd->hdr.return_code) {
301 case IPA_RC_SUCCESS:
302 return 0;
303 case IPA_RC_DUPLICATE_IP_ADDRESS:
304 return -EADDRINUSE;
305 case IPA_RC_MC_ADDR_NOT_FOUND:
306 return -ENOENT;
307 case IPA_RC_LAN_OFFLINE:
308 return -ENETDOWN;
309 default:
310 return -EIO;
311 }
312 }
313
qeth_l3_send_setdelmc(struct qeth_card * card,struct qeth_ipaddr * addr,enum qeth_ipa_cmds ipacmd)314 static int qeth_l3_send_setdelmc(struct qeth_card *card,
315 struct qeth_ipaddr *addr,
316 enum qeth_ipa_cmds ipacmd)
317 {
318 struct qeth_cmd_buffer *iob;
319 struct qeth_ipa_cmd *cmd;
320
321 QETH_CARD_TEXT(card, 4, "setdelmc");
322
323 iob = qeth_ipa_alloc_cmd(card, ipacmd, addr->proto,
324 IPA_DATA_SIZEOF(setdelipm));
325 if (!iob)
326 return -ENOMEM;
327 cmd = __ipa_cmd(iob);
328 if (addr->proto == QETH_PROT_IPV6) {
329 cmd->data.setdelipm.ip = addr->u.a6.addr;
330 ipv6_eth_mc_map(&addr->u.a6.addr, cmd->data.setdelipm.mac);
331 } else {
332 cmd->data.setdelipm.ip.s6_addr32[3] = addr->u.a4.addr;
333 ip_eth_mc_map(addr->u.a4.addr, cmd->data.setdelipm.mac);
334 }
335
336 return qeth_send_ipa_cmd(card, iob, qeth_l3_setdelip_cb, NULL);
337 }
338
qeth_l3_set_ipv6_prefix(struct in6_addr * prefix,unsigned int len)339 static void qeth_l3_set_ipv6_prefix(struct in6_addr *prefix, unsigned int len)
340 {
341 unsigned int i = 0;
342
343 while (len && i < 4) {
344 int mask_len = min_t(int, len, 32);
345
346 prefix->s6_addr32[i] = inet_make_mask(mask_len);
347 len -= mask_len;
348 i++;
349 }
350 }
351
qeth_l3_get_setdelip_flags(struct qeth_ipaddr * addr,bool set)352 static u32 qeth_l3_get_setdelip_flags(struct qeth_ipaddr *addr, bool set)
353 {
354 switch (addr->type) {
355 case QETH_IP_TYPE_RXIP:
356 return (set) ? QETH_IPA_SETIP_TAKEOVER_FLAG : 0;
357 case QETH_IP_TYPE_VIPA:
358 return (set) ? QETH_IPA_SETIP_VIPA_FLAG :
359 QETH_IPA_DELIP_VIPA_FLAG;
360 default:
361 return (set && addr->ipato) ? QETH_IPA_SETIP_TAKEOVER_FLAG : 0;
362 }
363 }
364
qeth_l3_send_setdelip(struct qeth_card * card,struct qeth_ipaddr * addr,enum qeth_ipa_cmds ipacmd)365 static int qeth_l3_send_setdelip(struct qeth_card *card,
366 struct qeth_ipaddr *addr,
367 enum qeth_ipa_cmds ipacmd)
368 {
369 struct qeth_cmd_buffer *iob;
370 struct qeth_ipa_cmd *cmd;
371 u32 flags;
372
373 QETH_CARD_TEXT(card, 4, "setdelip");
374
375 iob = qeth_ipa_alloc_cmd(card, ipacmd, addr->proto,
376 IPA_DATA_SIZEOF(setdelip6));
377 if (!iob)
378 return -ENOMEM;
379 cmd = __ipa_cmd(iob);
380
381 flags = qeth_l3_get_setdelip_flags(addr, ipacmd == IPA_CMD_SETIP);
382 QETH_CARD_TEXT_(card, 4, "flags%02X", flags);
383
384 if (addr->proto == QETH_PROT_IPV6) {
385 cmd->data.setdelip6.addr = addr->u.a6.addr;
386 qeth_l3_set_ipv6_prefix(&cmd->data.setdelip6.prefix,
387 addr->u.a6.pfxlen);
388 cmd->data.setdelip6.flags = flags;
389 } else {
390 cmd->data.setdelip4.addr = addr->u.a4.addr;
391 cmd->data.setdelip4.mask = addr->u.a4.mask;
392 cmd->data.setdelip4.flags = flags;
393 }
394
395 return qeth_send_ipa_cmd(card, iob, qeth_l3_setdelip_cb, NULL);
396 }
397
qeth_l3_send_setrouting(struct qeth_card * card,enum qeth_routing_types type,enum qeth_prot_versions prot)398 static int qeth_l3_send_setrouting(struct qeth_card *card,
399 enum qeth_routing_types type, enum qeth_prot_versions prot)
400 {
401 int rc;
402 struct qeth_ipa_cmd *cmd;
403 struct qeth_cmd_buffer *iob;
404
405 QETH_CARD_TEXT(card, 4, "setroutg");
406 iob = qeth_ipa_alloc_cmd(card, IPA_CMD_SETRTG, prot,
407 IPA_DATA_SIZEOF(setrtg));
408 if (!iob)
409 return -ENOMEM;
410 cmd = __ipa_cmd(iob);
411 cmd->data.setrtg.type = (type);
412 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
413
414 return rc;
415 }
416
qeth_l3_correct_routing_type(struct qeth_card * card,enum qeth_routing_types * type,enum qeth_prot_versions prot)417 static int qeth_l3_correct_routing_type(struct qeth_card *card,
418 enum qeth_routing_types *type, enum qeth_prot_versions prot)
419 {
420 if (IS_IQD(card)) {
421 switch (*type) {
422 case NO_ROUTER:
423 case PRIMARY_CONNECTOR:
424 case SECONDARY_CONNECTOR:
425 case MULTICAST_ROUTER:
426 return 0;
427 default:
428 goto out_inval;
429 }
430 } else {
431 switch (*type) {
432 case NO_ROUTER:
433 case PRIMARY_ROUTER:
434 case SECONDARY_ROUTER:
435 return 0;
436 case MULTICAST_ROUTER:
437 if (qeth_is_ipafunc_supported(card, prot,
438 IPA_OSA_MC_ROUTER))
439 return 0;
440 goto out_inval;
441 default:
442 goto out_inval;
443 }
444 }
445 out_inval:
446 *type = NO_ROUTER;
447 return -EINVAL;
448 }
449
qeth_l3_setrouting_v4(struct qeth_card * card)450 int qeth_l3_setrouting_v4(struct qeth_card *card)
451 {
452 int rc;
453
454 QETH_CARD_TEXT(card, 3, "setrtg4");
455
456 rc = qeth_l3_correct_routing_type(card, &card->options.route4.type,
457 QETH_PROT_IPV4);
458 if (rc)
459 return rc;
460
461 rc = qeth_l3_send_setrouting(card, card->options.route4.type,
462 QETH_PROT_IPV4);
463 if (rc) {
464 card->options.route4.type = NO_ROUTER;
465 QETH_DBF_MESSAGE(2, "Error (%#06x) while setting routing type on device %x. Type set to 'no router'.\n",
466 rc, CARD_DEVID(card));
467 }
468 return rc;
469 }
470
qeth_l3_setrouting_v6(struct qeth_card * card)471 int qeth_l3_setrouting_v6(struct qeth_card *card)
472 {
473 int rc = 0;
474
475 QETH_CARD_TEXT(card, 3, "setrtg6");
476
477 if (!qeth_is_supported(card, IPA_IPV6))
478 return 0;
479 rc = qeth_l3_correct_routing_type(card, &card->options.route6.type,
480 QETH_PROT_IPV6);
481 if (rc)
482 return rc;
483
484 rc = qeth_l3_send_setrouting(card, card->options.route6.type,
485 QETH_PROT_IPV6);
486 if (rc) {
487 card->options.route6.type = NO_ROUTER;
488 QETH_DBF_MESSAGE(2, "Error (%#06x) while setting routing type on device %x. Type set to 'no router'.\n",
489 rc, CARD_DEVID(card));
490 }
491 return rc;
492 }
493
494 /*
495 * IP address takeover related functions
496 */
497
498 /**
499 * qeth_l3_update_ipato() - Update 'takeover' property, for all NORMAL IPs.
500 *
501 * Caller must hold ip_lock.
502 */
qeth_l3_update_ipato(struct qeth_card * card)503 void qeth_l3_update_ipato(struct qeth_card *card)
504 {
505 struct qeth_ipaddr *addr;
506 unsigned int i;
507
508 hash_for_each(card->ip_htable, i, addr, hnode) {
509 if (addr->type != QETH_IP_TYPE_NORMAL)
510 continue;
511 addr->ipato = qeth_l3_is_addr_covered_by_ipato(card, addr);
512 }
513 }
514
qeth_l3_clear_ipato_list(struct qeth_card * card)515 static void qeth_l3_clear_ipato_list(struct qeth_card *card)
516 {
517 struct qeth_ipato_entry *ipatoe, *tmp;
518
519 mutex_lock(&card->ip_lock);
520
521 list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
522 list_del(&ipatoe->entry);
523 kfree(ipatoe);
524 }
525
526 qeth_l3_update_ipato(card);
527 mutex_unlock(&card->ip_lock);
528 }
529
qeth_l3_add_ipato_entry(struct qeth_card * card,struct qeth_ipato_entry * new)530 int qeth_l3_add_ipato_entry(struct qeth_card *card,
531 struct qeth_ipato_entry *new)
532 {
533 struct qeth_ipato_entry *ipatoe;
534 int rc = 0;
535
536 QETH_CARD_TEXT(card, 2, "addipato");
537
538 mutex_lock(&card->ip_lock);
539
540 list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
541 if (ipatoe->proto != new->proto)
542 continue;
543 if (!memcmp(ipatoe->addr, new->addr,
544 (ipatoe->proto == QETH_PROT_IPV4) ? 4 : 16) &&
545 (ipatoe->mask_bits == new->mask_bits)) {
546 rc = -EEXIST;
547 break;
548 }
549 }
550
551 if (!rc) {
552 list_add_tail(&new->entry, &card->ipato.entries);
553 qeth_l3_update_ipato(card);
554 }
555
556 mutex_unlock(&card->ip_lock);
557
558 return rc;
559 }
560
qeth_l3_del_ipato_entry(struct qeth_card * card,enum qeth_prot_versions proto,u8 * addr,unsigned int mask_bits)561 int qeth_l3_del_ipato_entry(struct qeth_card *card,
562 enum qeth_prot_versions proto, u8 *addr,
563 unsigned int mask_bits)
564 {
565 struct qeth_ipato_entry *ipatoe, *tmp;
566 int rc = -ENOENT;
567
568 QETH_CARD_TEXT(card, 2, "delipato");
569
570 mutex_lock(&card->ip_lock);
571
572 list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
573 if (ipatoe->proto != proto)
574 continue;
575 if (!memcmp(ipatoe->addr, addr,
576 (proto == QETH_PROT_IPV4) ? 4 : 16) &&
577 (ipatoe->mask_bits == mask_bits)) {
578 list_del(&ipatoe->entry);
579 qeth_l3_update_ipato(card);
580 kfree(ipatoe);
581 rc = 0;
582 }
583 }
584
585 mutex_unlock(&card->ip_lock);
586
587 return rc;
588 }
589
qeth_l3_modify_rxip_vipa(struct qeth_card * card,bool add,const u8 * ip,enum qeth_ip_types type,enum qeth_prot_versions proto)590 int qeth_l3_modify_rxip_vipa(struct qeth_card *card, bool add, const u8 *ip,
591 enum qeth_ip_types type,
592 enum qeth_prot_versions proto)
593 {
594 struct qeth_ipaddr addr;
595
596 qeth_l3_init_ipaddr(&addr, type, proto);
597 if (proto == QETH_PROT_IPV4)
598 memcpy(&addr.u.a4.addr, ip, 4);
599 else
600 memcpy(&addr.u.a6.addr, ip, 16);
601
602 return qeth_l3_modify_ip(card, &addr, add);
603 }
604
qeth_l3_modify_hsuid(struct qeth_card * card,bool add)605 int qeth_l3_modify_hsuid(struct qeth_card *card, bool add)
606 {
607 struct qeth_ipaddr addr;
608 unsigned int i;
609
610 qeth_l3_init_ipaddr(&addr, QETH_IP_TYPE_NORMAL, QETH_PROT_IPV6);
611 addr.u.a6.addr.s6_addr[0] = 0xfe;
612 addr.u.a6.addr.s6_addr[1] = 0x80;
613 for (i = 0; i < 8; i++)
614 addr.u.a6.addr.s6_addr[8+i] = card->options.hsuid[i];
615
616 return qeth_l3_modify_ip(card, &addr, add);
617 }
618
qeth_l3_register_addr_entry(struct qeth_card * card,struct qeth_ipaddr * addr)619 static int qeth_l3_register_addr_entry(struct qeth_card *card,
620 struct qeth_ipaddr *addr)
621 {
622 char buf[50];
623 int rc = 0;
624 int cnt = 3;
625
626 if (card->options.sniffer)
627 return 0;
628
629 if (addr->proto == QETH_PROT_IPV4) {
630 QETH_CARD_TEXT(card, 2, "setaddr4");
631 QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
632 } else if (addr->proto == QETH_PROT_IPV6) {
633 QETH_CARD_TEXT(card, 2, "setaddr6");
634 QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
635 QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
636 } else {
637 QETH_CARD_TEXT(card, 2, "setaddr?");
638 QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
639 }
640 do {
641 if (addr->is_multicast)
642 rc = qeth_l3_send_setdelmc(card, addr, IPA_CMD_SETIPM);
643 else
644 rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_SETIP);
645 if (rc)
646 QETH_CARD_TEXT(card, 2, "failed");
647 } while ((--cnt > 0) && rc);
648 if (rc) {
649 QETH_CARD_TEXT(card, 2, "FAILED");
650 qeth_l3_ipaddr_to_string(addr->proto, (u8 *)&addr->u, buf);
651 dev_warn(&card->gdev->dev,
652 "Registering IP address %s failed\n", buf);
653 }
654 return rc;
655 }
656
qeth_l3_deregister_addr_entry(struct qeth_card * card,struct qeth_ipaddr * addr)657 static int qeth_l3_deregister_addr_entry(struct qeth_card *card,
658 struct qeth_ipaddr *addr)
659 {
660 int rc = 0;
661
662 if (card->options.sniffer)
663 return 0;
664
665 if (addr->proto == QETH_PROT_IPV4) {
666 QETH_CARD_TEXT(card, 2, "deladdr4");
667 QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
668 } else if (addr->proto == QETH_PROT_IPV6) {
669 QETH_CARD_TEXT(card, 2, "deladdr6");
670 QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
671 QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
672 } else {
673 QETH_CARD_TEXT(card, 2, "deladdr?");
674 QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
675 }
676 if (addr->is_multicast)
677 rc = qeth_l3_send_setdelmc(card, addr, IPA_CMD_DELIPM);
678 else
679 rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_DELIP);
680 if (rc)
681 QETH_CARD_TEXT(card, 2, "failed");
682
683 return rc;
684 }
685
qeth_l3_setadapter_parms(struct qeth_card * card)686 static int qeth_l3_setadapter_parms(struct qeth_card *card)
687 {
688 int rc = 0;
689
690 QETH_CARD_TEXT(card, 2, "setadprm");
691
692 if (qeth_adp_supported(card, IPA_SETADP_ALTER_MAC_ADDRESS)) {
693 rc = qeth_setadpparms_change_macaddr(card);
694 if (rc)
695 dev_warn(&card->gdev->dev, "Reading the adapter MAC"
696 " address failed\n");
697 }
698
699 return rc;
700 }
701
qeth_l3_start_ipa_arp_processing(struct qeth_card * card)702 static int qeth_l3_start_ipa_arp_processing(struct qeth_card *card)
703 {
704 int rc;
705
706 QETH_CARD_TEXT(card, 3, "ipaarp");
707
708 if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
709 dev_info(&card->gdev->dev,
710 "ARP processing not supported on %s!\n",
711 netdev_name(card->dev));
712 return 0;
713 }
714 rc = qeth_send_simple_setassparms(card, IPA_ARP_PROCESSING,
715 IPA_CMD_ASS_START, NULL);
716 if (rc) {
717 dev_warn(&card->gdev->dev,
718 "Starting ARP processing support for %s failed\n",
719 netdev_name(card->dev));
720 }
721 return rc;
722 }
723
qeth_l3_start_ipa_source_mac(struct qeth_card * card)724 static int qeth_l3_start_ipa_source_mac(struct qeth_card *card)
725 {
726 int rc;
727
728 QETH_CARD_TEXT(card, 3, "stsrcmac");
729
730 if (!qeth_is_supported(card, IPA_SOURCE_MAC)) {
731 dev_info(&card->gdev->dev,
732 "Inbound source MAC-address not supported on %s\n",
733 netdev_name(card->dev));
734 return -EOPNOTSUPP;
735 }
736
737 rc = qeth_send_simple_setassparms(card, IPA_SOURCE_MAC,
738 IPA_CMD_ASS_START, NULL);
739 if (rc)
740 dev_warn(&card->gdev->dev,
741 "Starting source MAC-address support for %s failed\n",
742 netdev_name(card->dev));
743 return rc;
744 }
745
qeth_l3_start_ipa_vlan(struct qeth_card * card)746 static int qeth_l3_start_ipa_vlan(struct qeth_card *card)
747 {
748 int rc = 0;
749
750 QETH_CARD_TEXT(card, 3, "strtvlan");
751
752 if (!qeth_is_supported(card, IPA_FULL_VLAN)) {
753 dev_info(&card->gdev->dev,
754 "VLAN not supported on %s\n", netdev_name(card->dev));
755 return -EOPNOTSUPP;
756 }
757
758 rc = qeth_send_simple_setassparms(card, IPA_VLAN_PRIO,
759 IPA_CMD_ASS_START, NULL);
760 if (rc) {
761 dev_warn(&card->gdev->dev,
762 "Starting VLAN support for %s failed\n",
763 netdev_name(card->dev));
764 } else {
765 dev_info(&card->gdev->dev, "VLAN enabled\n");
766 }
767 return rc;
768 }
769
qeth_l3_start_ipa_multicast(struct qeth_card * card)770 static int qeth_l3_start_ipa_multicast(struct qeth_card *card)
771 {
772 int rc;
773
774 QETH_CARD_TEXT(card, 3, "stmcast");
775
776 if (!qeth_is_supported(card, IPA_MULTICASTING)) {
777 dev_info(&card->gdev->dev,
778 "Multicast not supported on %s\n",
779 netdev_name(card->dev));
780 return -EOPNOTSUPP;
781 }
782
783 rc = qeth_send_simple_setassparms(card, IPA_MULTICASTING,
784 IPA_CMD_ASS_START, NULL);
785 if (rc) {
786 dev_warn(&card->gdev->dev,
787 "Starting multicast support for %s failed\n",
788 netdev_name(card->dev));
789 } else {
790 dev_info(&card->gdev->dev, "Multicast enabled\n");
791 card->dev->flags |= IFF_MULTICAST;
792 }
793 return rc;
794 }
795
qeth_l3_softsetup_ipv6(struct qeth_card * card)796 static int qeth_l3_softsetup_ipv6(struct qeth_card *card)
797 {
798 u32 ipv6_data = 3;
799 int rc;
800
801 QETH_CARD_TEXT(card, 3, "softipv6");
802
803 if (IS_IQD(card))
804 goto out;
805
806 rc = qeth_send_simple_setassparms(card, IPA_IPV6, IPA_CMD_ASS_START,
807 &ipv6_data);
808 if (rc) {
809 dev_err(&card->gdev->dev,
810 "Activating IPv6 support for %s failed\n",
811 netdev_name(card->dev));
812 return rc;
813 }
814 rc = qeth_send_simple_setassparms_v6(card, IPA_IPV6, IPA_CMD_ASS_START,
815 NULL);
816 if (rc) {
817 dev_err(&card->gdev->dev,
818 "Activating IPv6 support for %s failed\n",
819 netdev_name(card->dev));
820 return rc;
821 }
822 rc = qeth_send_simple_setassparms_v6(card, IPA_PASSTHRU,
823 IPA_CMD_ASS_START, NULL);
824 if (rc) {
825 dev_warn(&card->gdev->dev,
826 "Enabling the passthrough mode for %s failed\n",
827 netdev_name(card->dev));
828 return rc;
829 }
830 out:
831 dev_info(&card->gdev->dev, "IPV6 enabled\n");
832 return 0;
833 }
834
qeth_l3_start_ipa_ipv6(struct qeth_card * card)835 static int qeth_l3_start_ipa_ipv6(struct qeth_card *card)
836 {
837 QETH_CARD_TEXT(card, 3, "strtipv6");
838
839 if (!qeth_is_supported(card, IPA_IPV6)) {
840 dev_info(&card->gdev->dev,
841 "IPv6 not supported on %s\n", netdev_name(card->dev));
842 return 0;
843 }
844 return qeth_l3_softsetup_ipv6(card);
845 }
846
qeth_l3_start_ipa_broadcast(struct qeth_card * card)847 static int qeth_l3_start_ipa_broadcast(struct qeth_card *card)
848 {
849 u32 filter_data = 1;
850 int rc;
851
852 QETH_CARD_TEXT(card, 3, "stbrdcst");
853 card->info.broadcast_capable = 0;
854 if (!qeth_is_supported(card, IPA_FILTERING)) {
855 dev_info(&card->gdev->dev,
856 "Broadcast not supported on %s\n",
857 netdev_name(card->dev));
858 rc = -EOPNOTSUPP;
859 goto out;
860 }
861 rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
862 IPA_CMD_ASS_START, NULL);
863 if (rc) {
864 dev_warn(&card->gdev->dev,
865 "Enabling broadcast filtering for %s failed\n",
866 netdev_name(card->dev));
867 goto out;
868 }
869
870 rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
871 IPA_CMD_ASS_CONFIGURE, &filter_data);
872 if (rc) {
873 dev_warn(&card->gdev->dev,
874 "Setting up broadcast filtering for %s failed\n",
875 netdev_name(card->dev));
876 goto out;
877 }
878 card->info.broadcast_capable = QETH_BROADCAST_WITH_ECHO;
879 dev_info(&card->gdev->dev, "Broadcast enabled\n");
880 rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
881 IPA_CMD_ASS_ENABLE, &filter_data);
882 if (rc) {
883 dev_warn(&card->gdev->dev,
884 "Setting up broadcast echo filtering for %s failed\n",
885 netdev_name(card->dev));
886 goto out;
887 }
888 card->info.broadcast_capable = QETH_BROADCAST_WITHOUT_ECHO;
889 out:
890 if (card->info.broadcast_capable)
891 card->dev->flags |= IFF_BROADCAST;
892 else
893 card->dev->flags &= ~IFF_BROADCAST;
894 return rc;
895 }
896
qeth_l3_start_ipassists(struct qeth_card * card)897 static void qeth_l3_start_ipassists(struct qeth_card *card)
898 {
899 QETH_CARD_TEXT(card, 3, "strtipas");
900
901 qeth_l3_start_ipa_arp_processing(card); /* go on*/
902 qeth_l3_start_ipa_source_mac(card); /* go on*/
903 qeth_l3_start_ipa_vlan(card); /* go on*/
904 qeth_l3_start_ipa_multicast(card); /* go on*/
905 qeth_l3_start_ipa_ipv6(card); /* go on*/
906 qeth_l3_start_ipa_broadcast(card); /* go on*/
907 }
908
qeth_l3_iqd_read_initial_mac_cb(struct qeth_card * card,struct qeth_reply * reply,unsigned long data)909 static int qeth_l3_iqd_read_initial_mac_cb(struct qeth_card *card,
910 struct qeth_reply *reply, unsigned long data)
911 {
912 struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
913
914 if (cmd->hdr.return_code)
915 return -EIO;
916 if (!is_valid_ether_addr(cmd->data.create_destroy_addr.mac_addr))
917 return -EADDRNOTAVAIL;
918
919 ether_addr_copy(card->dev->dev_addr,
920 cmd->data.create_destroy_addr.mac_addr);
921 return 0;
922 }
923
qeth_l3_iqd_read_initial_mac(struct qeth_card * card)924 static int qeth_l3_iqd_read_initial_mac(struct qeth_card *card)
925 {
926 int rc = 0;
927 struct qeth_cmd_buffer *iob;
928
929 QETH_CARD_TEXT(card, 2, "hsrmac");
930
931 iob = qeth_ipa_alloc_cmd(card, IPA_CMD_CREATE_ADDR, QETH_PROT_IPV6,
932 IPA_DATA_SIZEOF(create_destroy_addr));
933 if (!iob)
934 return -ENOMEM;
935
936 rc = qeth_send_ipa_cmd(card, iob, qeth_l3_iqd_read_initial_mac_cb,
937 NULL);
938 return rc;
939 }
940
qeth_l3_get_unique_id_cb(struct qeth_card * card,struct qeth_reply * reply,unsigned long data)941 static int qeth_l3_get_unique_id_cb(struct qeth_card *card,
942 struct qeth_reply *reply, unsigned long data)
943 {
944 struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
945 u16 *uid = reply->param;
946
947 if (cmd->hdr.return_code == 0) {
948 *uid = cmd->data.create_destroy_addr.uid;
949 return 0;
950 }
951
952 dev_warn(&card->gdev->dev, "The network adapter failed to generate a unique ID\n");
953 return -EIO;
954 }
955
qeth_l3_get_unique_id(struct qeth_card * card,u16 uid)956 static u16 qeth_l3_get_unique_id(struct qeth_card *card, u16 uid)
957 {
958 struct qeth_cmd_buffer *iob;
959
960 QETH_CARD_TEXT(card, 2, "guniqeid");
961
962 if (!qeth_is_supported(card, IPA_IPV6))
963 goto out;
964
965 iob = qeth_ipa_alloc_cmd(card, IPA_CMD_CREATE_ADDR, QETH_PROT_IPV6,
966 IPA_DATA_SIZEOF(create_destroy_addr));
967 if (!iob)
968 goto out;
969
970 __ipa_cmd(iob)->data.create_destroy_addr.uid = uid;
971 qeth_send_ipa_cmd(card, iob, qeth_l3_get_unique_id_cb, &uid);
972
973 out:
974 return uid;
975 }
976
977 static int
qeth_diags_trace_cb(struct qeth_card * card,struct qeth_reply * reply,unsigned long data)978 qeth_diags_trace_cb(struct qeth_card *card, struct qeth_reply *reply,
979 unsigned long data)
980 {
981 struct qeth_ipa_cmd *cmd;
982 __u16 rc;
983
984 QETH_CARD_TEXT(card, 2, "diastrcb");
985
986 cmd = (struct qeth_ipa_cmd *)data;
987 rc = cmd->hdr.return_code;
988 if (rc)
989 QETH_CARD_TEXT_(card, 2, "dxter%x", rc);
990 switch (cmd->data.diagass.action) {
991 case QETH_DIAGS_CMD_TRACE_QUERY:
992 break;
993 case QETH_DIAGS_CMD_TRACE_DISABLE:
994 switch (rc) {
995 case 0:
996 case IPA_RC_INVALID_SUBCMD:
997 card->info.promisc_mode = SET_PROMISC_MODE_OFF;
998 dev_info(&card->gdev->dev, "The HiperSockets network "
999 "traffic analyzer is deactivated\n");
1000 break;
1001 default:
1002 break;
1003 }
1004 break;
1005 case QETH_DIAGS_CMD_TRACE_ENABLE:
1006 switch (rc) {
1007 case 0:
1008 card->info.promisc_mode = SET_PROMISC_MODE_ON;
1009 dev_info(&card->gdev->dev, "The HiperSockets network "
1010 "traffic analyzer is activated\n");
1011 break;
1012 case IPA_RC_HARDWARE_AUTH_ERROR:
1013 dev_warn(&card->gdev->dev, "The device is not "
1014 "authorized to run as a HiperSockets network "
1015 "traffic analyzer\n");
1016 break;
1017 case IPA_RC_TRACE_ALREADY_ACTIVE:
1018 dev_warn(&card->gdev->dev, "A HiperSockets "
1019 "network traffic analyzer is already "
1020 "active in the HiperSockets LAN\n");
1021 break;
1022 default:
1023 break;
1024 }
1025 break;
1026 default:
1027 QETH_DBF_MESSAGE(2, "Unknown sniffer action (%#06x) on device %x\n",
1028 cmd->data.diagass.action, CARD_DEVID(card));
1029 }
1030
1031 return rc ? -EIO : 0;
1032 }
1033
1034 static int
qeth_diags_trace(struct qeth_card * card,enum qeth_diags_trace_cmds diags_cmd)1035 qeth_diags_trace(struct qeth_card *card, enum qeth_diags_trace_cmds diags_cmd)
1036 {
1037 struct qeth_cmd_buffer *iob;
1038 struct qeth_ipa_cmd *cmd;
1039
1040 QETH_CARD_TEXT(card, 2, "diagtrac");
1041
1042 iob = qeth_get_diag_cmd(card, QETH_DIAGS_CMD_TRACE, 0);
1043 if (!iob)
1044 return -ENOMEM;
1045 cmd = __ipa_cmd(iob);
1046 cmd->data.diagass.type = QETH_DIAGS_TYPE_HIPERSOCKET;
1047 cmd->data.diagass.action = diags_cmd;
1048 return qeth_send_ipa_cmd(card, iob, qeth_diags_trace_cb, NULL);
1049 }
1050
qeth_l3_add_mcast_rtnl(struct net_device * dev,int vid,void * arg)1051 static int qeth_l3_add_mcast_rtnl(struct net_device *dev, int vid, void *arg)
1052 {
1053 struct qeth_card *card = arg;
1054 struct inet6_dev *in6_dev;
1055 struct in_device *in4_dev;
1056 struct qeth_ipaddr *ipm;
1057 struct qeth_ipaddr tmp;
1058 struct ip_mc_list *im4;
1059 struct ifmcaddr6 *im6;
1060
1061 QETH_CARD_TEXT(card, 4, "addmc");
1062
1063 if (!dev || !(dev->flags & IFF_UP))
1064 goto out;
1065
1066 in4_dev = __in_dev_get_rtnl(dev);
1067 if (!in4_dev)
1068 goto walk_ipv6;
1069
1070 qeth_l3_init_ipaddr(&tmp, QETH_IP_TYPE_NORMAL, QETH_PROT_IPV4);
1071 tmp.disp_flag = QETH_DISP_ADDR_ADD;
1072 tmp.is_multicast = 1;
1073
1074 for (im4 = rtnl_dereference(in4_dev->mc_list); im4 != NULL;
1075 im4 = rtnl_dereference(im4->next_rcu)) {
1076 tmp.u.a4.addr = im4->multiaddr;
1077
1078 ipm = qeth_l3_find_addr_by_ip(card, &tmp);
1079 if (ipm) {
1080 /* for mcast, by-IP match means full match */
1081 ipm->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
1082 continue;
1083 }
1084
1085 ipm = kmemdup(&tmp, sizeof(tmp), GFP_KERNEL);
1086 if (!ipm)
1087 continue;
1088
1089 hash_add(card->rx_mode_addrs, &ipm->hnode,
1090 qeth_l3_ipaddr_hash(ipm));
1091 }
1092
1093 walk_ipv6:
1094 if (!qeth_is_supported(card, IPA_IPV6))
1095 goto out;
1096
1097 in6_dev = __in6_dev_get(dev);
1098 if (!in6_dev)
1099 goto out;
1100
1101 qeth_l3_init_ipaddr(&tmp, QETH_IP_TYPE_NORMAL, QETH_PROT_IPV6);
1102 tmp.disp_flag = QETH_DISP_ADDR_ADD;
1103 tmp.is_multicast = 1;
1104
1105 for (im6 = rtnl_dereference(in6_dev->mc_list);
1106 im6;
1107 im6 = rtnl_dereference(im6->next)) {
1108 tmp.u.a6.addr = im6->mca_addr;
1109
1110 ipm = qeth_l3_find_addr_by_ip(card, &tmp);
1111 if (ipm) {
1112 /* for mcast, by-IP match means full match */
1113 ipm->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
1114 continue;
1115 }
1116
1117 ipm = kmemdup(&tmp, sizeof(tmp), GFP_ATOMIC);
1118 if (!ipm)
1119 continue;
1120
1121 hash_add(card->rx_mode_addrs, &ipm->hnode,
1122 qeth_l3_ipaddr_hash(ipm));
1123
1124 }
1125
1126 out:
1127 return 0;
1128 }
1129
qeth_l3_set_promisc_mode(struct qeth_card * card)1130 static void qeth_l3_set_promisc_mode(struct qeth_card *card)
1131 {
1132 bool enable = card->dev->flags & IFF_PROMISC;
1133
1134 if (card->info.promisc_mode == enable)
1135 return;
1136
1137 if (IS_VM_NIC(card)) { /* Guestlan trace */
1138 if (qeth_adp_supported(card, IPA_SETADP_SET_PROMISC_MODE))
1139 qeth_setadp_promisc_mode(card, enable);
1140 } else if (card->options.sniffer && /* HiperSockets trace */
1141 qeth_adp_supported(card, IPA_SETADP_SET_DIAG_ASSIST)) {
1142 if (enable) {
1143 QETH_CARD_TEXT(card, 3, "+promisc");
1144 qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_ENABLE);
1145 } else {
1146 QETH_CARD_TEXT(card, 3, "-promisc");
1147 qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
1148 }
1149 }
1150 }
1151
qeth_l3_rx_mode_work(struct work_struct * work)1152 static void qeth_l3_rx_mode_work(struct work_struct *work)
1153 {
1154 struct qeth_card *card = container_of(work, struct qeth_card,
1155 rx_mode_work);
1156 struct qeth_ipaddr *addr;
1157 struct hlist_node *tmp;
1158 int i, rc;
1159
1160 QETH_CARD_TEXT(card, 3, "setmulti");
1161
1162 if (!card->options.sniffer) {
1163 rtnl_lock();
1164 qeth_l3_add_mcast_rtnl(card->dev, 0, card);
1165 if (qeth_is_supported(card, IPA_FULL_VLAN))
1166 vlan_for_each(card->dev, qeth_l3_add_mcast_rtnl, card);
1167 rtnl_unlock();
1168
1169 hash_for_each_safe(card->rx_mode_addrs, i, tmp, addr, hnode) {
1170 switch (addr->disp_flag) {
1171 case QETH_DISP_ADDR_DELETE:
1172 rc = qeth_l3_deregister_addr_entry(card, addr);
1173 if (!rc || rc == -ENOENT) {
1174 hash_del(&addr->hnode);
1175 kfree(addr);
1176 }
1177 break;
1178 case QETH_DISP_ADDR_ADD:
1179 rc = qeth_l3_register_addr_entry(card, addr);
1180 if (rc && rc != -ENETDOWN) {
1181 hash_del(&addr->hnode);
1182 kfree(addr);
1183 break;
1184 }
1185 fallthrough;
1186 default:
1187 /* for next call to set_rx_mode(): */
1188 addr->disp_flag = QETH_DISP_ADDR_DELETE;
1189 }
1190 }
1191 }
1192
1193 qeth_l3_set_promisc_mode(card);
1194 }
1195
qeth_l3_arp_makerc(u16 rc)1196 static int qeth_l3_arp_makerc(u16 rc)
1197 {
1198 switch (rc) {
1199 case IPA_RC_SUCCESS:
1200 return 0;
1201 case QETH_IPA_ARP_RC_NOTSUPP:
1202 case QETH_IPA_ARP_RC_Q_NOTSUPP:
1203 return -EOPNOTSUPP;
1204 case QETH_IPA_ARP_RC_OUT_OF_RANGE:
1205 return -EINVAL;
1206 case QETH_IPA_ARP_RC_Q_NO_DATA:
1207 return -ENOENT;
1208 default:
1209 return -EIO;
1210 }
1211 }
1212
qeth_l3_arp_cmd_cb(struct qeth_card * card,struct qeth_reply * reply,unsigned long data)1213 static int qeth_l3_arp_cmd_cb(struct qeth_card *card, struct qeth_reply *reply,
1214 unsigned long data)
1215 {
1216 struct qeth_ipa_cmd *cmd = (struct qeth_ipa_cmd *) data;
1217
1218 qeth_setassparms_cb(card, reply, data);
1219 return qeth_l3_arp_makerc(cmd->hdr.return_code);
1220 }
1221
qeth_l3_arp_set_no_entries(struct qeth_card * card,int no_entries)1222 static int qeth_l3_arp_set_no_entries(struct qeth_card *card, int no_entries)
1223 {
1224 struct qeth_cmd_buffer *iob;
1225 int rc;
1226
1227 QETH_CARD_TEXT(card, 3, "arpstnoe");
1228
1229 /*
1230 * currently GuestLAN only supports the ARP assist function
1231 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_SET_NO_ENTRIES;
1232 * thus we say EOPNOTSUPP for this ARP function
1233 */
1234 if (IS_VM_NIC(card))
1235 return -EOPNOTSUPP;
1236 if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
1237 return -EOPNOTSUPP;
1238 }
1239
1240 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
1241 IPA_CMD_ASS_ARP_SET_NO_ENTRIES,
1242 SETASS_DATA_SIZEOF(flags_32bit),
1243 QETH_PROT_IPV4);
1244 if (!iob)
1245 return -ENOMEM;
1246
1247 __ipa_cmd(iob)->data.setassparms.data.flags_32bit = (u32) no_entries;
1248 rc = qeth_send_ipa_cmd(card, iob, qeth_l3_arp_cmd_cb, NULL);
1249 if (rc)
1250 QETH_DBF_MESSAGE(2, "Could not set number of ARP entries on device %x: %#x\n",
1251 CARD_DEVID(card), rc);
1252 return rc;
1253 }
1254
get_arp_entry_size(struct qeth_card * card,struct qeth_arp_query_data * qdata,struct qeth_arp_entrytype * type,__u8 strip_entries)1255 static __u32 get_arp_entry_size(struct qeth_card *card,
1256 struct qeth_arp_query_data *qdata,
1257 struct qeth_arp_entrytype *type, __u8 strip_entries)
1258 {
1259 __u32 rc;
1260 __u8 is_hsi;
1261
1262 is_hsi = qdata->reply_bits == 5;
1263 if (type->ip == QETHARP_IP_ADDR_V4) {
1264 QETH_CARD_TEXT(card, 4, "arpev4");
1265 if (strip_entries) {
1266 rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5_short) :
1267 sizeof(struct qeth_arp_qi_entry7_short);
1268 } else {
1269 rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5) :
1270 sizeof(struct qeth_arp_qi_entry7);
1271 }
1272 } else if (type->ip == QETHARP_IP_ADDR_V6) {
1273 QETH_CARD_TEXT(card, 4, "arpev6");
1274 if (strip_entries) {
1275 rc = is_hsi ?
1276 sizeof(struct qeth_arp_qi_entry5_short_ipv6) :
1277 sizeof(struct qeth_arp_qi_entry7_short_ipv6);
1278 } else {
1279 rc = is_hsi ?
1280 sizeof(struct qeth_arp_qi_entry5_ipv6) :
1281 sizeof(struct qeth_arp_qi_entry7_ipv6);
1282 }
1283 } else {
1284 QETH_CARD_TEXT(card, 4, "arpinv");
1285 rc = 0;
1286 }
1287
1288 return rc;
1289 }
1290
arpentry_matches_prot(struct qeth_arp_entrytype * type,__u16 prot)1291 static int arpentry_matches_prot(struct qeth_arp_entrytype *type, __u16 prot)
1292 {
1293 return (type->ip == QETHARP_IP_ADDR_V4 && prot == QETH_PROT_IPV4) ||
1294 (type->ip == QETHARP_IP_ADDR_V6 && prot == QETH_PROT_IPV6);
1295 }
1296
qeth_l3_arp_query_cb(struct qeth_card * card,struct qeth_reply * reply,unsigned long data)1297 static int qeth_l3_arp_query_cb(struct qeth_card *card,
1298 struct qeth_reply *reply, unsigned long data)
1299 {
1300 struct qeth_ipa_cmd *cmd;
1301 struct qeth_arp_query_data *qdata;
1302 struct qeth_arp_query_info *qinfo;
1303 int e;
1304 int entrybytes_done;
1305 int stripped_bytes;
1306 __u8 do_strip_entries;
1307
1308 QETH_CARD_TEXT(card, 3, "arpquecb");
1309
1310 qinfo = (struct qeth_arp_query_info *) reply->param;
1311 cmd = (struct qeth_ipa_cmd *) data;
1312 QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.prot_version);
1313 if (cmd->hdr.return_code) {
1314 QETH_CARD_TEXT(card, 4, "arpcberr");
1315 QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
1316 return qeth_l3_arp_makerc(cmd->hdr.return_code);
1317 }
1318 if (cmd->data.setassparms.hdr.return_code) {
1319 cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
1320 QETH_CARD_TEXT(card, 4, "setaperr");
1321 QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
1322 return qeth_l3_arp_makerc(cmd->hdr.return_code);
1323 }
1324 qdata = &cmd->data.setassparms.data.query_arp;
1325 QETH_CARD_TEXT_(card, 4, "anoen%i", qdata->no_entries);
1326
1327 do_strip_entries = (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES) > 0;
1328 stripped_bytes = do_strip_entries ? QETH_QARP_MEDIASPECIFIC_BYTES : 0;
1329 entrybytes_done = 0;
1330 for (e = 0; e < qdata->no_entries; ++e) {
1331 char *cur_entry;
1332 __u32 esize;
1333 struct qeth_arp_entrytype *etype;
1334
1335 cur_entry = &qdata->data + entrybytes_done;
1336 etype = &((struct qeth_arp_qi_entry5 *) cur_entry)->type;
1337 if (!arpentry_matches_prot(etype, cmd->hdr.prot_version)) {
1338 QETH_CARD_TEXT(card, 4, "pmis");
1339 QETH_CARD_TEXT_(card, 4, "%i", etype->ip);
1340 break;
1341 }
1342 esize = get_arp_entry_size(card, qdata, etype,
1343 do_strip_entries);
1344 QETH_CARD_TEXT_(card, 5, "esz%i", esize);
1345 if (!esize)
1346 break;
1347
1348 if ((qinfo->udata_len - qinfo->udata_offset) < esize) {
1349 QETH_CARD_TEXT_(card, 4, "qaer3%i", -ENOSPC);
1350 memset(qinfo->udata, 0, 4);
1351 return -ENOSPC;
1352 }
1353
1354 memcpy(qinfo->udata + qinfo->udata_offset,
1355 &qdata->data + entrybytes_done + stripped_bytes,
1356 esize);
1357 entrybytes_done += esize + stripped_bytes;
1358 qinfo->udata_offset += esize;
1359 ++qinfo->no_entries;
1360 }
1361 /* check if all replies received ... */
1362 if (cmd->data.setassparms.hdr.seq_no <
1363 cmd->data.setassparms.hdr.number_of_replies)
1364 return 1;
1365 QETH_CARD_TEXT_(card, 4, "nove%i", qinfo->no_entries);
1366 memcpy(qinfo->udata, &qinfo->no_entries, 4);
1367 /* keep STRIP_ENTRIES flag so the user program can distinguish
1368 * stripped entries from normal ones */
1369 if (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES)
1370 qdata->reply_bits |= QETH_QARP_STRIP_ENTRIES;
1371 memcpy(qinfo->udata + QETH_QARP_MASK_OFFSET, &qdata->reply_bits, 2);
1372 QETH_CARD_TEXT_(card, 4, "rc%i", 0);
1373 return 0;
1374 }
1375
qeth_l3_query_arp_cache_info(struct qeth_card * card,enum qeth_prot_versions prot,struct qeth_arp_query_info * qinfo)1376 static int qeth_l3_query_arp_cache_info(struct qeth_card *card,
1377 enum qeth_prot_versions prot,
1378 struct qeth_arp_query_info *qinfo)
1379 {
1380 struct qeth_cmd_buffer *iob;
1381 struct qeth_ipa_cmd *cmd;
1382 int rc;
1383
1384 QETH_CARD_TEXT_(card, 3, "qarpipv%i", prot);
1385
1386 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
1387 IPA_CMD_ASS_ARP_QUERY_INFO,
1388 SETASS_DATA_SIZEOF(query_arp), prot);
1389 if (!iob)
1390 return -ENOMEM;
1391 cmd = __ipa_cmd(iob);
1392 cmd->data.setassparms.data.query_arp.request_bits = 0x000F;
1393 rc = qeth_send_ipa_cmd(card, iob, qeth_l3_arp_query_cb, qinfo);
1394 if (rc)
1395 QETH_DBF_MESSAGE(2, "Error while querying ARP cache on device %x: %#x\n",
1396 CARD_DEVID(card), rc);
1397 return rc;
1398 }
1399
qeth_l3_arp_query(struct qeth_card * card,char __user * udata)1400 static int qeth_l3_arp_query(struct qeth_card *card, char __user *udata)
1401 {
1402 struct qeth_arp_query_info qinfo = {0, };
1403 int rc;
1404
1405 QETH_CARD_TEXT(card, 3, "arpquery");
1406
1407 if (!qeth_is_supported(card,/*IPA_QUERY_ARP_ADDR_INFO*/
1408 IPA_ARP_PROCESSING)) {
1409 QETH_CARD_TEXT(card, 3, "arpqnsup");
1410 rc = -EOPNOTSUPP;
1411 goto out;
1412 }
1413 /* get size of userspace buffer and mask_bits -> 6 bytes */
1414 if (copy_from_user(&qinfo, udata, 6)) {
1415 rc = -EFAULT;
1416 goto out;
1417 }
1418 qinfo.udata = kzalloc(qinfo.udata_len, GFP_KERNEL);
1419 if (!qinfo.udata) {
1420 rc = -ENOMEM;
1421 goto out;
1422 }
1423 qinfo.udata_offset = QETH_QARP_ENTRIES_OFFSET;
1424 rc = qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV4, &qinfo);
1425 if (rc) {
1426 if (copy_to_user(udata, qinfo.udata, 4))
1427 rc = -EFAULT;
1428 goto free_and_out;
1429 }
1430 if (qinfo.mask_bits & QETH_QARP_WITH_IPV6) {
1431 /* fails in case of GuestLAN QDIO mode */
1432 qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV6, &qinfo);
1433 }
1434 if (copy_to_user(udata, qinfo.udata, qinfo.udata_len)) {
1435 QETH_CARD_TEXT(card, 4, "qactf");
1436 rc = -EFAULT;
1437 goto free_and_out;
1438 }
1439 QETH_CARD_TEXT(card, 4, "qacts");
1440
1441 free_and_out:
1442 kfree(qinfo.udata);
1443 out:
1444 return rc;
1445 }
1446
qeth_l3_arp_modify_entry(struct qeth_card * card,struct qeth_arp_cache_entry * entry,enum qeth_arp_process_subcmds arp_cmd)1447 static int qeth_l3_arp_modify_entry(struct qeth_card *card,
1448 struct qeth_arp_cache_entry *entry,
1449 enum qeth_arp_process_subcmds arp_cmd)
1450 {
1451 struct qeth_arp_cache_entry *cmd_entry;
1452 struct qeth_cmd_buffer *iob;
1453 int rc;
1454
1455 if (arp_cmd == IPA_CMD_ASS_ARP_ADD_ENTRY)
1456 QETH_CARD_TEXT(card, 3, "arpadd");
1457 else
1458 QETH_CARD_TEXT(card, 3, "arpdel");
1459
1460 /*
1461 * currently GuestLAN only supports the ARP assist function
1462 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_ADD_ENTRY;
1463 * thus we say EOPNOTSUPP for this ARP function
1464 */
1465 if (IS_VM_NIC(card))
1466 return -EOPNOTSUPP;
1467 if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
1468 return -EOPNOTSUPP;
1469 }
1470
1471 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING, arp_cmd,
1472 SETASS_DATA_SIZEOF(arp_entry),
1473 QETH_PROT_IPV4);
1474 if (!iob)
1475 return -ENOMEM;
1476
1477 cmd_entry = &__ipa_cmd(iob)->data.setassparms.data.arp_entry;
1478 ether_addr_copy(cmd_entry->macaddr, entry->macaddr);
1479 memcpy(cmd_entry->ipaddr, entry->ipaddr, 4);
1480 rc = qeth_send_ipa_cmd(card, iob, qeth_l3_arp_cmd_cb, NULL);
1481 if (rc)
1482 QETH_DBF_MESSAGE(2, "Could not modify (cmd: %#x) ARP entry on device %x: %#x\n",
1483 arp_cmd, CARD_DEVID(card), rc);
1484 return rc;
1485 }
1486
qeth_l3_arp_flush_cache(struct qeth_card * card)1487 static int qeth_l3_arp_flush_cache(struct qeth_card *card)
1488 {
1489 struct qeth_cmd_buffer *iob;
1490 int rc;
1491
1492 QETH_CARD_TEXT(card, 3, "arpflush");
1493
1494 /*
1495 * currently GuestLAN only supports the ARP assist function
1496 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_FLUSH_CACHE;
1497 * thus we say EOPNOTSUPP for this ARP function
1498 */
1499 if (IS_VM_NIC(card) || IS_IQD(card))
1500 return -EOPNOTSUPP;
1501 if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
1502 return -EOPNOTSUPP;
1503 }
1504
1505 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
1506 IPA_CMD_ASS_ARP_FLUSH_CACHE, 0,
1507 QETH_PROT_IPV4);
1508 if (!iob)
1509 return -ENOMEM;
1510
1511 rc = qeth_send_ipa_cmd(card, iob, qeth_l3_arp_cmd_cb, NULL);
1512 if (rc)
1513 QETH_DBF_MESSAGE(2, "Could not flush ARP cache on device %x: %#x\n",
1514 CARD_DEVID(card), rc);
1515 return rc;
1516 }
1517
qeth_l3_do_ioctl(struct net_device * dev,struct ifreq * rq,void __user * data,int cmd)1518 static int qeth_l3_do_ioctl(struct net_device *dev, struct ifreq *rq, void __user *data, int cmd)
1519 {
1520 struct qeth_card *card = dev->ml_priv;
1521 struct qeth_arp_cache_entry arp_entry;
1522 enum qeth_arp_process_subcmds arp_cmd;
1523 int rc = 0;
1524
1525 switch (cmd) {
1526 case SIOC_QETH_ARP_SET_NO_ENTRIES:
1527 if (!capable(CAP_NET_ADMIN)) {
1528 rc = -EPERM;
1529 break;
1530 }
1531 rc = qeth_l3_arp_set_no_entries(card, rq->ifr_ifru.ifru_ivalue);
1532 break;
1533 case SIOC_QETH_ARP_QUERY_INFO:
1534 if (!capable(CAP_NET_ADMIN)) {
1535 rc = -EPERM;
1536 break;
1537 }
1538 rc = qeth_l3_arp_query(card, data);
1539 break;
1540 case SIOC_QETH_ARP_ADD_ENTRY:
1541 case SIOC_QETH_ARP_REMOVE_ENTRY:
1542 if (!capable(CAP_NET_ADMIN))
1543 return -EPERM;
1544 if (copy_from_user(&arp_entry, data, sizeof(arp_entry)))
1545 return -EFAULT;
1546
1547 arp_cmd = (cmd == SIOC_QETH_ARP_ADD_ENTRY) ?
1548 IPA_CMD_ASS_ARP_ADD_ENTRY :
1549 IPA_CMD_ASS_ARP_REMOVE_ENTRY;
1550 return qeth_l3_arp_modify_entry(card, &arp_entry, arp_cmd);
1551 case SIOC_QETH_ARP_FLUSH_CACHE:
1552 if (!capable(CAP_NET_ADMIN)) {
1553 rc = -EPERM;
1554 break;
1555 }
1556 rc = qeth_l3_arp_flush_cache(card);
1557 break;
1558 default:
1559 rc = -EOPNOTSUPP;
1560 }
1561 return rc;
1562 }
1563
qeth_l3_get_cast_type_rcu(struct sk_buff * skb,struct dst_entry * dst,__be16 proto)1564 static int qeth_l3_get_cast_type_rcu(struct sk_buff *skb, struct dst_entry *dst,
1565 __be16 proto)
1566 {
1567 struct neighbour *n = NULL;
1568
1569 if (dst)
1570 n = dst_neigh_lookup_skb(dst, skb);
1571
1572 if (n) {
1573 int cast_type = n->type;
1574
1575 neigh_release(n);
1576 if ((cast_type == RTN_BROADCAST) ||
1577 (cast_type == RTN_MULTICAST) ||
1578 (cast_type == RTN_ANYCAST))
1579 return cast_type;
1580 return RTN_UNICAST;
1581 }
1582
1583 /* no neighbour (eg AF_PACKET), fall back to target's IP address ... */
1584 switch (proto) {
1585 case htons(ETH_P_IP):
1586 if (ipv4_is_lbcast(ip_hdr(skb)->daddr))
1587 return RTN_BROADCAST;
1588 return ipv4_is_multicast(ip_hdr(skb)->daddr) ?
1589 RTN_MULTICAST : RTN_UNICAST;
1590 case htons(ETH_P_IPV6):
1591 return ipv6_addr_is_multicast(&ipv6_hdr(skb)->daddr) ?
1592 RTN_MULTICAST : RTN_UNICAST;
1593 case htons(ETH_P_AF_IUCV):
1594 return RTN_UNICAST;
1595 default:
1596 /* OSA only: ... and MAC address */
1597 return qeth_get_ether_cast_type(skb);
1598 }
1599 }
1600
qeth_l3_get_cast_type(struct sk_buff * skb,__be16 proto)1601 static int qeth_l3_get_cast_type(struct sk_buff *skb, __be16 proto)
1602 {
1603 struct dst_entry *dst;
1604 int cast_type;
1605
1606 rcu_read_lock();
1607 dst = qeth_dst_check_rcu(skb, proto);
1608 cast_type = qeth_l3_get_cast_type_rcu(skb, dst, proto);
1609 rcu_read_unlock();
1610
1611 return cast_type;
1612 }
1613
qeth_l3_cast_type_to_flag(int cast_type)1614 static u8 qeth_l3_cast_type_to_flag(int cast_type)
1615 {
1616 if (cast_type == RTN_MULTICAST)
1617 return QETH_CAST_MULTICAST;
1618 if (cast_type == RTN_ANYCAST)
1619 return QETH_CAST_ANYCAST;
1620 if (cast_type == RTN_BROADCAST)
1621 return QETH_CAST_BROADCAST;
1622 return QETH_CAST_UNICAST;
1623 }
1624
qeth_l3_fill_header(struct qeth_qdio_out_q * queue,struct qeth_hdr * hdr,struct sk_buff * skb,__be16 proto,unsigned int data_len)1625 static void qeth_l3_fill_header(struct qeth_qdio_out_q *queue,
1626 struct qeth_hdr *hdr, struct sk_buff *skb,
1627 __be16 proto, unsigned int data_len)
1628 {
1629 struct qeth_hdr_layer3 *l3_hdr = &hdr->hdr.l3;
1630 struct vlan_ethhdr *veth = vlan_eth_hdr(skb);
1631 struct qeth_card *card = queue->card;
1632 struct dst_entry *dst;
1633 int cast_type;
1634
1635 hdr->hdr.l3.length = data_len;
1636
1637 if (skb_is_gso(skb)) {
1638 hdr->hdr.l3.id = QETH_HEADER_TYPE_L3_TSO;
1639 } else {
1640 hdr->hdr.l3.id = QETH_HEADER_TYPE_LAYER3;
1641
1642 if (skb->ip_summed == CHECKSUM_PARTIAL) {
1643 qeth_tx_csum(skb, &hdr->hdr.l3.ext_flags, proto);
1644 /* some HW requires combined L3+L4 csum offload: */
1645 if (proto == htons(ETH_P_IP))
1646 hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_CSUM_HDR_REQ;
1647 }
1648 }
1649
1650 if (proto == htons(ETH_P_IP) || IS_IQD(card)) {
1651 /* NETIF_F_HW_VLAN_CTAG_TX */
1652 if (skb_vlan_tag_present(skb)) {
1653 hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_VLAN_FRAME;
1654 hdr->hdr.l3.vlan_id = skb_vlan_tag_get(skb);
1655 }
1656 } else if (veth->h_vlan_proto == htons(ETH_P_8021Q)) {
1657 hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_INCLUDE_VLAN_TAG;
1658 hdr->hdr.l3.vlan_id = ntohs(veth->h_vlan_TCI);
1659 }
1660
1661 rcu_read_lock();
1662 dst = qeth_dst_check_rcu(skb, proto);
1663
1664 if (IS_IQD(card) && skb_get_queue_mapping(skb) != QETH_IQD_MCAST_TXQ)
1665 cast_type = RTN_UNICAST;
1666 else
1667 cast_type = qeth_l3_get_cast_type_rcu(skb, dst, proto);
1668 l3_hdr->flags |= qeth_l3_cast_type_to_flag(cast_type);
1669
1670 switch (proto) {
1671 case htons(ETH_P_IP):
1672 l3_hdr->next_hop.addr.s6_addr32[3] =
1673 qeth_next_hop_v4_rcu(skb, dst);
1674 break;
1675 case htons(ETH_P_IPV6):
1676 l3_hdr->next_hop.addr = *qeth_next_hop_v6_rcu(skb, dst);
1677
1678 hdr->hdr.l3.flags |= QETH_HDR_IPV6;
1679 if (!IS_IQD(card))
1680 hdr->hdr.l3.flags |= QETH_HDR_PASSTHRU;
1681 break;
1682 case htons(ETH_P_AF_IUCV):
1683 l3_hdr->next_hop.addr.s6_addr16[0] = htons(0xfe80);
1684 memcpy(&l3_hdr->next_hop.addr.s6_addr32[2],
1685 iucv_trans_hdr(skb)->destUserID, 8);
1686 l3_hdr->flags |= QETH_HDR_IPV6;
1687 break;
1688 default:
1689 /* OSA only: */
1690 l3_hdr->flags |= QETH_HDR_PASSTHRU;
1691 }
1692 rcu_read_unlock();
1693 }
1694
qeth_l3_fixup_headers(struct sk_buff * skb)1695 static void qeth_l3_fixup_headers(struct sk_buff *skb)
1696 {
1697 struct iphdr *iph = ip_hdr(skb);
1698
1699 /* this is safe, IPv6 traffic takes a different path */
1700 if (skb->ip_summed == CHECKSUM_PARTIAL)
1701 iph->check = 0;
1702 if (skb_is_gso(skb)) {
1703 iph->tot_len = 0;
1704 tcp_hdr(skb)->check = ~tcp_v4_check(0, iph->saddr,
1705 iph->daddr, 0);
1706 }
1707 }
1708
qeth_l3_xmit(struct qeth_card * card,struct sk_buff * skb,struct qeth_qdio_out_q * queue,__be16 proto)1709 static int qeth_l3_xmit(struct qeth_card *card, struct sk_buff *skb,
1710 struct qeth_qdio_out_q *queue, __be16 proto)
1711 {
1712 unsigned int hw_hdr_len;
1713 int rc;
1714
1715 /* re-use the L2 header area for the HW header: */
1716 hw_hdr_len = skb_is_gso(skb) ? sizeof(struct qeth_hdr_tso) :
1717 sizeof(struct qeth_hdr);
1718 rc = skb_cow_head(skb, hw_hdr_len - ETH_HLEN);
1719 if (rc)
1720 return rc;
1721 skb_pull(skb, ETH_HLEN);
1722
1723 qeth_l3_fixup_headers(skb);
1724 return qeth_xmit(card, skb, queue, proto, qeth_l3_fill_header);
1725 }
1726
qeth_l3_hard_start_xmit(struct sk_buff * skb,struct net_device * dev)1727 static netdev_tx_t qeth_l3_hard_start_xmit(struct sk_buff *skb,
1728 struct net_device *dev)
1729 {
1730 struct qeth_card *card = dev->ml_priv;
1731 __be16 proto = vlan_get_protocol(skb);
1732 u16 txq = skb_get_queue_mapping(skb);
1733 struct qeth_qdio_out_q *queue;
1734 int rc;
1735
1736 if (!skb_is_gso(skb))
1737 qdisc_skb_cb(skb)->pkt_len = skb->len;
1738 if (IS_IQD(card)) {
1739 queue = card->qdio.out_qs[qeth_iqd_translate_txq(dev, txq)];
1740
1741 if (card->options.sniffer)
1742 goto tx_drop;
1743
1744 switch (proto) {
1745 case htons(ETH_P_AF_IUCV):
1746 if (card->options.cq != QETH_CQ_ENABLED)
1747 goto tx_drop;
1748 break;
1749 case htons(ETH_P_IP):
1750 case htons(ETH_P_IPV6):
1751 if (card->options.cq == QETH_CQ_ENABLED)
1752 goto tx_drop;
1753 break;
1754 default:
1755 goto tx_drop;
1756 }
1757 } else {
1758 queue = card->qdio.out_qs[txq];
1759 }
1760
1761 if (!(dev->flags & IFF_BROADCAST) &&
1762 qeth_l3_get_cast_type(skb, proto) == RTN_BROADCAST)
1763 goto tx_drop;
1764
1765 if (proto == htons(ETH_P_IP) || IS_IQD(card))
1766 rc = qeth_l3_xmit(card, skb, queue, proto);
1767 else
1768 rc = qeth_xmit(card, skb, queue, proto, qeth_l3_fill_header);
1769
1770 if (!rc)
1771 return NETDEV_TX_OK;
1772
1773 tx_drop:
1774 QETH_TXQ_STAT_INC(queue, tx_dropped);
1775 kfree_skb(skb);
1776 return NETDEV_TX_OK;
1777 }
1778
qeth_l3_set_rx_mode(struct net_device * dev)1779 static void qeth_l3_set_rx_mode(struct net_device *dev)
1780 {
1781 struct qeth_card *card = dev->ml_priv;
1782
1783 schedule_work(&card->rx_mode_work);
1784 }
1785
1786 /*
1787 * we need NOARP for IPv4 but we want neighbor solicitation for IPv6. Setting
1788 * NOARP on the netdevice is no option because it also turns off neighbor
1789 * solicitation. For IPv4 we install a neighbor_setup function. We don't want
1790 * arp resolution but we want the hard header (packet socket will work
1791 * e.g. tcpdump)
1792 */
qeth_l3_neigh_setup_noarp(struct neighbour * n)1793 static int qeth_l3_neigh_setup_noarp(struct neighbour *n)
1794 {
1795 n->nud_state = NUD_NOARP;
1796 memcpy(n->ha, "FAKELL", 6);
1797 n->output = n->ops->connected_output;
1798 return 0;
1799 }
1800
1801 static int
qeth_l3_neigh_setup(struct net_device * dev,struct neigh_parms * np)1802 qeth_l3_neigh_setup(struct net_device *dev, struct neigh_parms *np)
1803 {
1804 if (np->tbl->family == AF_INET)
1805 np->neigh_setup = qeth_l3_neigh_setup_noarp;
1806
1807 return 0;
1808 }
1809
qeth_l3_osa_features_check(struct sk_buff * skb,struct net_device * dev,netdev_features_t features)1810 static netdev_features_t qeth_l3_osa_features_check(struct sk_buff *skb,
1811 struct net_device *dev,
1812 netdev_features_t features)
1813 {
1814 if (vlan_get_protocol(skb) != htons(ETH_P_IP))
1815 features &= ~NETIF_F_HW_VLAN_CTAG_TX;
1816 return qeth_features_check(skb, dev, features);
1817 }
1818
qeth_l3_iqd_select_queue(struct net_device * dev,struct sk_buff * skb,struct net_device * sb_dev)1819 static u16 qeth_l3_iqd_select_queue(struct net_device *dev, struct sk_buff *skb,
1820 struct net_device *sb_dev)
1821 {
1822 __be16 proto = vlan_get_protocol(skb);
1823
1824 return qeth_iqd_select_queue(dev, skb,
1825 qeth_l3_get_cast_type(skb, proto), sb_dev);
1826 }
1827
qeth_l3_osa_select_queue(struct net_device * dev,struct sk_buff * skb,struct net_device * sb_dev)1828 static u16 qeth_l3_osa_select_queue(struct net_device *dev, struct sk_buff *skb,
1829 struct net_device *sb_dev)
1830 {
1831 struct qeth_card *card = dev->ml_priv;
1832
1833 if (qeth_uses_tx_prio_queueing(card))
1834 return qeth_get_priority_queue(card, skb);
1835
1836 return netdev_pick_tx(dev, skb, sb_dev);
1837 }
1838
1839 static const struct net_device_ops qeth_l3_netdev_ops = {
1840 .ndo_open = qeth_open,
1841 .ndo_stop = qeth_stop,
1842 .ndo_get_stats64 = qeth_get_stats64,
1843 .ndo_start_xmit = qeth_l3_hard_start_xmit,
1844 .ndo_select_queue = qeth_l3_iqd_select_queue,
1845 .ndo_validate_addr = eth_validate_addr,
1846 .ndo_set_rx_mode = qeth_l3_set_rx_mode,
1847 .ndo_eth_ioctl = qeth_do_ioctl,
1848 .ndo_siocdevprivate = qeth_siocdevprivate,
1849 .ndo_fix_features = qeth_fix_features,
1850 .ndo_set_features = qeth_set_features,
1851 .ndo_tx_timeout = qeth_tx_timeout,
1852 };
1853
1854 static const struct net_device_ops qeth_l3_osa_netdev_ops = {
1855 .ndo_open = qeth_open,
1856 .ndo_stop = qeth_stop,
1857 .ndo_get_stats64 = qeth_get_stats64,
1858 .ndo_start_xmit = qeth_l3_hard_start_xmit,
1859 .ndo_features_check = qeth_l3_osa_features_check,
1860 .ndo_select_queue = qeth_l3_osa_select_queue,
1861 .ndo_validate_addr = eth_validate_addr,
1862 .ndo_set_rx_mode = qeth_l3_set_rx_mode,
1863 .ndo_eth_ioctl = qeth_do_ioctl,
1864 .ndo_siocdevprivate = qeth_siocdevprivate,
1865 .ndo_fix_features = qeth_fix_features,
1866 .ndo_set_features = qeth_set_features,
1867 .ndo_tx_timeout = qeth_tx_timeout,
1868 .ndo_neigh_setup = qeth_l3_neigh_setup,
1869 };
1870
qeth_l3_setup_netdev(struct qeth_card * card)1871 static int qeth_l3_setup_netdev(struct qeth_card *card)
1872 {
1873 struct net_device *dev = card->dev;
1874 unsigned int headroom;
1875 int rc;
1876
1877 if (IS_OSD(card) || IS_OSX(card)) {
1878 card->dev->netdev_ops = &qeth_l3_osa_netdev_ops;
1879
1880 /*IPv6 address autoconfiguration stuff*/
1881 dev->dev_id = qeth_l3_get_unique_id(card, dev->dev_id);
1882
1883 if (!IS_VM_NIC(card)) {
1884 card->dev->features |= NETIF_F_SG;
1885 card->dev->hw_features |= NETIF_F_TSO |
1886 NETIF_F_RXCSUM | NETIF_F_IP_CSUM;
1887 card->dev->vlan_features |= NETIF_F_TSO |
1888 NETIF_F_RXCSUM | NETIF_F_IP_CSUM;
1889 }
1890
1891 if (qeth_is_supported6(card, IPA_OUTBOUND_CHECKSUM_V6)) {
1892 card->dev->hw_features |= NETIF_F_IPV6_CSUM;
1893 card->dev->vlan_features |= NETIF_F_IPV6_CSUM;
1894 }
1895 if (qeth_is_supported6(card, IPA_OUTBOUND_TSO)) {
1896 card->dev->hw_features |= NETIF_F_TSO6;
1897 card->dev->vlan_features |= NETIF_F_TSO6;
1898 }
1899
1900 /* allow for de-acceleration of NETIF_F_HW_VLAN_CTAG_TX: */
1901 if (card->dev->hw_features & NETIF_F_TSO6)
1902 headroom = sizeof(struct qeth_hdr_tso) + VLAN_HLEN;
1903 else if (card->dev->hw_features & NETIF_F_TSO)
1904 headroom = sizeof(struct qeth_hdr_tso);
1905 else
1906 headroom = sizeof(struct qeth_hdr) + VLAN_HLEN;
1907 } else if (IS_IQD(card)) {
1908 card->dev->flags |= IFF_NOARP;
1909 card->dev->netdev_ops = &qeth_l3_netdev_ops;
1910 headroom = sizeof(struct qeth_hdr) - ETH_HLEN;
1911
1912 rc = qeth_l3_iqd_read_initial_mac(card);
1913 if (rc)
1914 return rc;
1915 } else
1916 return -ENODEV;
1917
1918 card->dev->needed_headroom = headroom;
1919 card->dev->features |= NETIF_F_HW_VLAN_CTAG_TX |
1920 NETIF_F_HW_VLAN_CTAG_RX;
1921
1922 netif_keep_dst(card->dev);
1923 if (card->dev->hw_features & (NETIF_F_TSO | NETIF_F_TSO6))
1924 netif_set_gso_max_size(card->dev,
1925 PAGE_SIZE * (QETH_MAX_BUFFER_ELEMENTS(card) - 1));
1926
1927 netif_napi_add(card->dev, &card->napi, qeth_poll, QETH_NAPI_WEIGHT);
1928 return register_netdev(card->dev);
1929 }
1930
1931 static const struct device_type qeth_l3_devtype = {
1932 .name = "qeth_layer3",
1933 .groups = qeth_l3_attr_groups,
1934 };
1935
qeth_l3_probe_device(struct ccwgroup_device * gdev)1936 static int qeth_l3_probe_device(struct ccwgroup_device *gdev)
1937 {
1938 struct qeth_card *card = dev_get_drvdata(&gdev->dev);
1939 int rc;
1940
1941 hash_init(card->ip_htable);
1942 mutex_init(&card->ip_lock);
1943 card->cmd_wq = alloc_ordered_workqueue("%s_cmd", 0,
1944 dev_name(&gdev->dev));
1945 if (!card->cmd_wq)
1946 return -ENOMEM;
1947
1948 if (gdev->dev.type) {
1949 rc = device_add_groups(&gdev->dev, qeth_l3_attr_groups);
1950 if (rc) {
1951 destroy_workqueue(card->cmd_wq);
1952 return rc;
1953 }
1954 } else {
1955 gdev->dev.type = &qeth_l3_devtype;
1956 }
1957
1958 INIT_WORK(&card->rx_mode_work, qeth_l3_rx_mode_work);
1959 return 0;
1960 }
1961
qeth_l3_remove_device(struct ccwgroup_device * cgdev)1962 static void qeth_l3_remove_device(struct ccwgroup_device *cgdev)
1963 {
1964 struct qeth_card *card = dev_get_drvdata(&cgdev->dev);
1965
1966 if (cgdev->dev.type != &qeth_l3_devtype)
1967 device_remove_groups(&cgdev->dev, qeth_l3_attr_groups);
1968
1969 qeth_set_allowed_threads(card, 0, 1);
1970 wait_event(card->wait_q, qeth_threads_running(card, 0xffffffff) == 0);
1971
1972 if (cgdev->state == CCWGROUP_ONLINE)
1973 qeth_set_offline(card, card->discipline, false);
1974
1975 if (card->dev->reg_state == NETREG_REGISTERED)
1976 unregister_netdev(card->dev);
1977
1978 flush_workqueue(card->cmd_wq);
1979 destroy_workqueue(card->cmd_wq);
1980 qeth_l3_clear_ip_htable(card, 0);
1981 qeth_l3_clear_ipato_list(card);
1982 }
1983
qeth_l3_set_online(struct qeth_card * card,bool carrier_ok)1984 static int qeth_l3_set_online(struct qeth_card *card, bool carrier_ok)
1985 {
1986 struct net_device *dev = card->dev;
1987 int rc = 0;
1988
1989 /* softsetup */
1990 QETH_CARD_TEXT(card, 2, "softsetp");
1991
1992 rc = qeth_l3_setadapter_parms(card);
1993 if (rc)
1994 QETH_CARD_TEXT_(card, 2, "2err%04x", rc);
1995 if (!card->options.sniffer) {
1996 qeth_l3_start_ipassists(card);
1997
1998 rc = qeth_l3_setrouting_v4(card);
1999 if (rc)
2000 QETH_CARD_TEXT_(card, 2, "4err%04x", rc);
2001 rc = qeth_l3_setrouting_v6(card);
2002 if (rc)
2003 QETH_CARD_TEXT_(card, 2, "5err%04x", rc);
2004 }
2005
2006 card->state = CARD_STATE_SOFTSETUP;
2007
2008 qeth_set_allowed_threads(card, 0xffffffff, 0);
2009 qeth_l3_recover_ip(card);
2010
2011 if (dev->reg_state != NETREG_REGISTERED) {
2012 rc = qeth_l3_setup_netdev(card);
2013 if (rc)
2014 goto err_setup;
2015
2016 if (carrier_ok)
2017 netif_carrier_on(dev);
2018 } else {
2019 rtnl_lock();
2020 rc = qeth_set_real_num_tx_queues(card,
2021 qeth_tx_actual_queues(card));
2022 if (rc) {
2023 rtnl_unlock();
2024 goto err_set_queues;
2025 }
2026
2027 if (carrier_ok)
2028 netif_carrier_on(dev);
2029 else
2030 netif_carrier_off(dev);
2031
2032 netif_device_attach(dev);
2033 qeth_enable_hw_features(dev);
2034
2035 if (netif_running(dev)) {
2036 local_bh_disable();
2037 napi_schedule(&card->napi);
2038 /* kick-start the NAPI softirq: */
2039 local_bh_enable();
2040 }
2041 rtnl_unlock();
2042 }
2043 return 0;
2044
2045 err_set_queues:
2046 err_setup:
2047 qeth_set_allowed_threads(card, 0, 1);
2048 card->state = CARD_STATE_DOWN;
2049 qeth_l3_clear_ip_htable(card, 1);
2050 return rc;
2051 }
2052
qeth_l3_set_offline(struct qeth_card * card)2053 static void qeth_l3_set_offline(struct qeth_card *card)
2054 {
2055 qeth_set_allowed_threads(card, 0, 1);
2056 qeth_l3_drain_rx_mode_cache(card);
2057
2058 if (card->options.sniffer &&
2059 (card->info.promisc_mode == SET_PROMISC_MODE_ON))
2060 qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
2061
2062 if (card->state == CARD_STATE_SOFTSETUP) {
2063 card->state = CARD_STATE_DOWN;
2064 qeth_l3_clear_ip_htable(card, 1);
2065 }
2066 }
2067
2068 /* Returns zero if the command is successfully "consumed" */
qeth_l3_control_event(struct qeth_card * card,struct qeth_ipa_cmd * cmd)2069 static int qeth_l3_control_event(struct qeth_card *card,
2070 struct qeth_ipa_cmd *cmd)
2071 {
2072 return 1;
2073 }
2074
2075 const struct qeth_discipline qeth_l3_discipline = {
2076 .setup = qeth_l3_probe_device,
2077 .remove = qeth_l3_remove_device,
2078 .set_online = qeth_l3_set_online,
2079 .set_offline = qeth_l3_set_offline,
2080 .do_ioctl = qeth_l3_do_ioctl,
2081 .control_event_handler = qeth_l3_control_event,
2082 };
2083 EXPORT_SYMBOL_GPL(qeth_l3_discipline);
2084
qeth_l3_handle_ip_event(struct qeth_card * card,struct qeth_ipaddr * addr,unsigned long event)2085 static int qeth_l3_handle_ip_event(struct qeth_card *card,
2086 struct qeth_ipaddr *addr,
2087 unsigned long event)
2088 {
2089 switch (event) {
2090 case NETDEV_UP:
2091 qeth_l3_modify_ip(card, addr, true);
2092 return NOTIFY_OK;
2093 case NETDEV_DOWN:
2094 qeth_l3_modify_ip(card, addr, false);
2095 return NOTIFY_OK;
2096 default:
2097 return NOTIFY_DONE;
2098 }
2099 }
2100
2101 struct qeth_l3_ip_event_work {
2102 struct work_struct work;
2103 struct qeth_card *card;
2104 struct qeth_ipaddr addr;
2105 };
2106
2107 #define to_ip_work(w) container_of((w), struct qeth_l3_ip_event_work, work)
2108
qeth_l3_add_ip_worker(struct work_struct * work)2109 static void qeth_l3_add_ip_worker(struct work_struct *work)
2110 {
2111 struct qeth_l3_ip_event_work *ip_work = to_ip_work(work);
2112
2113 qeth_l3_modify_ip(ip_work->card, &ip_work->addr, true);
2114 kfree(work);
2115 }
2116
qeth_l3_delete_ip_worker(struct work_struct * work)2117 static void qeth_l3_delete_ip_worker(struct work_struct *work)
2118 {
2119 struct qeth_l3_ip_event_work *ip_work = to_ip_work(work);
2120
2121 qeth_l3_modify_ip(ip_work->card, &ip_work->addr, false);
2122 kfree(work);
2123 }
2124
qeth_l3_get_card_from_dev(struct net_device * dev)2125 static struct qeth_card *qeth_l3_get_card_from_dev(struct net_device *dev)
2126 {
2127 if (is_vlan_dev(dev))
2128 dev = vlan_dev_real_dev(dev);
2129 if (dev->netdev_ops == &qeth_l3_osa_netdev_ops ||
2130 dev->netdev_ops == &qeth_l3_netdev_ops)
2131 return (struct qeth_card *) dev->ml_priv;
2132 return NULL;
2133 }
2134
qeth_l3_ip_event(struct notifier_block * this,unsigned long event,void * ptr)2135 static int qeth_l3_ip_event(struct notifier_block *this,
2136 unsigned long event, void *ptr)
2137 {
2138 struct in_ifaddr *ifa = (struct in_ifaddr *)ptr;
2139 struct net_device *dev = ifa->ifa_dev->dev;
2140 struct qeth_ipaddr addr;
2141 struct qeth_card *card;
2142
2143 card = qeth_l3_get_card_from_dev(dev);
2144 if (!card)
2145 return NOTIFY_DONE;
2146 QETH_CARD_TEXT(card, 3, "ipevent");
2147
2148 qeth_l3_init_ipaddr(&addr, QETH_IP_TYPE_NORMAL, QETH_PROT_IPV4);
2149 addr.u.a4.addr = ifa->ifa_address;
2150 addr.u.a4.mask = ifa->ifa_mask;
2151
2152 return qeth_l3_handle_ip_event(card, &addr, event);
2153 }
2154
2155 static struct notifier_block qeth_l3_ip_notifier = {
2156 qeth_l3_ip_event,
2157 NULL,
2158 };
2159
qeth_l3_ip6_event(struct notifier_block * this,unsigned long event,void * ptr)2160 static int qeth_l3_ip6_event(struct notifier_block *this,
2161 unsigned long event, void *ptr)
2162 {
2163 struct inet6_ifaddr *ifa = (struct inet6_ifaddr *)ptr;
2164 struct net_device *dev = ifa->idev->dev;
2165 struct qeth_l3_ip_event_work *ip_work;
2166 struct qeth_card *card;
2167
2168 if (event != NETDEV_UP && event != NETDEV_DOWN)
2169 return NOTIFY_DONE;
2170
2171 card = qeth_l3_get_card_from_dev(dev);
2172 if (!card)
2173 return NOTIFY_DONE;
2174 QETH_CARD_TEXT(card, 3, "ip6event");
2175 if (!qeth_is_supported(card, IPA_IPV6))
2176 return NOTIFY_DONE;
2177
2178 ip_work = kmalloc(sizeof(*ip_work), GFP_ATOMIC);
2179 if (!ip_work)
2180 return NOTIFY_DONE;
2181
2182 if (event == NETDEV_UP)
2183 INIT_WORK(&ip_work->work, qeth_l3_add_ip_worker);
2184 else
2185 INIT_WORK(&ip_work->work, qeth_l3_delete_ip_worker);
2186
2187 ip_work->card = card;
2188 qeth_l3_init_ipaddr(&ip_work->addr, QETH_IP_TYPE_NORMAL,
2189 QETH_PROT_IPV6);
2190 ip_work->addr.u.a6.addr = ifa->addr;
2191 ip_work->addr.u.a6.pfxlen = ifa->prefix_len;
2192
2193 queue_work(card->cmd_wq, &ip_work->work);
2194 return NOTIFY_OK;
2195 }
2196
2197 static struct notifier_block qeth_l3_ip6_notifier = {
2198 qeth_l3_ip6_event,
2199 NULL,
2200 };
2201
qeth_l3_register_notifiers(void)2202 static int qeth_l3_register_notifiers(void)
2203 {
2204 int rc;
2205
2206 QETH_DBF_TEXT(SETUP, 5, "regnotif");
2207 rc = register_inetaddr_notifier(&qeth_l3_ip_notifier);
2208 if (rc)
2209 return rc;
2210 rc = register_inet6addr_notifier(&qeth_l3_ip6_notifier);
2211 if (rc) {
2212 unregister_inetaddr_notifier(&qeth_l3_ip_notifier);
2213 return rc;
2214 }
2215 return 0;
2216 }
2217
qeth_l3_unregister_notifiers(void)2218 static void qeth_l3_unregister_notifiers(void)
2219 {
2220 QETH_DBF_TEXT(SETUP, 5, "unregnot");
2221 WARN_ON(unregister_inetaddr_notifier(&qeth_l3_ip_notifier));
2222 WARN_ON(unregister_inet6addr_notifier(&qeth_l3_ip6_notifier));
2223 }
2224
qeth_l3_init(void)2225 static int __init qeth_l3_init(void)
2226 {
2227 pr_info("register layer 3 discipline\n");
2228 return qeth_l3_register_notifiers();
2229 }
2230
qeth_l3_exit(void)2231 static void __exit qeth_l3_exit(void)
2232 {
2233 qeth_l3_unregister_notifiers();
2234 pr_info("unregister layer 3 discipline\n");
2235 }
2236
2237 module_init(qeth_l3_init);
2238 module_exit(qeth_l3_exit);
2239 MODULE_AUTHOR("Frank Blaschka <frank.blaschka@de.ibm.com>");
2240 MODULE_DESCRIPTION("qeth layer 3 discipline");
2241 MODULE_LICENSE("GPL");
2242