]> git.proxmox.com Git - mirror_ubuntu-jammy-kernel.git/blob - drivers/s390/net/qeth_l3_main.c
Merge remote-tracking branches 'asoc/topic/cs35l32', 'asoc/topic/cs35l34', 'asoc...
[mirror_ubuntu-jammy-kernel.git] / drivers / s390 / net / qeth_l3_main.c
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/ipv6.h>
22 #include <linux/inetdevice.h>
23 #include <linux/igmp.h>
24 #include <linux/slab.h>
25 #include <linux/if_vlan.h>
26
27 #include <net/ip.h>
28 #include <net/arp.h>
29 #include <net/route.h>
30 #include <net/ip6_fib.h>
31 #include <net/ip6_checksum.h>
32 #include <net/iucv/af_iucv.h>
33 #include <linux/hashtable.h>
34
35 #include "qeth_l3.h"
36
37
38 static int qeth_l3_set_offline(struct ccwgroup_device *);
39 static int qeth_l3_stop(struct net_device *);
40 static void qeth_l3_set_multicast_list(struct net_device *);
41 static int qeth_l3_register_addr_entry(struct qeth_card *,
42 struct qeth_ipaddr *);
43 static int qeth_l3_deregister_addr_entry(struct qeth_card *,
44 struct qeth_ipaddr *);
45
46 static int qeth_l3_isxdigit(char *buf)
47 {
48 while (*buf) {
49 if (!isxdigit(*buf++))
50 return 0;
51 }
52 return 1;
53 }
54
55 static void qeth_l3_ipaddr4_to_string(const __u8 *addr, char *buf)
56 {
57 sprintf(buf, "%pI4", addr);
58 }
59
60 static int qeth_l3_string_to_ipaddr4(const char *buf, __u8 *addr)
61 {
62 int count = 0, rc = 0;
63 unsigned int in[4];
64 char c;
65
66 rc = sscanf(buf, "%u.%u.%u.%u%c",
67 &in[0], &in[1], &in[2], &in[3], &c);
68 if (rc != 4 && (rc != 5 || c != '\n'))
69 return -EINVAL;
70 for (count = 0; count < 4; count++) {
71 if (in[count] > 255)
72 return -EINVAL;
73 addr[count] = in[count];
74 }
75 return 0;
76 }
77
78 static void qeth_l3_ipaddr6_to_string(const __u8 *addr, char *buf)
79 {
80 sprintf(buf, "%pI6", addr);
81 }
82
83 static int qeth_l3_string_to_ipaddr6(const char *buf, __u8 *addr)
84 {
85 const char *end, *end_tmp, *start;
86 __u16 *in;
87 char num[5];
88 int num2, cnt, out, found, save_cnt;
89 unsigned short in_tmp[8] = {0, };
90
91 cnt = out = found = save_cnt = num2 = 0;
92 end = start = buf;
93 in = (__u16 *) addr;
94 memset(in, 0, 16);
95 while (*end) {
96 end = strchr(start, ':');
97 if (end == NULL) {
98 end = buf + strlen(buf);
99 end_tmp = strchr(start, '\n');
100 if (end_tmp != NULL)
101 end = end_tmp;
102 out = 1;
103 }
104 if ((end - start)) {
105 memset(num, 0, 5);
106 if ((end - start) > 4)
107 return -EINVAL;
108 memcpy(num, start, end - start);
109 if (!qeth_l3_isxdigit(num))
110 return -EINVAL;
111 sscanf(start, "%x", &num2);
112 if (found)
113 in_tmp[save_cnt++] = num2;
114 else
115 in[cnt++] = num2;
116 if (out)
117 break;
118 } else {
119 if (found)
120 return -EINVAL;
121 found = 1;
122 }
123 start = ++end;
124 }
125 if (cnt + save_cnt > 8)
126 return -EINVAL;
127 cnt = 7;
128 while (save_cnt)
129 in[cnt--] = in_tmp[--save_cnt];
130 return 0;
131 }
132
133 void qeth_l3_ipaddr_to_string(enum qeth_prot_versions proto, const __u8 *addr,
134 char *buf)
135 {
136 if (proto == QETH_PROT_IPV4)
137 qeth_l3_ipaddr4_to_string(addr, buf);
138 else if (proto == QETH_PROT_IPV6)
139 qeth_l3_ipaddr6_to_string(addr, buf);
140 }
141
142 int qeth_l3_string_to_ipaddr(const char *buf, enum qeth_prot_versions proto,
143 __u8 *addr)
144 {
145 if (proto == QETH_PROT_IPV4)
146 return qeth_l3_string_to_ipaddr4(buf, addr);
147 else if (proto == QETH_PROT_IPV6)
148 return qeth_l3_string_to_ipaddr6(buf, addr);
149 else
150 return -EINVAL;
151 }
152
153 static void qeth_l3_convert_addr_to_bits(u8 *addr, u8 *bits, int len)
154 {
155 int i, j;
156 u8 octet;
157
158 for (i = 0; i < len; ++i) {
159 octet = addr[i];
160 for (j = 7; j >= 0; --j) {
161 bits[i*8 + j] = octet & 1;
162 octet >>= 1;
163 }
164 }
165 }
166
167 static bool qeth_l3_is_addr_covered_by_ipato(struct qeth_card *card,
168 struct qeth_ipaddr *addr)
169 {
170 struct qeth_ipato_entry *ipatoe;
171 u8 addr_bits[128] = {0, };
172 u8 ipatoe_bits[128] = {0, };
173 int rc = 0;
174
175 if (!card->ipato.enabled)
176 return 0;
177 if (addr->type != QETH_IP_TYPE_NORMAL)
178 return 0;
179
180 qeth_l3_convert_addr_to_bits((u8 *) &addr->u, addr_bits,
181 (addr->proto == QETH_PROT_IPV4)? 4:16);
182 list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
183 if (addr->proto != ipatoe->proto)
184 continue;
185 qeth_l3_convert_addr_to_bits(ipatoe->addr, ipatoe_bits,
186 (ipatoe->proto == QETH_PROT_IPV4) ?
187 4 : 16);
188 if (addr->proto == QETH_PROT_IPV4)
189 rc = !memcmp(addr_bits, ipatoe_bits,
190 min(32, ipatoe->mask_bits));
191 else
192 rc = !memcmp(addr_bits, ipatoe_bits,
193 min(128, ipatoe->mask_bits));
194 if (rc)
195 break;
196 }
197 /* invert? */
198 if ((addr->proto == QETH_PROT_IPV4) && card->ipato.invert4)
199 rc = !rc;
200 else if ((addr->proto == QETH_PROT_IPV6) && card->ipato.invert6)
201 rc = !rc;
202
203 return rc;
204 }
205
206 inline int
207 qeth_l3_ipaddrs_is_equal(struct qeth_ipaddr *addr1, struct qeth_ipaddr *addr2)
208 {
209 return addr1->proto == addr2->proto &&
210 !memcmp(&addr1->u, &addr2->u, sizeof(addr1->u)) &&
211 !memcmp(&addr1->mac, &addr2->mac, sizeof(addr1->mac));
212 }
213
214 static struct qeth_ipaddr *
215 qeth_l3_ip_from_hash(struct qeth_card *card, struct qeth_ipaddr *tmp_addr)
216 {
217 struct qeth_ipaddr *addr;
218
219 if (tmp_addr->is_multicast) {
220 hash_for_each_possible(card->ip_mc_htable, addr,
221 hnode, qeth_l3_ipaddr_hash(tmp_addr))
222 if (qeth_l3_ipaddrs_is_equal(tmp_addr, addr))
223 return addr;
224 } else {
225 hash_for_each_possible(card->ip_htable, addr,
226 hnode, qeth_l3_ipaddr_hash(tmp_addr))
227 if (qeth_l3_ipaddrs_is_equal(tmp_addr, addr))
228 return addr;
229 }
230
231 return NULL;
232 }
233
234 int qeth_l3_delete_ip(struct qeth_card *card, struct qeth_ipaddr *tmp_addr)
235 {
236 int rc = 0;
237 struct qeth_ipaddr *addr;
238
239 QETH_CARD_TEXT(card, 4, "delip");
240
241 if (tmp_addr->proto == QETH_PROT_IPV4)
242 QETH_CARD_HEX(card, 4, &tmp_addr->u.a4.addr, 4);
243 else {
244 QETH_CARD_HEX(card, 4, &tmp_addr->u.a6.addr, 8);
245 QETH_CARD_HEX(card, 4, ((char *)&tmp_addr->u.a6.addr) + 8, 8);
246 }
247
248 addr = qeth_l3_ip_from_hash(card, tmp_addr);
249 if (!addr)
250 return -ENOENT;
251
252 addr->ref_counter--;
253 if (addr->ref_counter > 0 && (addr->type == QETH_IP_TYPE_NORMAL ||
254 addr->type == QETH_IP_TYPE_RXIP))
255 return rc;
256 if (addr->in_progress)
257 return -EINPROGRESS;
258
259 if (!qeth_card_hw_is_reachable(card)) {
260 addr->disp_flag = QETH_DISP_ADDR_DELETE;
261 return 0;
262 }
263
264 rc = qeth_l3_deregister_addr_entry(card, addr);
265
266 hash_del(&addr->hnode);
267 kfree(addr);
268
269 return rc;
270 }
271
272 int qeth_l3_add_ip(struct qeth_card *card, struct qeth_ipaddr *tmp_addr)
273 {
274 int rc = 0;
275 struct qeth_ipaddr *addr;
276
277 QETH_CARD_TEXT(card, 4, "addip");
278
279 if (tmp_addr->proto == QETH_PROT_IPV4)
280 QETH_CARD_HEX(card, 4, &tmp_addr->u.a4.addr, 4);
281 else {
282 QETH_CARD_HEX(card, 4, &tmp_addr->u.a6.addr, 8);
283 QETH_CARD_HEX(card, 4, ((char *)&tmp_addr->u.a6.addr) + 8, 8);
284 }
285
286 addr = qeth_l3_ip_from_hash(card, tmp_addr);
287 if (!addr) {
288 addr = qeth_l3_get_addr_buffer(tmp_addr->proto);
289 if (!addr)
290 return -ENOMEM;
291
292 memcpy(addr, tmp_addr, sizeof(struct qeth_ipaddr));
293 addr->ref_counter = 1;
294
295 if (qeth_l3_is_addr_covered_by_ipato(card, addr)) {
296 QETH_CARD_TEXT(card, 2, "tkovaddr");
297 addr->set_flags |= QETH_IPA_SETIP_TAKEOVER_FLAG;
298 }
299 hash_add(card->ip_htable, &addr->hnode,
300 qeth_l3_ipaddr_hash(addr));
301
302 if (!qeth_card_hw_is_reachable(card)) {
303 addr->disp_flag = QETH_DISP_ADDR_ADD;
304 return 0;
305 }
306
307 /* qeth_l3_register_addr_entry can go to sleep
308 * if we add a IPV4 addr. It is caused by the reason
309 * that SETIP ipa cmd starts ARP staff for IPV4 addr.
310 * Thus we should unlock spinlock, and make a protection
311 * using in_progress variable to indicate that there is
312 * an hardware operation with this IPV4 address
313 */
314 if (addr->proto == QETH_PROT_IPV4) {
315 addr->in_progress = 1;
316 spin_unlock_bh(&card->ip_lock);
317 rc = qeth_l3_register_addr_entry(card, addr);
318 spin_lock_bh(&card->ip_lock);
319 addr->in_progress = 0;
320 } else
321 rc = qeth_l3_register_addr_entry(card, addr);
322
323 if (!rc || (rc == IPA_RC_DUPLICATE_IP_ADDRESS) ||
324 (rc == IPA_RC_LAN_OFFLINE)) {
325 addr->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
326 if (addr->ref_counter < 1) {
327 qeth_l3_delete_ip(card, addr);
328 kfree(addr);
329 }
330 } else {
331 hash_del(&addr->hnode);
332 kfree(addr);
333 }
334 } else {
335 if (addr->type == QETH_IP_TYPE_NORMAL ||
336 addr->type == QETH_IP_TYPE_RXIP)
337 addr->ref_counter++;
338 }
339
340 return rc;
341 }
342
343
344 struct qeth_ipaddr *qeth_l3_get_addr_buffer(
345 enum qeth_prot_versions prot)
346 {
347 struct qeth_ipaddr *addr;
348
349 addr = kzalloc(sizeof(struct qeth_ipaddr), GFP_ATOMIC);
350 if (!addr)
351 return NULL;
352
353 addr->type = QETH_IP_TYPE_NORMAL;
354 addr->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
355 addr->proto = prot;
356
357 return addr;
358 }
359
360 static void qeth_l3_clear_ip_htable(struct qeth_card *card, int recover)
361 {
362 struct qeth_ipaddr *addr;
363 struct hlist_node *tmp;
364 int i;
365
366 QETH_CARD_TEXT(card, 4, "clearip");
367
368 if (recover && card->options.sniffer)
369 return;
370
371 spin_lock_bh(&card->ip_lock);
372
373 hash_for_each_safe(card->ip_htable, i, tmp, addr, hnode) {
374 if (!recover) {
375 hash_del(&addr->hnode);
376 kfree(addr);
377 continue;
378 }
379 addr->disp_flag = QETH_DISP_ADDR_ADD;
380 }
381
382 spin_unlock_bh(&card->ip_lock);
383
384 spin_lock_bh(&card->mclock);
385
386 hash_for_each_safe(card->ip_mc_htable, i, tmp, addr, hnode) {
387 hash_del(&addr->hnode);
388 kfree(addr);
389 }
390
391 spin_unlock_bh(&card->mclock);
392
393
394 }
395 static void qeth_l3_recover_ip(struct qeth_card *card)
396 {
397 struct qeth_ipaddr *addr;
398 struct hlist_node *tmp;
399 int i;
400 int rc;
401
402 QETH_CARD_TEXT(card, 4, "recovrip");
403
404 spin_lock_bh(&card->ip_lock);
405
406 hash_for_each_safe(card->ip_htable, i, tmp, addr, hnode) {
407 if (addr->disp_flag == QETH_DISP_ADDR_DELETE) {
408 qeth_l3_deregister_addr_entry(card, addr);
409 hash_del(&addr->hnode);
410 kfree(addr);
411 } else if (addr->disp_flag == QETH_DISP_ADDR_ADD) {
412 if (addr->proto == QETH_PROT_IPV4) {
413 addr->in_progress = 1;
414 spin_unlock_bh(&card->ip_lock);
415 rc = qeth_l3_register_addr_entry(card, addr);
416 spin_lock_bh(&card->ip_lock);
417 addr->in_progress = 0;
418 } else
419 rc = qeth_l3_register_addr_entry(card, addr);
420
421 if (!rc) {
422 addr->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
423 if (addr->ref_counter < 1)
424 qeth_l3_delete_ip(card, addr);
425 } else {
426 hash_del(&addr->hnode);
427 kfree(addr);
428 }
429 }
430 }
431
432 spin_unlock_bh(&card->ip_lock);
433
434 }
435
436 static int qeth_l3_send_setdelmc(struct qeth_card *card,
437 struct qeth_ipaddr *addr, int ipacmd)
438 {
439 int rc;
440 struct qeth_cmd_buffer *iob;
441 struct qeth_ipa_cmd *cmd;
442
443 QETH_CARD_TEXT(card, 4, "setdelmc");
444
445 iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
446 if (!iob)
447 return -ENOMEM;
448 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
449 memcpy(&cmd->data.setdelipm.mac, addr->mac, OSA_ADDR_LEN);
450 if (addr->proto == QETH_PROT_IPV6)
451 memcpy(cmd->data.setdelipm.ip6, &addr->u.a6.addr,
452 sizeof(struct in6_addr));
453 else
454 memcpy(&cmd->data.setdelipm.ip4, &addr->u.a4.addr, 4);
455
456 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
457
458 return rc;
459 }
460
461 static void qeth_l3_fill_netmask(u8 *netmask, unsigned int len)
462 {
463 int i, j;
464 for (i = 0; i < 16; i++) {
465 j = (len) - (i * 8);
466 if (j >= 8)
467 netmask[i] = 0xff;
468 else if (j > 0)
469 netmask[i] = (u8)(0xFF00 >> j);
470 else
471 netmask[i] = 0;
472 }
473 }
474
475 static int qeth_l3_send_setdelip(struct qeth_card *card,
476 struct qeth_ipaddr *addr, int ipacmd, unsigned int flags)
477 {
478 int rc;
479 struct qeth_cmd_buffer *iob;
480 struct qeth_ipa_cmd *cmd;
481 __u8 netmask[16];
482
483 QETH_CARD_TEXT(card, 4, "setdelip");
484 QETH_CARD_TEXT_(card, 4, "flags%02X", flags);
485
486 iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
487 if (!iob)
488 return -ENOMEM;
489 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
490 if (addr->proto == QETH_PROT_IPV6) {
491 memcpy(cmd->data.setdelip6.ip_addr, &addr->u.a6.addr,
492 sizeof(struct in6_addr));
493 qeth_l3_fill_netmask(netmask, addr->u.a6.pfxlen);
494 memcpy(cmd->data.setdelip6.mask, netmask,
495 sizeof(struct in6_addr));
496 cmd->data.setdelip6.flags = flags;
497 } else {
498 memcpy(cmd->data.setdelip4.ip_addr, &addr->u.a4.addr, 4);
499 memcpy(cmd->data.setdelip4.mask, &addr->u.a4.mask, 4);
500 cmd->data.setdelip4.flags = flags;
501 }
502
503 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
504
505 return rc;
506 }
507
508 static int qeth_l3_send_setrouting(struct qeth_card *card,
509 enum qeth_routing_types type, enum qeth_prot_versions prot)
510 {
511 int rc;
512 struct qeth_ipa_cmd *cmd;
513 struct qeth_cmd_buffer *iob;
514
515 QETH_CARD_TEXT(card, 4, "setroutg");
516 iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SETRTG, prot);
517 if (!iob)
518 return -ENOMEM;
519 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
520 cmd->data.setrtg.type = (type);
521 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
522
523 return rc;
524 }
525
526 static int qeth_l3_correct_routing_type(struct qeth_card *card,
527 enum qeth_routing_types *type, enum qeth_prot_versions prot)
528 {
529 if (card->info.type == QETH_CARD_TYPE_IQD) {
530 switch (*type) {
531 case NO_ROUTER:
532 case PRIMARY_CONNECTOR:
533 case SECONDARY_CONNECTOR:
534 case MULTICAST_ROUTER:
535 return 0;
536 default:
537 goto out_inval;
538 }
539 } else {
540 switch (*type) {
541 case NO_ROUTER:
542 case PRIMARY_ROUTER:
543 case SECONDARY_ROUTER:
544 return 0;
545 case MULTICAST_ROUTER:
546 if (qeth_is_ipafunc_supported(card, prot,
547 IPA_OSA_MC_ROUTER))
548 return 0;
549 default:
550 goto out_inval;
551 }
552 }
553 out_inval:
554 *type = NO_ROUTER;
555 return -EINVAL;
556 }
557
558 int qeth_l3_setrouting_v4(struct qeth_card *card)
559 {
560 int rc;
561
562 QETH_CARD_TEXT(card, 3, "setrtg4");
563
564 rc = qeth_l3_correct_routing_type(card, &card->options.route4.type,
565 QETH_PROT_IPV4);
566 if (rc)
567 return rc;
568
569 rc = qeth_l3_send_setrouting(card, card->options.route4.type,
570 QETH_PROT_IPV4);
571 if (rc) {
572 card->options.route4.type = NO_ROUTER;
573 QETH_DBF_MESSAGE(2, "Error (0x%04x) while setting routing type"
574 " on %s. Type set to 'no router'.\n", rc,
575 QETH_CARD_IFNAME(card));
576 }
577 return rc;
578 }
579
580 int qeth_l3_setrouting_v6(struct qeth_card *card)
581 {
582 int rc = 0;
583
584 QETH_CARD_TEXT(card, 3, "setrtg6");
585 #ifdef CONFIG_QETH_IPV6
586
587 if (!qeth_is_supported(card, IPA_IPV6))
588 return 0;
589 rc = qeth_l3_correct_routing_type(card, &card->options.route6.type,
590 QETH_PROT_IPV6);
591 if (rc)
592 return rc;
593
594 rc = qeth_l3_send_setrouting(card, card->options.route6.type,
595 QETH_PROT_IPV6);
596 if (rc) {
597 card->options.route6.type = NO_ROUTER;
598 QETH_DBF_MESSAGE(2, "Error (0x%04x) while setting routing type"
599 " on %s. Type set to 'no router'.\n", rc,
600 QETH_CARD_IFNAME(card));
601 }
602 #endif
603 return rc;
604 }
605
606 /*
607 * IP address takeover related functions
608 */
609
610 /**
611 * qeth_l3_update_ipato() - Update 'takeover' property, for all NORMAL IPs.
612 *
613 * Caller must hold ip_lock.
614 */
615 void qeth_l3_update_ipato(struct qeth_card *card)
616 {
617 struct qeth_ipaddr *addr;
618 unsigned int i;
619
620 hash_for_each(card->ip_htable, i, addr, hnode) {
621 if (addr->type != QETH_IP_TYPE_NORMAL)
622 continue;
623 if (qeth_l3_is_addr_covered_by_ipato(card, addr))
624 addr->set_flags |= QETH_IPA_SETIP_TAKEOVER_FLAG;
625 else
626 addr->set_flags &= ~QETH_IPA_SETIP_TAKEOVER_FLAG;
627 }
628 }
629
630 static void qeth_l3_clear_ipato_list(struct qeth_card *card)
631 {
632 struct qeth_ipato_entry *ipatoe, *tmp;
633
634 spin_lock_bh(&card->ip_lock);
635
636 list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
637 list_del(&ipatoe->entry);
638 kfree(ipatoe);
639 }
640
641 qeth_l3_update_ipato(card);
642 spin_unlock_bh(&card->ip_lock);
643 }
644
645 int qeth_l3_add_ipato_entry(struct qeth_card *card,
646 struct qeth_ipato_entry *new)
647 {
648 struct qeth_ipato_entry *ipatoe;
649 int rc = 0;
650
651 QETH_CARD_TEXT(card, 2, "addipato");
652
653 spin_lock_bh(&card->ip_lock);
654
655 list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
656 if (ipatoe->proto != new->proto)
657 continue;
658 if (!memcmp(ipatoe->addr, new->addr,
659 (ipatoe->proto == QETH_PROT_IPV4)? 4:16) &&
660 (ipatoe->mask_bits == new->mask_bits)) {
661 rc = -EEXIST;
662 break;
663 }
664 }
665
666 if (!rc) {
667 list_add_tail(&new->entry, &card->ipato.entries);
668 qeth_l3_update_ipato(card);
669 }
670
671 spin_unlock_bh(&card->ip_lock);
672
673 return rc;
674 }
675
676 void qeth_l3_del_ipato_entry(struct qeth_card *card,
677 enum qeth_prot_versions proto, u8 *addr, int mask_bits)
678 {
679 struct qeth_ipato_entry *ipatoe, *tmp;
680
681 QETH_CARD_TEXT(card, 2, "delipato");
682
683 spin_lock_bh(&card->ip_lock);
684
685 list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
686 if (ipatoe->proto != proto)
687 continue;
688 if (!memcmp(ipatoe->addr, addr,
689 (proto == QETH_PROT_IPV4)? 4:16) &&
690 (ipatoe->mask_bits == mask_bits)) {
691 list_del(&ipatoe->entry);
692 qeth_l3_update_ipato(card);
693 kfree(ipatoe);
694 }
695 }
696
697 spin_unlock_bh(&card->ip_lock);
698 }
699
700 /*
701 * VIPA related functions
702 */
703 int qeth_l3_add_vipa(struct qeth_card *card, enum qeth_prot_versions proto,
704 const u8 *addr)
705 {
706 struct qeth_ipaddr *ipaddr;
707 int rc = 0;
708
709 ipaddr = qeth_l3_get_addr_buffer(proto);
710 if (ipaddr) {
711 if (proto == QETH_PROT_IPV4) {
712 QETH_CARD_TEXT(card, 2, "addvipa4");
713 memcpy(&ipaddr->u.a4.addr, addr, 4);
714 ipaddr->u.a4.mask = 0;
715 } else if (proto == QETH_PROT_IPV6) {
716 QETH_CARD_TEXT(card, 2, "addvipa6");
717 memcpy(&ipaddr->u.a6.addr, addr, 16);
718 ipaddr->u.a6.pfxlen = 0;
719 }
720 ipaddr->type = QETH_IP_TYPE_VIPA;
721 ipaddr->set_flags = QETH_IPA_SETIP_VIPA_FLAG;
722 ipaddr->del_flags = QETH_IPA_DELIP_VIPA_FLAG;
723 } else
724 return -ENOMEM;
725
726 spin_lock_bh(&card->ip_lock);
727
728 if (qeth_l3_ip_from_hash(card, ipaddr))
729 rc = -EEXIST;
730 else
731 qeth_l3_add_ip(card, ipaddr);
732
733 spin_unlock_bh(&card->ip_lock);
734
735 kfree(ipaddr);
736
737 return rc;
738 }
739
740 void qeth_l3_del_vipa(struct qeth_card *card, enum qeth_prot_versions proto,
741 const u8 *addr)
742 {
743 struct qeth_ipaddr *ipaddr;
744
745 ipaddr = qeth_l3_get_addr_buffer(proto);
746 if (ipaddr) {
747 if (proto == QETH_PROT_IPV4) {
748 QETH_CARD_TEXT(card, 2, "delvipa4");
749 memcpy(&ipaddr->u.a4.addr, addr, 4);
750 ipaddr->u.a4.mask = 0;
751 } else if (proto == QETH_PROT_IPV6) {
752 QETH_CARD_TEXT(card, 2, "delvipa6");
753 memcpy(&ipaddr->u.a6.addr, addr, 16);
754 ipaddr->u.a6.pfxlen = 0;
755 }
756 ipaddr->type = QETH_IP_TYPE_VIPA;
757 } else
758 return;
759
760 spin_lock_bh(&card->ip_lock);
761 qeth_l3_delete_ip(card, ipaddr);
762 spin_unlock_bh(&card->ip_lock);
763
764 kfree(ipaddr);
765 }
766
767 /*
768 * proxy ARP related functions
769 */
770 int qeth_l3_add_rxip(struct qeth_card *card, enum qeth_prot_versions proto,
771 const u8 *addr)
772 {
773 struct qeth_ipaddr *ipaddr;
774 int rc = 0;
775
776 ipaddr = qeth_l3_get_addr_buffer(proto);
777 if (ipaddr) {
778 if (proto == QETH_PROT_IPV4) {
779 QETH_CARD_TEXT(card, 2, "addrxip4");
780 memcpy(&ipaddr->u.a4.addr, addr, 4);
781 ipaddr->u.a4.mask = 0;
782 } else if (proto == QETH_PROT_IPV6) {
783 QETH_CARD_TEXT(card, 2, "addrxip6");
784 memcpy(&ipaddr->u.a6.addr, addr, 16);
785 ipaddr->u.a6.pfxlen = 0;
786 }
787
788 ipaddr->type = QETH_IP_TYPE_RXIP;
789 ipaddr->set_flags = QETH_IPA_SETIP_TAKEOVER_FLAG;
790 ipaddr->del_flags = 0;
791 } else
792 return -ENOMEM;
793
794 spin_lock_bh(&card->ip_lock);
795
796 if (qeth_l3_ip_from_hash(card, ipaddr))
797 rc = -EEXIST;
798 else
799 qeth_l3_add_ip(card, ipaddr);
800
801 spin_unlock_bh(&card->ip_lock);
802
803 kfree(ipaddr);
804
805 return rc;
806 }
807
808 void qeth_l3_del_rxip(struct qeth_card *card, enum qeth_prot_versions proto,
809 const u8 *addr)
810 {
811 struct qeth_ipaddr *ipaddr;
812
813 ipaddr = qeth_l3_get_addr_buffer(proto);
814 if (ipaddr) {
815 if (proto == QETH_PROT_IPV4) {
816 QETH_CARD_TEXT(card, 2, "delrxip4");
817 memcpy(&ipaddr->u.a4.addr, addr, 4);
818 ipaddr->u.a4.mask = 0;
819 } else if (proto == QETH_PROT_IPV6) {
820 QETH_CARD_TEXT(card, 2, "delrxip6");
821 memcpy(&ipaddr->u.a6.addr, addr, 16);
822 ipaddr->u.a6.pfxlen = 0;
823 }
824 ipaddr->type = QETH_IP_TYPE_RXIP;
825 } else
826 return;
827
828 spin_lock_bh(&card->ip_lock);
829 qeth_l3_delete_ip(card, ipaddr);
830 spin_unlock_bh(&card->ip_lock);
831
832 kfree(ipaddr);
833 }
834
835 static int qeth_l3_register_addr_entry(struct qeth_card *card,
836 struct qeth_ipaddr *addr)
837 {
838 char buf[50];
839 int rc = 0;
840 int cnt = 3;
841
842
843 if (addr->proto == QETH_PROT_IPV4) {
844 QETH_CARD_TEXT(card, 2, "setaddr4");
845 QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
846 } else if (addr->proto == QETH_PROT_IPV6) {
847 QETH_CARD_TEXT(card, 2, "setaddr6");
848 QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
849 QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
850 } else {
851 QETH_CARD_TEXT(card, 2, "setaddr?");
852 QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
853 }
854 do {
855 if (addr->is_multicast)
856 rc = qeth_l3_send_setdelmc(card, addr, IPA_CMD_SETIPM);
857 else
858 rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_SETIP,
859 addr->set_flags);
860 if (rc)
861 QETH_CARD_TEXT(card, 2, "failed");
862 } while ((--cnt > 0) && rc);
863 if (rc) {
864 QETH_CARD_TEXT(card, 2, "FAILED");
865 qeth_l3_ipaddr_to_string(addr->proto, (u8 *)&addr->u, buf);
866 dev_warn(&card->gdev->dev,
867 "Registering IP address %s failed\n", buf);
868 }
869 return rc;
870 }
871
872 static int qeth_l3_deregister_addr_entry(struct qeth_card *card,
873 struct qeth_ipaddr *addr)
874 {
875 int rc = 0;
876
877 if (addr->proto == QETH_PROT_IPV4) {
878 QETH_CARD_TEXT(card, 2, "deladdr4");
879 QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
880 } else if (addr->proto == QETH_PROT_IPV6) {
881 QETH_CARD_TEXT(card, 2, "deladdr6");
882 QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
883 QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
884 } else {
885 QETH_CARD_TEXT(card, 2, "deladdr?");
886 QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
887 }
888 if (addr->is_multicast)
889 rc = qeth_l3_send_setdelmc(card, addr, IPA_CMD_DELIPM);
890 else
891 rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_DELIP,
892 addr->del_flags);
893 if (rc)
894 QETH_CARD_TEXT(card, 2, "failed");
895
896 return rc;
897 }
898
899 static u8 qeth_l3_get_qeth_hdr_flags4(int cast_type)
900 {
901 if (cast_type == RTN_MULTICAST)
902 return QETH_CAST_MULTICAST;
903 if (cast_type == RTN_BROADCAST)
904 return QETH_CAST_BROADCAST;
905 return QETH_CAST_UNICAST;
906 }
907
908 static u8 qeth_l3_get_qeth_hdr_flags6(int cast_type)
909 {
910 u8 ct = QETH_HDR_PASSTHRU | QETH_HDR_IPV6;
911 if (cast_type == RTN_MULTICAST)
912 return ct | QETH_CAST_MULTICAST;
913 if (cast_type == RTN_ANYCAST)
914 return ct | QETH_CAST_ANYCAST;
915 if (cast_type == RTN_BROADCAST)
916 return ct | QETH_CAST_BROADCAST;
917 return ct | QETH_CAST_UNICAST;
918 }
919
920 static int qeth_l3_setadapter_parms(struct qeth_card *card)
921 {
922 int rc = 0;
923
924 QETH_DBF_TEXT(SETUP, 2, "setadprm");
925
926 if (qeth_adp_supported(card, IPA_SETADP_ALTER_MAC_ADDRESS)) {
927 rc = qeth_setadpparms_change_macaddr(card);
928 if (rc)
929 dev_warn(&card->gdev->dev, "Reading the adapter MAC"
930 " address failed\n");
931 }
932
933 return rc;
934 }
935
936 #ifdef CONFIG_QETH_IPV6
937 static int qeth_l3_send_simple_setassparms_ipv6(struct qeth_card *card,
938 enum qeth_ipa_funcs ipa_func, __u16 cmd_code)
939 {
940 int rc;
941 struct qeth_cmd_buffer *iob;
942
943 QETH_CARD_TEXT(card, 4, "simassp6");
944 iob = qeth_get_setassparms_cmd(card, ipa_func, cmd_code,
945 0, QETH_PROT_IPV6);
946 if (!iob)
947 return -ENOMEM;
948 rc = qeth_send_setassparms(card, iob, 0, 0,
949 qeth_setassparms_cb, NULL);
950 return rc;
951 }
952 #endif
953
954 static int qeth_l3_start_ipa_arp_processing(struct qeth_card *card)
955 {
956 int rc;
957
958 QETH_CARD_TEXT(card, 3, "ipaarp");
959
960 if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
961 dev_info(&card->gdev->dev,
962 "ARP processing not supported on %s!\n",
963 QETH_CARD_IFNAME(card));
964 return 0;
965 }
966 rc = qeth_send_simple_setassparms(card, IPA_ARP_PROCESSING,
967 IPA_CMD_ASS_START, 0);
968 if (rc) {
969 dev_warn(&card->gdev->dev,
970 "Starting ARP processing support for %s failed\n",
971 QETH_CARD_IFNAME(card));
972 }
973 return rc;
974 }
975
976 static int qeth_l3_start_ipa_source_mac(struct qeth_card *card)
977 {
978 int rc;
979
980 QETH_CARD_TEXT(card, 3, "stsrcmac");
981
982 if (!qeth_is_supported(card, IPA_SOURCE_MAC)) {
983 dev_info(&card->gdev->dev,
984 "Inbound source MAC-address not supported on %s\n",
985 QETH_CARD_IFNAME(card));
986 return -EOPNOTSUPP;
987 }
988
989 rc = qeth_send_simple_setassparms(card, IPA_SOURCE_MAC,
990 IPA_CMD_ASS_START, 0);
991 if (rc)
992 dev_warn(&card->gdev->dev,
993 "Starting source MAC-address support for %s failed\n",
994 QETH_CARD_IFNAME(card));
995 return rc;
996 }
997
998 static int qeth_l3_start_ipa_vlan(struct qeth_card *card)
999 {
1000 int rc = 0;
1001
1002 QETH_CARD_TEXT(card, 3, "strtvlan");
1003
1004 if (!qeth_is_supported(card, IPA_FULL_VLAN)) {
1005 dev_info(&card->gdev->dev,
1006 "VLAN not supported on %s\n", QETH_CARD_IFNAME(card));
1007 return -EOPNOTSUPP;
1008 }
1009
1010 rc = qeth_send_simple_setassparms(card, IPA_VLAN_PRIO,
1011 IPA_CMD_ASS_START, 0);
1012 if (rc) {
1013 dev_warn(&card->gdev->dev,
1014 "Starting VLAN support for %s failed\n",
1015 QETH_CARD_IFNAME(card));
1016 } else {
1017 dev_info(&card->gdev->dev, "VLAN enabled\n");
1018 }
1019 return rc;
1020 }
1021
1022 static int qeth_l3_start_ipa_multicast(struct qeth_card *card)
1023 {
1024 int rc;
1025
1026 QETH_CARD_TEXT(card, 3, "stmcast");
1027
1028 if (!qeth_is_supported(card, IPA_MULTICASTING)) {
1029 dev_info(&card->gdev->dev,
1030 "Multicast not supported on %s\n",
1031 QETH_CARD_IFNAME(card));
1032 return -EOPNOTSUPP;
1033 }
1034
1035 rc = qeth_send_simple_setassparms(card, IPA_MULTICASTING,
1036 IPA_CMD_ASS_START, 0);
1037 if (rc) {
1038 dev_warn(&card->gdev->dev,
1039 "Starting multicast support for %s failed\n",
1040 QETH_CARD_IFNAME(card));
1041 } else {
1042 dev_info(&card->gdev->dev, "Multicast enabled\n");
1043 card->dev->flags |= IFF_MULTICAST;
1044 }
1045 return rc;
1046 }
1047
1048 #ifdef CONFIG_QETH_IPV6
1049 static int qeth_l3_softsetup_ipv6(struct qeth_card *card)
1050 {
1051 int rc;
1052
1053 QETH_CARD_TEXT(card, 3, "softipv6");
1054
1055 rc = qeth_query_ipassists(card, QETH_PROT_IPV6);
1056 if (rc) {
1057 dev_err(&card->gdev->dev,
1058 "Activating IPv6 support for %s failed\n",
1059 QETH_CARD_IFNAME(card));
1060 return rc;
1061 }
1062
1063 if (card->info.type == QETH_CARD_TYPE_IQD)
1064 goto out;
1065
1066 rc = qeth_send_simple_setassparms(card, IPA_IPV6,
1067 IPA_CMD_ASS_START, 3);
1068 if (rc) {
1069 dev_err(&card->gdev->dev,
1070 "Activating IPv6 support for %s failed\n",
1071 QETH_CARD_IFNAME(card));
1072 return rc;
1073 }
1074 rc = qeth_l3_send_simple_setassparms_ipv6(card, IPA_IPV6,
1075 IPA_CMD_ASS_START);
1076 if (rc) {
1077 dev_err(&card->gdev->dev,
1078 "Activating IPv6 support for %s failed\n",
1079 QETH_CARD_IFNAME(card));
1080 return rc;
1081 }
1082 rc = qeth_l3_send_simple_setassparms_ipv6(card, IPA_PASSTHRU,
1083 IPA_CMD_ASS_START);
1084 if (rc) {
1085 dev_warn(&card->gdev->dev,
1086 "Enabling the passthrough mode for %s failed\n",
1087 QETH_CARD_IFNAME(card));
1088 return rc;
1089 }
1090 out:
1091 dev_info(&card->gdev->dev, "IPV6 enabled\n");
1092 return 0;
1093 }
1094 #endif
1095
1096 static int qeth_l3_start_ipa_ipv6(struct qeth_card *card)
1097 {
1098 int rc = 0;
1099
1100 QETH_CARD_TEXT(card, 3, "strtipv6");
1101
1102 if (!qeth_is_supported(card, IPA_IPV6)) {
1103 dev_info(&card->gdev->dev,
1104 "IPv6 not supported on %s\n", QETH_CARD_IFNAME(card));
1105 return 0;
1106 }
1107 #ifdef CONFIG_QETH_IPV6
1108 rc = qeth_l3_softsetup_ipv6(card);
1109 #endif
1110 return rc ;
1111 }
1112
1113 static int qeth_l3_start_ipa_broadcast(struct qeth_card *card)
1114 {
1115 int rc;
1116
1117 QETH_CARD_TEXT(card, 3, "stbrdcst");
1118 card->info.broadcast_capable = 0;
1119 if (!qeth_is_supported(card, IPA_FILTERING)) {
1120 dev_info(&card->gdev->dev,
1121 "Broadcast not supported on %s\n",
1122 QETH_CARD_IFNAME(card));
1123 rc = -EOPNOTSUPP;
1124 goto out;
1125 }
1126 rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
1127 IPA_CMD_ASS_START, 0);
1128 if (rc) {
1129 dev_warn(&card->gdev->dev, "Enabling broadcast filtering for "
1130 "%s failed\n", QETH_CARD_IFNAME(card));
1131 goto out;
1132 }
1133
1134 rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
1135 IPA_CMD_ASS_CONFIGURE, 1);
1136 if (rc) {
1137 dev_warn(&card->gdev->dev,
1138 "Setting up broadcast filtering for %s failed\n",
1139 QETH_CARD_IFNAME(card));
1140 goto out;
1141 }
1142 card->info.broadcast_capable = QETH_BROADCAST_WITH_ECHO;
1143 dev_info(&card->gdev->dev, "Broadcast enabled\n");
1144 rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
1145 IPA_CMD_ASS_ENABLE, 1);
1146 if (rc) {
1147 dev_warn(&card->gdev->dev, "Setting up broadcast echo "
1148 "filtering for %s failed\n", QETH_CARD_IFNAME(card));
1149 goto out;
1150 }
1151 card->info.broadcast_capable = QETH_BROADCAST_WITHOUT_ECHO;
1152 out:
1153 if (card->info.broadcast_capable)
1154 card->dev->flags |= IFF_BROADCAST;
1155 else
1156 card->dev->flags &= ~IFF_BROADCAST;
1157 return rc;
1158 }
1159
1160 static int qeth_l3_start_ipassists(struct qeth_card *card)
1161 {
1162 QETH_CARD_TEXT(card, 3, "strtipas");
1163
1164 if (qeth_set_access_ctrl_online(card, 0))
1165 return -EIO;
1166 qeth_l3_start_ipa_arp_processing(card); /* go on*/
1167 qeth_l3_start_ipa_source_mac(card); /* go on*/
1168 qeth_l3_start_ipa_vlan(card); /* go on*/
1169 qeth_l3_start_ipa_multicast(card); /* go on*/
1170 qeth_l3_start_ipa_ipv6(card); /* go on*/
1171 qeth_l3_start_ipa_broadcast(card); /* go on*/
1172 return 0;
1173 }
1174
1175 static int qeth_l3_iqd_read_initial_mac_cb(struct qeth_card *card,
1176 struct qeth_reply *reply, unsigned long data)
1177 {
1178 struct qeth_ipa_cmd *cmd;
1179
1180 cmd = (struct qeth_ipa_cmd *) data;
1181 if (cmd->hdr.return_code == 0)
1182 memcpy(card->dev->dev_addr,
1183 cmd->data.create_destroy_addr.unique_id, ETH_ALEN);
1184 else
1185 eth_random_addr(card->dev->dev_addr);
1186
1187 return 0;
1188 }
1189
1190 static int qeth_l3_iqd_read_initial_mac(struct qeth_card *card)
1191 {
1192 int rc = 0;
1193 struct qeth_cmd_buffer *iob;
1194 struct qeth_ipa_cmd *cmd;
1195
1196 QETH_DBF_TEXT(SETUP, 2, "hsrmac");
1197
1198 iob = qeth_get_ipacmd_buffer(card, IPA_CMD_CREATE_ADDR,
1199 QETH_PROT_IPV6);
1200 if (!iob)
1201 return -ENOMEM;
1202 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1203 *((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
1204 card->info.unique_id;
1205
1206 rc = qeth_send_ipa_cmd(card, iob, qeth_l3_iqd_read_initial_mac_cb,
1207 NULL);
1208 return rc;
1209 }
1210
1211 static int qeth_l3_get_unique_id_cb(struct qeth_card *card,
1212 struct qeth_reply *reply, unsigned long data)
1213 {
1214 struct qeth_ipa_cmd *cmd;
1215
1216 cmd = (struct qeth_ipa_cmd *) data;
1217 if (cmd->hdr.return_code == 0)
1218 card->info.unique_id = *((__u16 *)
1219 &cmd->data.create_destroy_addr.unique_id[6]);
1220 else {
1221 card->info.unique_id = UNIQUE_ID_IF_CREATE_ADDR_FAILED |
1222 UNIQUE_ID_NOT_BY_CARD;
1223 dev_warn(&card->gdev->dev, "The network adapter failed to "
1224 "generate a unique ID\n");
1225 }
1226 return 0;
1227 }
1228
1229 static int qeth_l3_get_unique_id(struct qeth_card *card)
1230 {
1231 int rc = 0;
1232 struct qeth_cmd_buffer *iob;
1233 struct qeth_ipa_cmd *cmd;
1234
1235 QETH_DBF_TEXT(SETUP, 2, "guniqeid");
1236
1237 if (!qeth_is_supported(card, IPA_IPV6)) {
1238 card->info.unique_id = UNIQUE_ID_IF_CREATE_ADDR_FAILED |
1239 UNIQUE_ID_NOT_BY_CARD;
1240 return 0;
1241 }
1242
1243 iob = qeth_get_ipacmd_buffer(card, IPA_CMD_CREATE_ADDR,
1244 QETH_PROT_IPV6);
1245 if (!iob)
1246 return -ENOMEM;
1247 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1248 *((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
1249 card->info.unique_id;
1250
1251 rc = qeth_send_ipa_cmd(card, iob, qeth_l3_get_unique_id_cb, NULL);
1252 return rc;
1253 }
1254
1255 static int
1256 qeth_diags_trace_cb(struct qeth_card *card, struct qeth_reply *reply,
1257 unsigned long data)
1258 {
1259 struct qeth_ipa_cmd *cmd;
1260 __u16 rc;
1261
1262 QETH_DBF_TEXT(SETUP, 2, "diastrcb");
1263
1264 cmd = (struct qeth_ipa_cmd *)data;
1265 rc = cmd->hdr.return_code;
1266 if (rc)
1267 QETH_CARD_TEXT_(card, 2, "dxter%x", rc);
1268 switch (cmd->data.diagass.action) {
1269 case QETH_DIAGS_CMD_TRACE_QUERY:
1270 break;
1271 case QETH_DIAGS_CMD_TRACE_DISABLE:
1272 switch (rc) {
1273 case 0:
1274 case IPA_RC_INVALID_SUBCMD:
1275 card->info.promisc_mode = SET_PROMISC_MODE_OFF;
1276 dev_info(&card->gdev->dev, "The HiperSockets network "
1277 "traffic analyzer is deactivated\n");
1278 break;
1279 default:
1280 break;
1281 }
1282 break;
1283 case QETH_DIAGS_CMD_TRACE_ENABLE:
1284 switch (rc) {
1285 case 0:
1286 card->info.promisc_mode = SET_PROMISC_MODE_ON;
1287 dev_info(&card->gdev->dev, "The HiperSockets network "
1288 "traffic analyzer is activated\n");
1289 break;
1290 case IPA_RC_HARDWARE_AUTH_ERROR:
1291 dev_warn(&card->gdev->dev, "The device is not "
1292 "authorized to run as a HiperSockets network "
1293 "traffic analyzer\n");
1294 break;
1295 case IPA_RC_TRACE_ALREADY_ACTIVE:
1296 dev_warn(&card->gdev->dev, "A HiperSockets "
1297 "network traffic analyzer is already "
1298 "active in the HiperSockets LAN\n");
1299 break;
1300 default:
1301 break;
1302 }
1303 break;
1304 default:
1305 QETH_DBF_MESSAGE(2, "Unknown sniffer action (0x%04x) on %s\n",
1306 cmd->data.diagass.action, QETH_CARD_IFNAME(card));
1307 }
1308
1309 return 0;
1310 }
1311
1312 static int
1313 qeth_diags_trace(struct qeth_card *card, enum qeth_diags_trace_cmds diags_cmd)
1314 {
1315 struct qeth_cmd_buffer *iob;
1316 struct qeth_ipa_cmd *cmd;
1317
1318 QETH_DBF_TEXT(SETUP, 2, "diagtrac");
1319
1320 iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SET_DIAG_ASS, 0);
1321 if (!iob)
1322 return -ENOMEM;
1323 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1324 cmd->data.diagass.subcmd_len = 16;
1325 cmd->data.diagass.subcmd = QETH_DIAGS_CMD_TRACE;
1326 cmd->data.diagass.type = QETH_DIAGS_TYPE_HIPERSOCKET;
1327 cmd->data.diagass.action = diags_cmd;
1328 return qeth_send_ipa_cmd(card, iob, qeth_diags_trace_cb, NULL);
1329 }
1330
1331 static void qeth_l3_get_mac_for_ipm(__be32 ipm, char *mac)
1332 {
1333 ip_eth_mc_map(ipm, mac);
1334 }
1335
1336 static void qeth_l3_mark_all_mc_to_be_deleted(struct qeth_card *card)
1337 {
1338 struct qeth_ipaddr *addr;
1339 int i;
1340
1341 hash_for_each(card->ip_mc_htable, i, addr, hnode)
1342 addr->disp_flag = QETH_DISP_ADDR_DELETE;
1343
1344 }
1345
1346 static void qeth_l3_add_all_new_mc(struct qeth_card *card)
1347 {
1348 struct qeth_ipaddr *addr;
1349 struct hlist_node *tmp;
1350 int i;
1351 int rc;
1352
1353 hash_for_each_safe(card->ip_mc_htable, i, tmp, addr, hnode) {
1354 if (addr->disp_flag == QETH_DISP_ADDR_ADD) {
1355 rc = qeth_l3_register_addr_entry(card, addr);
1356 if (!rc || (rc == IPA_RC_LAN_OFFLINE))
1357 addr->ref_counter = 1;
1358 else {
1359 hash_del(&addr->hnode);
1360 kfree(addr);
1361 }
1362 }
1363 }
1364
1365 }
1366
1367 static void qeth_l3_delete_nonused_mc(struct qeth_card *card)
1368 {
1369 struct qeth_ipaddr *addr;
1370 struct hlist_node *tmp;
1371 int i;
1372 int rc;
1373
1374 hash_for_each_safe(card->ip_mc_htable, i, tmp, addr, hnode) {
1375 if (addr->disp_flag == QETH_DISP_ADDR_DELETE) {
1376 rc = qeth_l3_deregister_addr_entry(card, addr);
1377 if (!rc || (rc == IPA_RC_MC_ADDR_NOT_FOUND)) {
1378 hash_del(&addr->hnode);
1379 kfree(addr);
1380 }
1381 }
1382 }
1383
1384 }
1385
1386
1387 static void
1388 qeth_l3_add_mc_to_hash(struct qeth_card *card, struct in_device *in4_dev)
1389 {
1390 struct ip_mc_list *im4;
1391 struct qeth_ipaddr *tmp, *ipm;
1392 char buf[MAX_ADDR_LEN];
1393
1394 QETH_CARD_TEXT(card, 4, "addmc");
1395
1396 tmp = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
1397 if (!tmp)
1398 return;
1399
1400 for (im4 = rcu_dereference(in4_dev->mc_list); im4 != NULL;
1401 im4 = rcu_dereference(im4->next_rcu)) {
1402 qeth_l3_get_mac_for_ipm(im4->multiaddr, buf);
1403
1404 tmp->u.a4.addr = be32_to_cpu(im4->multiaddr);
1405 memcpy(tmp->mac, buf, sizeof(tmp->mac));
1406 tmp->is_multicast = 1;
1407
1408 ipm = qeth_l3_ip_from_hash(card, tmp);
1409 if (ipm) {
1410 ipm->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
1411 } else {
1412 ipm = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
1413 if (!ipm)
1414 continue;
1415 memcpy(ipm->mac, buf, sizeof(tmp->mac));
1416 ipm->u.a4.addr = be32_to_cpu(im4->multiaddr);
1417 ipm->is_multicast = 1;
1418 ipm->disp_flag = QETH_DISP_ADDR_ADD;
1419 hash_add(card->ip_mc_htable,
1420 &ipm->hnode, qeth_l3_ipaddr_hash(ipm));
1421 }
1422 }
1423
1424 kfree(tmp);
1425 }
1426
1427 /* called with rcu_read_lock */
1428 static void qeth_l3_add_vlan_mc(struct qeth_card *card)
1429 {
1430 struct in_device *in_dev;
1431 u16 vid;
1432
1433 QETH_CARD_TEXT(card, 4, "addmcvl");
1434
1435 if (!qeth_is_supported(card, IPA_FULL_VLAN))
1436 return;
1437
1438 for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
1439 struct net_device *netdev;
1440
1441 netdev = __vlan_find_dev_deep_rcu(card->dev, htons(ETH_P_8021Q),
1442 vid);
1443 if (netdev == NULL ||
1444 !(netdev->flags & IFF_UP))
1445 continue;
1446 in_dev = __in_dev_get_rcu(netdev);
1447 if (!in_dev)
1448 continue;
1449 qeth_l3_add_mc_to_hash(card, in_dev);
1450 }
1451 }
1452
1453 static void qeth_l3_add_multicast_ipv4(struct qeth_card *card)
1454 {
1455 struct in_device *in4_dev;
1456
1457 QETH_CARD_TEXT(card, 4, "chkmcv4");
1458
1459 rcu_read_lock();
1460 in4_dev = __in_dev_get_rcu(card->dev);
1461 if (in4_dev == NULL)
1462 goto unlock;
1463 qeth_l3_add_mc_to_hash(card, in4_dev);
1464 qeth_l3_add_vlan_mc(card);
1465 unlock:
1466 rcu_read_unlock();
1467 }
1468
1469 #ifdef CONFIG_QETH_IPV6
1470 static void
1471 qeth_l3_add_mc6_to_hash(struct qeth_card *card, struct inet6_dev *in6_dev)
1472 {
1473 struct qeth_ipaddr *ipm;
1474 struct ifmcaddr6 *im6;
1475 struct qeth_ipaddr *tmp;
1476 char buf[MAX_ADDR_LEN];
1477
1478 QETH_CARD_TEXT(card, 4, "addmc6");
1479
1480 tmp = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
1481 if (!tmp)
1482 return;
1483
1484 for (im6 = in6_dev->mc_list; im6 != NULL; im6 = im6->next) {
1485 ndisc_mc_map(&im6->mca_addr, buf, in6_dev->dev, 0);
1486
1487 memcpy(tmp->mac, buf, sizeof(tmp->mac));
1488 memcpy(&tmp->u.a6.addr, &im6->mca_addr.s6_addr,
1489 sizeof(struct in6_addr));
1490 tmp->is_multicast = 1;
1491
1492 ipm = qeth_l3_ip_from_hash(card, tmp);
1493 if (ipm) {
1494 ipm->disp_flag = QETH_DISP_ADDR_DO_NOTHING;
1495 continue;
1496 }
1497
1498 ipm = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
1499 if (!ipm)
1500 continue;
1501
1502 memcpy(ipm->mac, buf, OSA_ADDR_LEN);
1503 memcpy(&ipm->u.a6.addr, &im6->mca_addr.s6_addr,
1504 sizeof(struct in6_addr));
1505 ipm->is_multicast = 1;
1506 ipm->disp_flag = QETH_DISP_ADDR_ADD;
1507 hash_add(card->ip_mc_htable,
1508 &ipm->hnode, qeth_l3_ipaddr_hash(ipm));
1509
1510 }
1511 kfree(tmp);
1512 }
1513
1514 /* called with rcu_read_lock */
1515 static void qeth_l3_add_vlan_mc6(struct qeth_card *card)
1516 {
1517 struct inet6_dev *in_dev;
1518 u16 vid;
1519
1520 QETH_CARD_TEXT(card, 4, "admc6vl");
1521
1522 if (!qeth_is_supported(card, IPA_FULL_VLAN))
1523 return;
1524
1525 for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
1526 struct net_device *netdev;
1527
1528 netdev = __vlan_find_dev_deep_rcu(card->dev, htons(ETH_P_8021Q),
1529 vid);
1530 if (netdev == NULL ||
1531 !(netdev->flags & IFF_UP))
1532 continue;
1533 in_dev = in6_dev_get(netdev);
1534 if (!in_dev)
1535 continue;
1536 read_lock_bh(&in_dev->lock);
1537 qeth_l3_add_mc6_to_hash(card, in_dev);
1538 read_unlock_bh(&in_dev->lock);
1539 in6_dev_put(in_dev);
1540 }
1541 }
1542
1543 static void qeth_l3_add_multicast_ipv6(struct qeth_card *card)
1544 {
1545 struct inet6_dev *in6_dev;
1546
1547 QETH_CARD_TEXT(card, 4, "chkmcv6");
1548
1549 if (!qeth_is_supported(card, IPA_IPV6))
1550 return ;
1551 in6_dev = in6_dev_get(card->dev);
1552 if (!in6_dev)
1553 return;
1554
1555 rcu_read_lock();
1556 read_lock_bh(&in6_dev->lock);
1557 qeth_l3_add_mc6_to_hash(card, in6_dev);
1558 qeth_l3_add_vlan_mc6(card);
1559 read_unlock_bh(&in6_dev->lock);
1560 rcu_read_unlock();
1561 in6_dev_put(in6_dev);
1562 }
1563 #endif /* CONFIG_QETH_IPV6 */
1564
1565 static void qeth_l3_free_vlan_addresses4(struct qeth_card *card,
1566 unsigned short vid)
1567 {
1568 struct in_device *in_dev;
1569 struct in_ifaddr *ifa;
1570 struct qeth_ipaddr *addr;
1571 struct net_device *netdev;
1572
1573 QETH_CARD_TEXT(card, 4, "frvaddr4");
1574
1575 netdev = __vlan_find_dev_deep_rcu(card->dev, htons(ETH_P_8021Q), vid);
1576 if (!netdev)
1577 return;
1578 in_dev = in_dev_get(netdev);
1579 if (!in_dev)
1580 return;
1581
1582 addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
1583 if (!addr)
1584 goto out;
1585
1586 spin_lock_bh(&card->ip_lock);
1587
1588 for (ifa = in_dev->ifa_list; ifa; ifa = ifa->ifa_next) {
1589 addr->u.a4.addr = be32_to_cpu(ifa->ifa_address);
1590 addr->u.a4.mask = be32_to_cpu(ifa->ifa_mask);
1591 addr->type = QETH_IP_TYPE_NORMAL;
1592 qeth_l3_delete_ip(card, addr);
1593 }
1594
1595 spin_unlock_bh(&card->ip_lock);
1596
1597 kfree(addr);
1598 out:
1599 in_dev_put(in_dev);
1600 }
1601
1602 static void qeth_l3_free_vlan_addresses6(struct qeth_card *card,
1603 unsigned short vid)
1604 {
1605 #ifdef CONFIG_QETH_IPV6
1606 struct inet6_dev *in6_dev;
1607 struct inet6_ifaddr *ifa;
1608 struct qeth_ipaddr *addr;
1609 struct net_device *netdev;
1610
1611 QETH_CARD_TEXT(card, 4, "frvaddr6");
1612
1613 netdev = __vlan_find_dev_deep_rcu(card->dev, htons(ETH_P_8021Q), vid);
1614 if (!netdev)
1615 return;
1616
1617 in6_dev = in6_dev_get(netdev);
1618 if (!in6_dev)
1619 return;
1620
1621 addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
1622 if (!addr)
1623 goto out;
1624
1625 spin_lock_bh(&card->ip_lock);
1626
1627 list_for_each_entry(ifa, &in6_dev->addr_list, if_list) {
1628 memcpy(&addr->u.a6.addr, &ifa->addr,
1629 sizeof(struct in6_addr));
1630 addr->u.a6.pfxlen = ifa->prefix_len;
1631 addr->type = QETH_IP_TYPE_NORMAL;
1632 qeth_l3_delete_ip(card, addr);
1633 }
1634
1635 spin_unlock_bh(&card->ip_lock);
1636
1637 kfree(addr);
1638 out:
1639 in6_dev_put(in6_dev);
1640 #endif /* CONFIG_QETH_IPV6 */
1641 }
1642
1643 static void qeth_l3_free_vlan_addresses(struct qeth_card *card,
1644 unsigned short vid)
1645 {
1646 rcu_read_lock();
1647 qeth_l3_free_vlan_addresses4(card, vid);
1648 qeth_l3_free_vlan_addresses6(card, vid);
1649 rcu_read_unlock();
1650 }
1651
1652 static int qeth_l3_vlan_rx_add_vid(struct net_device *dev,
1653 __be16 proto, u16 vid)
1654 {
1655 struct qeth_card *card = dev->ml_priv;
1656
1657 set_bit(vid, card->active_vlans);
1658 return 0;
1659 }
1660
1661 static int qeth_l3_vlan_rx_kill_vid(struct net_device *dev,
1662 __be16 proto, u16 vid)
1663 {
1664 struct qeth_card *card = dev->ml_priv;
1665
1666 QETH_CARD_TEXT_(card, 4, "kid:%d", vid);
1667
1668 if (qeth_wait_for_threads(card, QETH_RECOVER_THREAD)) {
1669 QETH_CARD_TEXT(card, 3, "kidREC");
1670 return 0;
1671 }
1672 /* unregister IP addresses of vlan device */
1673 qeth_l3_free_vlan_addresses(card, vid);
1674 clear_bit(vid, card->active_vlans);
1675 qeth_l3_set_multicast_list(card->dev);
1676 return 0;
1677 }
1678
1679 static void qeth_l3_rebuild_skb(struct qeth_card *card, struct sk_buff *skb,
1680 struct qeth_hdr *hdr)
1681 {
1682 __u16 prot;
1683 struct iphdr *ip_hdr;
1684 unsigned char tg_addr[MAX_ADDR_LEN];
1685
1686 if (!(hdr->hdr.l3.flags & QETH_HDR_PASSTHRU)) {
1687 prot = (hdr->hdr.l3.flags & QETH_HDR_IPV6) ? ETH_P_IPV6 :
1688 ETH_P_IP;
1689 switch (hdr->hdr.l3.flags & QETH_HDR_CAST_MASK) {
1690 case QETH_CAST_MULTICAST:
1691 switch (prot) {
1692 #ifdef CONFIG_QETH_IPV6
1693 case ETH_P_IPV6:
1694 ndisc_mc_map((struct in6_addr *)
1695 skb->data + 24,
1696 tg_addr, card->dev, 0);
1697 break;
1698 #endif
1699 case ETH_P_IP:
1700 ip_hdr = (struct iphdr *)skb->data;
1701 ip_eth_mc_map(ip_hdr->daddr, tg_addr);
1702 break;
1703 default:
1704 memcpy(tg_addr, card->dev->broadcast,
1705 card->dev->addr_len);
1706 }
1707 card->stats.multicast++;
1708 skb->pkt_type = PACKET_MULTICAST;
1709 break;
1710 case QETH_CAST_BROADCAST:
1711 memcpy(tg_addr, card->dev->broadcast,
1712 card->dev->addr_len);
1713 card->stats.multicast++;
1714 skb->pkt_type = PACKET_BROADCAST;
1715 break;
1716 case QETH_CAST_UNICAST:
1717 case QETH_CAST_ANYCAST:
1718 case QETH_CAST_NOCAST:
1719 default:
1720 if (card->options.sniffer)
1721 skb->pkt_type = PACKET_OTHERHOST;
1722 else
1723 skb->pkt_type = PACKET_HOST;
1724 memcpy(tg_addr, card->dev->dev_addr,
1725 card->dev->addr_len);
1726 }
1727 if (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_SRC_MAC_ADDR)
1728 card->dev->header_ops->create(skb, card->dev, prot,
1729 tg_addr, &hdr->hdr.l3.dest_addr[2],
1730 card->dev->addr_len);
1731 else
1732 card->dev->header_ops->create(skb, card->dev, prot,
1733 tg_addr, "FAKELL", card->dev->addr_len);
1734 }
1735
1736 skb->protocol = eth_type_trans(skb, card->dev);
1737
1738 /* copy VLAN tag from hdr into skb */
1739 if (!card->options.sniffer &&
1740 (hdr->hdr.l3.ext_flags & (QETH_HDR_EXT_VLAN_FRAME |
1741 QETH_HDR_EXT_INCLUDE_VLAN_TAG))) {
1742 u16 tag = (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_VLAN_FRAME) ?
1743 hdr->hdr.l3.vlan_id :
1744 *((u16 *)&hdr->hdr.l3.dest_addr[12]);
1745 __vlan_hwaccel_put_tag(skb, htons(ETH_P_8021Q), tag);
1746 }
1747
1748 if (card->dev->features & NETIF_F_RXCSUM) {
1749 if ((hdr->hdr.l3.ext_flags &
1750 (QETH_HDR_EXT_CSUM_HDR_REQ |
1751 QETH_HDR_EXT_CSUM_TRANSP_REQ)) ==
1752 (QETH_HDR_EXT_CSUM_HDR_REQ |
1753 QETH_HDR_EXT_CSUM_TRANSP_REQ))
1754 skb->ip_summed = CHECKSUM_UNNECESSARY;
1755 else
1756 skb->ip_summed = CHECKSUM_NONE;
1757 } else
1758 skb->ip_summed = CHECKSUM_NONE;
1759 }
1760
1761 static int qeth_l3_process_inbound_buffer(struct qeth_card *card,
1762 int budget, int *done)
1763 {
1764 int work_done = 0;
1765 struct sk_buff *skb;
1766 struct qeth_hdr *hdr;
1767 unsigned int len;
1768 __u16 magic;
1769
1770 *done = 0;
1771 WARN_ON_ONCE(!budget);
1772 while (budget) {
1773 skb = qeth_core_get_next_skb(card,
1774 &card->qdio.in_q->bufs[card->rx.b_index],
1775 &card->rx.b_element, &card->rx.e_offset, &hdr);
1776 if (!skb) {
1777 *done = 1;
1778 break;
1779 }
1780 skb->dev = card->dev;
1781 switch (hdr->hdr.l3.id) {
1782 case QETH_HEADER_TYPE_LAYER3:
1783 magic = *(__u16 *)skb->data;
1784 if ((card->info.type == QETH_CARD_TYPE_IQD) &&
1785 (magic == ETH_P_AF_IUCV)) {
1786 skb->protocol = cpu_to_be16(ETH_P_AF_IUCV);
1787 skb->pkt_type = PACKET_HOST;
1788 skb->mac_header = NET_SKB_PAD;
1789 skb->dev = card->dev;
1790 len = skb->len;
1791 card->dev->header_ops->create(skb, card->dev, 0,
1792 card->dev->dev_addr, "FAKELL",
1793 card->dev->addr_len);
1794 netif_receive_skb(skb);
1795 } else {
1796 qeth_l3_rebuild_skb(card, skb, hdr);
1797 len = skb->len;
1798 napi_gro_receive(&card->napi, skb);
1799 }
1800 break;
1801 case QETH_HEADER_TYPE_LAYER2: /* for HiperSockets sniffer */
1802 skb->pkt_type = PACKET_HOST;
1803 skb->protocol = eth_type_trans(skb, skb->dev);
1804 len = skb->len;
1805 netif_receive_skb(skb);
1806 break;
1807 default:
1808 dev_kfree_skb_any(skb);
1809 QETH_CARD_TEXT(card, 3, "inbunkno");
1810 QETH_DBF_HEX(CTRL, 3, hdr, QETH_DBF_CTRL_LEN);
1811 continue;
1812 }
1813 work_done++;
1814 budget--;
1815 card->stats.rx_packets++;
1816 card->stats.rx_bytes += len;
1817 }
1818 return work_done;
1819 }
1820
1821 static int qeth_l3_verify_vlan_dev(struct net_device *dev,
1822 struct qeth_card *card)
1823 {
1824 int rc = 0;
1825 u16 vid;
1826
1827 for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
1828 struct net_device *netdev;
1829
1830 rcu_read_lock();
1831 netdev = __vlan_find_dev_deep_rcu(card->dev, htons(ETH_P_8021Q),
1832 vid);
1833 rcu_read_unlock();
1834 if (netdev == dev) {
1835 rc = QETH_VLAN_CARD;
1836 break;
1837 }
1838 }
1839
1840 if (rc && !(vlan_dev_real_dev(dev)->ml_priv == (void *)card))
1841 return 0;
1842
1843 return rc;
1844 }
1845
1846 static int qeth_l3_verify_dev(struct net_device *dev)
1847 {
1848 struct qeth_card *card;
1849 int rc = 0;
1850 unsigned long flags;
1851
1852 read_lock_irqsave(&qeth_core_card_list.rwlock, flags);
1853 list_for_each_entry(card, &qeth_core_card_list.list, list) {
1854 if (card->dev == dev) {
1855 rc = QETH_REAL_CARD;
1856 break;
1857 }
1858 rc = qeth_l3_verify_vlan_dev(dev, card);
1859 if (rc)
1860 break;
1861 }
1862 read_unlock_irqrestore(&qeth_core_card_list.rwlock, flags);
1863
1864 return rc;
1865 }
1866
1867 static struct qeth_card *qeth_l3_get_card_from_dev(struct net_device *dev)
1868 {
1869 struct qeth_card *card = NULL;
1870 int rc;
1871
1872 rc = qeth_l3_verify_dev(dev);
1873 if (rc == QETH_REAL_CARD)
1874 card = dev->ml_priv;
1875 else if (rc == QETH_VLAN_CARD)
1876 card = vlan_dev_real_dev(dev)->ml_priv;
1877 if (card && card->options.layer2)
1878 card = NULL;
1879 if (card)
1880 QETH_CARD_TEXT_(card, 4, "%d", rc);
1881 return card ;
1882 }
1883
1884 static void qeth_l3_stop_card(struct qeth_card *card, int recovery_mode)
1885 {
1886 QETH_DBF_TEXT(SETUP, 2, "stopcard");
1887 QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
1888
1889 qeth_set_allowed_threads(card, 0, 1);
1890 if (card->options.sniffer &&
1891 (card->info.promisc_mode == SET_PROMISC_MODE_ON))
1892 qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
1893 if (card->read.state == CH_STATE_UP &&
1894 card->write.state == CH_STATE_UP &&
1895 (card->state == CARD_STATE_UP)) {
1896 if (recovery_mode)
1897 qeth_l3_stop(card->dev);
1898 else {
1899 rtnl_lock();
1900 dev_close(card->dev);
1901 rtnl_unlock();
1902 }
1903 card->state = CARD_STATE_SOFTSETUP;
1904 }
1905 if (card->state == CARD_STATE_SOFTSETUP) {
1906 qeth_l3_clear_ip_htable(card, 1);
1907 qeth_clear_ipacmd_list(card);
1908 card->state = CARD_STATE_HARDSETUP;
1909 }
1910 if (card->state == CARD_STATE_HARDSETUP) {
1911 qeth_qdio_clear_card(card, 0);
1912 qeth_clear_qdio_buffers(card);
1913 qeth_clear_working_pool_list(card);
1914 card->state = CARD_STATE_DOWN;
1915 }
1916 if (card->state == CARD_STATE_DOWN) {
1917 qeth_clear_cmd_buffers(&card->read);
1918 qeth_clear_cmd_buffers(&card->write);
1919 }
1920 }
1921
1922 /*
1923 * test for and Switch promiscuous mode (on or off)
1924 * either for guestlan or HiperSocket Sniffer
1925 */
1926 static void
1927 qeth_l3_handle_promisc_mode(struct qeth_card *card)
1928 {
1929 struct net_device *dev = card->dev;
1930
1931 if (((dev->flags & IFF_PROMISC) &&
1932 (card->info.promisc_mode == SET_PROMISC_MODE_ON)) ||
1933 (!(dev->flags & IFF_PROMISC) &&
1934 (card->info.promisc_mode == SET_PROMISC_MODE_OFF)))
1935 return;
1936
1937 if (card->info.guestlan) { /* Guestlan trace */
1938 if (qeth_adp_supported(card, IPA_SETADP_SET_PROMISC_MODE))
1939 qeth_setadp_promisc_mode(card);
1940 } else if (card->options.sniffer && /* HiperSockets trace */
1941 qeth_adp_supported(card, IPA_SETADP_SET_DIAG_ASSIST)) {
1942 if (dev->flags & IFF_PROMISC) {
1943 QETH_CARD_TEXT(card, 3, "+promisc");
1944 qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_ENABLE);
1945 } else {
1946 QETH_CARD_TEXT(card, 3, "-promisc");
1947 qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
1948 }
1949 }
1950 }
1951
1952 static void qeth_l3_set_multicast_list(struct net_device *dev)
1953 {
1954 struct qeth_card *card = dev->ml_priv;
1955
1956 QETH_CARD_TEXT(card, 3, "setmulti");
1957 if (qeth_threads_running(card, QETH_RECOVER_THREAD) &&
1958 (card->state != CARD_STATE_UP))
1959 return;
1960 if (!card->options.sniffer) {
1961
1962 spin_lock_bh(&card->mclock);
1963
1964 qeth_l3_mark_all_mc_to_be_deleted(card);
1965
1966 qeth_l3_add_multicast_ipv4(card);
1967 #ifdef CONFIG_QETH_IPV6
1968 qeth_l3_add_multicast_ipv6(card);
1969 #endif
1970 qeth_l3_delete_nonused_mc(card);
1971 qeth_l3_add_all_new_mc(card);
1972
1973 spin_unlock_bh(&card->mclock);
1974
1975 if (!qeth_adp_supported(card, IPA_SETADP_SET_PROMISC_MODE))
1976 return;
1977 }
1978 qeth_l3_handle_promisc_mode(card);
1979 }
1980
1981 static const char *qeth_l3_arp_get_error_cause(int *rc)
1982 {
1983 switch (*rc) {
1984 case QETH_IPA_ARP_RC_FAILED:
1985 *rc = -EIO;
1986 return "operation failed";
1987 case QETH_IPA_ARP_RC_NOTSUPP:
1988 *rc = -EOPNOTSUPP;
1989 return "operation not supported";
1990 case QETH_IPA_ARP_RC_OUT_OF_RANGE:
1991 *rc = -EINVAL;
1992 return "argument out of range";
1993 case QETH_IPA_ARP_RC_Q_NOTSUPP:
1994 *rc = -EOPNOTSUPP;
1995 return "query operation not supported";
1996 case QETH_IPA_ARP_RC_Q_NO_DATA:
1997 *rc = -ENOENT;
1998 return "no query data available";
1999 default:
2000 return "unknown error";
2001 }
2002 }
2003
2004 static int qeth_l3_arp_set_no_entries(struct qeth_card *card, int no_entries)
2005 {
2006 int tmp;
2007 int rc;
2008
2009 QETH_CARD_TEXT(card, 3, "arpstnoe");
2010
2011 /*
2012 * currently GuestLAN only supports the ARP assist function
2013 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_SET_NO_ENTRIES;
2014 * thus we say EOPNOTSUPP for this ARP function
2015 */
2016 if (card->info.guestlan)
2017 return -EOPNOTSUPP;
2018 if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2019 return -EOPNOTSUPP;
2020 }
2021 rc = qeth_send_simple_setassparms(card, IPA_ARP_PROCESSING,
2022 IPA_CMD_ASS_ARP_SET_NO_ENTRIES,
2023 no_entries);
2024 if (rc) {
2025 tmp = rc;
2026 QETH_DBF_MESSAGE(2, "Could not set number of ARP entries on "
2027 "%s: %s (0x%x/%d)\n", QETH_CARD_IFNAME(card),
2028 qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2029 }
2030 return rc;
2031 }
2032
2033 static __u32 get_arp_entry_size(struct qeth_card *card,
2034 struct qeth_arp_query_data *qdata,
2035 struct qeth_arp_entrytype *type, __u8 strip_entries)
2036 {
2037 __u32 rc;
2038 __u8 is_hsi;
2039
2040 is_hsi = qdata->reply_bits == 5;
2041 if (type->ip == QETHARP_IP_ADDR_V4) {
2042 QETH_CARD_TEXT(card, 4, "arpev4");
2043 if (strip_entries) {
2044 rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5_short) :
2045 sizeof(struct qeth_arp_qi_entry7_short);
2046 } else {
2047 rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5) :
2048 sizeof(struct qeth_arp_qi_entry7);
2049 }
2050 } else if (type->ip == QETHARP_IP_ADDR_V6) {
2051 QETH_CARD_TEXT(card, 4, "arpev6");
2052 if (strip_entries) {
2053 rc = is_hsi ?
2054 sizeof(struct qeth_arp_qi_entry5_short_ipv6) :
2055 sizeof(struct qeth_arp_qi_entry7_short_ipv6);
2056 } else {
2057 rc = is_hsi ?
2058 sizeof(struct qeth_arp_qi_entry5_ipv6) :
2059 sizeof(struct qeth_arp_qi_entry7_ipv6);
2060 }
2061 } else {
2062 QETH_CARD_TEXT(card, 4, "arpinv");
2063 rc = 0;
2064 }
2065
2066 return rc;
2067 }
2068
2069 static int arpentry_matches_prot(struct qeth_arp_entrytype *type, __u16 prot)
2070 {
2071 return (type->ip == QETHARP_IP_ADDR_V4 && prot == QETH_PROT_IPV4) ||
2072 (type->ip == QETHARP_IP_ADDR_V6 && prot == QETH_PROT_IPV6);
2073 }
2074
2075 static int qeth_l3_arp_query_cb(struct qeth_card *card,
2076 struct qeth_reply *reply, unsigned long data)
2077 {
2078 struct qeth_ipa_cmd *cmd;
2079 struct qeth_arp_query_data *qdata;
2080 struct qeth_arp_query_info *qinfo;
2081 int i;
2082 int e;
2083 int entrybytes_done;
2084 int stripped_bytes;
2085 __u8 do_strip_entries;
2086
2087 QETH_CARD_TEXT(card, 3, "arpquecb");
2088
2089 qinfo = (struct qeth_arp_query_info *) reply->param;
2090 cmd = (struct qeth_ipa_cmd *) data;
2091 QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.prot_version);
2092 if (cmd->hdr.return_code) {
2093 QETH_CARD_TEXT(card, 4, "arpcberr");
2094 QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
2095 return 0;
2096 }
2097 if (cmd->data.setassparms.hdr.return_code) {
2098 cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
2099 QETH_CARD_TEXT(card, 4, "setaperr");
2100 QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
2101 return 0;
2102 }
2103 qdata = &cmd->data.setassparms.data.query_arp;
2104 QETH_CARD_TEXT_(card, 4, "anoen%i", qdata->no_entries);
2105
2106 do_strip_entries = (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES) > 0;
2107 stripped_bytes = do_strip_entries ? QETH_QARP_MEDIASPECIFIC_BYTES : 0;
2108 entrybytes_done = 0;
2109 for (e = 0; e < qdata->no_entries; ++e) {
2110 char *cur_entry;
2111 __u32 esize;
2112 struct qeth_arp_entrytype *etype;
2113
2114 cur_entry = &qdata->data + entrybytes_done;
2115 etype = &((struct qeth_arp_qi_entry5 *) cur_entry)->type;
2116 if (!arpentry_matches_prot(etype, cmd->hdr.prot_version)) {
2117 QETH_CARD_TEXT(card, 4, "pmis");
2118 QETH_CARD_TEXT_(card, 4, "%i", etype->ip);
2119 break;
2120 }
2121 esize = get_arp_entry_size(card, qdata, etype,
2122 do_strip_entries);
2123 QETH_CARD_TEXT_(card, 5, "esz%i", esize);
2124 if (!esize)
2125 break;
2126
2127 if ((qinfo->udata_len - qinfo->udata_offset) < esize) {
2128 QETH_CARD_TEXT_(card, 4, "qaer3%i", -ENOMEM);
2129 cmd->hdr.return_code = IPA_RC_ENOMEM;
2130 goto out_error;
2131 }
2132
2133 memcpy(qinfo->udata + qinfo->udata_offset,
2134 &qdata->data + entrybytes_done + stripped_bytes,
2135 esize);
2136 entrybytes_done += esize + stripped_bytes;
2137 qinfo->udata_offset += esize;
2138 ++qinfo->no_entries;
2139 }
2140 /* check if all replies received ... */
2141 if (cmd->data.setassparms.hdr.seq_no <
2142 cmd->data.setassparms.hdr.number_of_replies)
2143 return 1;
2144 QETH_CARD_TEXT_(card, 4, "nove%i", qinfo->no_entries);
2145 memcpy(qinfo->udata, &qinfo->no_entries, 4);
2146 /* keep STRIP_ENTRIES flag so the user program can distinguish
2147 * stripped entries from normal ones */
2148 if (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES)
2149 qdata->reply_bits |= QETH_QARP_STRIP_ENTRIES;
2150 memcpy(qinfo->udata + QETH_QARP_MASK_OFFSET, &qdata->reply_bits, 2);
2151 QETH_CARD_TEXT_(card, 4, "rc%i", 0);
2152 return 0;
2153 out_error:
2154 i = 0;
2155 memcpy(qinfo->udata, &i, 4);
2156 return 0;
2157 }
2158
2159 static int qeth_l3_send_ipa_arp_cmd(struct qeth_card *card,
2160 struct qeth_cmd_buffer *iob, int len,
2161 int (*reply_cb)(struct qeth_card *, struct qeth_reply *,
2162 unsigned long),
2163 void *reply_param)
2164 {
2165 QETH_CARD_TEXT(card, 4, "sendarp");
2166
2167 memcpy(iob->data, IPA_PDU_HEADER, IPA_PDU_HEADER_SIZE);
2168 memcpy(QETH_IPA_CMD_DEST_ADDR(iob->data),
2169 &card->token.ulp_connection_r, QETH_MPC_TOKEN_LENGTH);
2170 return qeth_send_control_data(card, IPA_PDU_HEADER_SIZE + len, iob,
2171 reply_cb, reply_param);
2172 }
2173
2174 static int qeth_l3_query_arp_cache_info(struct qeth_card *card,
2175 enum qeth_prot_versions prot,
2176 struct qeth_arp_query_info *qinfo)
2177 {
2178 struct qeth_cmd_buffer *iob;
2179 struct qeth_ipa_cmd *cmd;
2180 int tmp;
2181 int rc;
2182
2183 QETH_CARD_TEXT_(card, 3, "qarpipv%i", prot);
2184
2185 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
2186 IPA_CMD_ASS_ARP_QUERY_INFO,
2187 sizeof(struct qeth_arp_query_data)
2188 - sizeof(char),
2189 prot);
2190 if (!iob)
2191 return -ENOMEM;
2192 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
2193 cmd->data.setassparms.data.query_arp.request_bits = 0x000F;
2194 cmd->data.setassparms.data.query_arp.reply_bits = 0;
2195 cmd->data.setassparms.data.query_arp.no_entries = 0;
2196 rc = qeth_l3_send_ipa_arp_cmd(card, iob,
2197 QETH_SETASS_BASE_LEN+QETH_ARP_CMD_LEN,
2198 qeth_l3_arp_query_cb, (void *)qinfo);
2199 if (rc) {
2200 tmp = rc;
2201 QETH_DBF_MESSAGE(2,
2202 "Error while querying ARP cache on %s: %s "
2203 "(0x%x/%d)\n", QETH_CARD_IFNAME(card),
2204 qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2205 }
2206
2207 return rc;
2208 }
2209
2210 static int qeth_l3_arp_query(struct qeth_card *card, char __user *udata)
2211 {
2212 struct qeth_arp_query_info qinfo = {0, };
2213 int rc;
2214
2215 QETH_CARD_TEXT(card, 3, "arpquery");
2216
2217 if (!qeth_is_supported(card,/*IPA_QUERY_ARP_ADDR_INFO*/
2218 IPA_ARP_PROCESSING)) {
2219 QETH_CARD_TEXT(card, 3, "arpqnsup");
2220 rc = -EOPNOTSUPP;
2221 goto out;
2222 }
2223 /* get size of userspace buffer and mask_bits -> 6 bytes */
2224 if (copy_from_user(&qinfo, udata, 6)) {
2225 rc = -EFAULT;
2226 goto out;
2227 }
2228 qinfo.udata = kzalloc(qinfo.udata_len, GFP_KERNEL);
2229 if (!qinfo.udata) {
2230 rc = -ENOMEM;
2231 goto out;
2232 }
2233 qinfo.udata_offset = QETH_QARP_ENTRIES_OFFSET;
2234 rc = qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV4, &qinfo);
2235 if (rc) {
2236 if (copy_to_user(udata, qinfo.udata, 4))
2237 rc = -EFAULT;
2238 goto free_and_out;
2239 }
2240 #ifdef CONFIG_QETH_IPV6
2241 if (qinfo.mask_bits & QETH_QARP_WITH_IPV6) {
2242 /* fails in case of GuestLAN QDIO mode */
2243 qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV6, &qinfo);
2244 }
2245 #endif
2246 if (copy_to_user(udata, qinfo.udata, qinfo.udata_len)) {
2247 QETH_CARD_TEXT(card, 4, "qactf");
2248 rc = -EFAULT;
2249 goto free_and_out;
2250 }
2251 QETH_CARD_TEXT(card, 4, "qacts");
2252
2253 free_and_out:
2254 kfree(qinfo.udata);
2255 out:
2256 return rc;
2257 }
2258
2259 static int qeth_l3_arp_add_entry(struct qeth_card *card,
2260 struct qeth_arp_cache_entry *entry)
2261 {
2262 struct qeth_cmd_buffer *iob;
2263 char buf[16];
2264 int tmp;
2265 int rc;
2266
2267 QETH_CARD_TEXT(card, 3, "arpadent");
2268
2269 /*
2270 * currently GuestLAN only supports the ARP assist function
2271 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_ADD_ENTRY;
2272 * thus we say EOPNOTSUPP for this ARP function
2273 */
2274 if (card->info.guestlan)
2275 return -EOPNOTSUPP;
2276 if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2277 return -EOPNOTSUPP;
2278 }
2279
2280 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
2281 IPA_CMD_ASS_ARP_ADD_ENTRY,
2282 sizeof(struct qeth_arp_cache_entry),
2283 QETH_PROT_IPV4);
2284 if (!iob)
2285 return -ENOMEM;
2286 rc = qeth_send_setassparms(card, iob,
2287 sizeof(struct qeth_arp_cache_entry),
2288 (unsigned long) entry,
2289 qeth_setassparms_cb, NULL);
2290 if (rc) {
2291 tmp = rc;
2292 qeth_l3_ipaddr4_to_string((u8 *)entry->ipaddr, buf);
2293 QETH_DBF_MESSAGE(2, "Could not add ARP entry for address %s "
2294 "on %s: %s (0x%x/%d)\n", buf, QETH_CARD_IFNAME(card),
2295 qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2296 }
2297 return rc;
2298 }
2299
2300 static int qeth_l3_arp_remove_entry(struct qeth_card *card,
2301 struct qeth_arp_cache_entry *entry)
2302 {
2303 struct qeth_cmd_buffer *iob;
2304 char buf[16] = {0, };
2305 int tmp;
2306 int rc;
2307
2308 QETH_CARD_TEXT(card, 3, "arprment");
2309
2310 /*
2311 * currently GuestLAN only supports the ARP assist function
2312 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_REMOVE_ENTRY;
2313 * thus we say EOPNOTSUPP for this ARP function
2314 */
2315 if (card->info.guestlan)
2316 return -EOPNOTSUPP;
2317 if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2318 return -EOPNOTSUPP;
2319 }
2320 memcpy(buf, entry, 12);
2321 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
2322 IPA_CMD_ASS_ARP_REMOVE_ENTRY,
2323 12,
2324 QETH_PROT_IPV4);
2325 if (!iob)
2326 return -ENOMEM;
2327 rc = qeth_send_setassparms(card, iob,
2328 12, (unsigned long)buf,
2329 qeth_setassparms_cb, NULL);
2330 if (rc) {
2331 tmp = rc;
2332 memset(buf, 0, 16);
2333 qeth_l3_ipaddr4_to_string((u8 *)entry->ipaddr, buf);
2334 QETH_DBF_MESSAGE(2, "Could not delete ARP entry for address %s"
2335 " on %s: %s (0x%x/%d)\n", buf, QETH_CARD_IFNAME(card),
2336 qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2337 }
2338 return rc;
2339 }
2340
2341 static int qeth_l3_arp_flush_cache(struct qeth_card *card)
2342 {
2343 int rc;
2344 int tmp;
2345
2346 QETH_CARD_TEXT(card, 3, "arpflush");
2347
2348 /*
2349 * currently GuestLAN only supports the ARP assist function
2350 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_FLUSH_CACHE;
2351 * thus we say EOPNOTSUPP for this ARP function
2352 */
2353 if (card->info.guestlan || (card->info.type == QETH_CARD_TYPE_IQD))
2354 return -EOPNOTSUPP;
2355 if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2356 return -EOPNOTSUPP;
2357 }
2358 rc = qeth_send_simple_setassparms(card, IPA_ARP_PROCESSING,
2359 IPA_CMD_ASS_ARP_FLUSH_CACHE, 0);
2360 if (rc) {
2361 tmp = rc;
2362 QETH_DBF_MESSAGE(2, "Could not flush ARP cache on %s: %s "
2363 "(0x%x/%d)\n", QETH_CARD_IFNAME(card),
2364 qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2365 }
2366 return rc;
2367 }
2368
2369 static int qeth_l3_do_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
2370 {
2371 struct qeth_card *card = dev->ml_priv;
2372 struct qeth_arp_cache_entry arp_entry;
2373 int rc = 0;
2374
2375 switch (cmd) {
2376 case SIOC_QETH_ARP_SET_NO_ENTRIES:
2377 if (!capable(CAP_NET_ADMIN)) {
2378 rc = -EPERM;
2379 break;
2380 }
2381 rc = qeth_l3_arp_set_no_entries(card, rq->ifr_ifru.ifru_ivalue);
2382 break;
2383 case SIOC_QETH_ARP_QUERY_INFO:
2384 if (!capable(CAP_NET_ADMIN)) {
2385 rc = -EPERM;
2386 break;
2387 }
2388 rc = qeth_l3_arp_query(card, rq->ifr_ifru.ifru_data);
2389 break;
2390 case SIOC_QETH_ARP_ADD_ENTRY:
2391 if (!capable(CAP_NET_ADMIN)) {
2392 rc = -EPERM;
2393 break;
2394 }
2395 if (copy_from_user(&arp_entry, rq->ifr_ifru.ifru_data,
2396 sizeof(struct qeth_arp_cache_entry)))
2397 rc = -EFAULT;
2398 else
2399 rc = qeth_l3_arp_add_entry(card, &arp_entry);
2400 break;
2401 case SIOC_QETH_ARP_REMOVE_ENTRY:
2402 if (!capable(CAP_NET_ADMIN)) {
2403 rc = -EPERM;
2404 break;
2405 }
2406 if (copy_from_user(&arp_entry, rq->ifr_ifru.ifru_data,
2407 sizeof(struct qeth_arp_cache_entry)))
2408 rc = -EFAULT;
2409 else
2410 rc = qeth_l3_arp_remove_entry(card, &arp_entry);
2411 break;
2412 case SIOC_QETH_ARP_FLUSH_CACHE:
2413 if (!capable(CAP_NET_ADMIN)) {
2414 rc = -EPERM;
2415 break;
2416 }
2417 rc = qeth_l3_arp_flush_cache(card);
2418 break;
2419 default:
2420 rc = -EOPNOTSUPP;
2421 }
2422 return rc;
2423 }
2424
2425 static int qeth_l3_get_cast_type(struct qeth_card *card, struct sk_buff *skb)
2426 {
2427 int cast_type = RTN_UNSPEC;
2428 struct neighbour *n = NULL;
2429 struct dst_entry *dst;
2430
2431 rcu_read_lock();
2432 dst = skb_dst(skb);
2433 if (dst)
2434 n = dst_neigh_lookup_skb(dst, skb);
2435 if (n) {
2436 cast_type = n->type;
2437 rcu_read_unlock();
2438 neigh_release(n);
2439 if ((cast_type == RTN_BROADCAST) ||
2440 (cast_type == RTN_MULTICAST) ||
2441 (cast_type == RTN_ANYCAST))
2442 return cast_type;
2443 else
2444 return RTN_UNSPEC;
2445 }
2446 rcu_read_unlock();
2447
2448 /* try something else */
2449 if (be16_to_cpu(skb->protocol) == ETH_P_IPV6)
2450 return (skb_network_header(skb)[24] == 0xff) ?
2451 RTN_MULTICAST : 0;
2452 else if (be16_to_cpu(skb->protocol) == ETH_P_IP)
2453 return ((skb_network_header(skb)[16] & 0xf0) == 0xe0) ?
2454 RTN_MULTICAST : 0;
2455 /* ... */
2456 if (!memcmp(skb->data, skb->dev->broadcast, 6))
2457 return RTN_BROADCAST;
2458 else {
2459 u16 hdr_mac;
2460
2461 hdr_mac = *((u16 *)skb->data);
2462 /* tr multicast? */
2463 switch (card->info.link_type) {
2464 case QETH_LINK_TYPE_HSTR:
2465 case QETH_LINK_TYPE_LANE_TR:
2466 if ((hdr_mac == QETH_TR_MAC_NC) ||
2467 (hdr_mac == QETH_TR_MAC_C))
2468 return RTN_MULTICAST;
2469 break;
2470 /* eth or so multicast? */
2471 default:
2472 if ((hdr_mac == QETH_ETH_MAC_V4) ||
2473 (hdr_mac == QETH_ETH_MAC_V6))
2474 return RTN_MULTICAST;
2475 }
2476 }
2477 return cast_type;
2478 }
2479
2480 static void qeth_l3_fill_af_iucv_hdr(struct qeth_card *card,
2481 struct qeth_hdr *hdr, struct sk_buff *skb)
2482 {
2483 char daddr[16];
2484 struct af_iucv_trans_hdr *iucv_hdr;
2485
2486 memset(hdr, 0, sizeof(struct qeth_hdr));
2487 hdr->hdr.l3.id = QETH_HEADER_TYPE_LAYER3;
2488 hdr->hdr.l3.ext_flags = 0;
2489 hdr->hdr.l3.length = skb->len - ETH_HLEN;
2490 hdr->hdr.l3.flags = QETH_HDR_IPV6 | QETH_CAST_UNICAST;
2491
2492 iucv_hdr = (struct af_iucv_trans_hdr *) (skb->data + ETH_HLEN);
2493 memset(daddr, 0, sizeof(daddr));
2494 daddr[0] = 0xfe;
2495 daddr[1] = 0x80;
2496 memcpy(&daddr[8], iucv_hdr->destUserID, 8);
2497 memcpy(hdr->hdr.l3.dest_addr, daddr, 16);
2498 }
2499
2500 static void qeth_l3_fill_header(struct qeth_card *card, struct qeth_hdr *hdr,
2501 struct sk_buff *skb, int ipv, int cast_type)
2502 {
2503 struct dst_entry *dst;
2504
2505 memset(hdr, 0, sizeof(struct qeth_hdr));
2506 hdr->hdr.l3.id = QETH_HEADER_TYPE_LAYER3;
2507 hdr->hdr.l3.ext_flags = 0;
2508
2509 /*
2510 * before we're going to overwrite this location with next hop ip.
2511 * v6 uses passthrough, v4 sets the tag in the QDIO header.
2512 */
2513 if (skb_vlan_tag_present(skb)) {
2514 if ((ipv == 4) || (card->info.type == QETH_CARD_TYPE_IQD))
2515 hdr->hdr.l3.ext_flags = QETH_HDR_EXT_VLAN_FRAME;
2516 else
2517 hdr->hdr.l3.ext_flags = QETH_HDR_EXT_INCLUDE_VLAN_TAG;
2518 hdr->hdr.l3.vlan_id = skb_vlan_tag_get(skb);
2519 }
2520
2521 hdr->hdr.l3.length = skb->len - sizeof(struct qeth_hdr);
2522
2523 rcu_read_lock();
2524 dst = skb_dst(skb);
2525 if (ipv == 4) {
2526 struct rtable *rt = (struct rtable *) dst;
2527 __be32 *pkey = &ip_hdr(skb)->daddr;
2528
2529 if (rt && rt->rt_gateway)
2530 pkey = &rt->rt_gateway;
2531
2532 /* IPv4 */
2533 hdr->hdr.l3.flags = qeth_l3_get_qeth_hdr_flags4(cast_type);
2534 memset(hdr->hdr.l3.dest_addr, 0, 12);
2535 *((__be32 *) (&hdr->hdr.l3.dest_addr[12])) = *pkey;
2536 } else if (ipv == 6) {
2537 struct rt6_info *rt = (struct rt6_info *) dst;
2538 struct in6_addr *pkey = &ipv6_hdr(skb)->daddr;
2539
2540 if (rt && !ipv6_addr_any(&rt->rt6i_gateway))
2541 pkey = &rt->rt6i_gateway;
2542
2543 /* IPv6 */
2544 hdr->hdr.l3.flags = qeth_l3_get_qeth_hdr_flags6(cast_type);
2545 if (card->info.type == QETH_CARD_TYPE_IQD)
2546 hdr->hdr.l3.flags &= ~QETH_HDR_PASSTHRU;
2547 memcpy(hdr->hdr.l3.dest_addr, pkey, 16);
2548 } else {
2549 if (!memcmp(skb->data + sizeof(struct qeth_hdr),
2550 skb->dev->broadcast, 6)) {
2551 /* broadcast? */
2552 hdr->hdr.l3.flags = QETH_CAST_BROADCAST |
2553 QETH_HDR_PASSTHRU;
2554 } else {
2555 hdr->hdr.l3.flags = (cast_type == RTN_MULTICAST) ?
2556 QETH_CAST_MULTICAST | QETH_HDR_PASSTHRU :
2557 QETH_CAST_UNICAST | QETH_HDR_PASSTHRU;
2558 }
2559 }
2560 rcu_read_unlock();
2561 }
2562
2563 static void qeth_l3_hdr_csum(struct qeth_card *card, struct qeth_hdr *hdr,
2564 struct sk_buff *skb)
2565 {
2566 struct iphdr *iph = ip_hdr(skb);
2567
2568 /* tcph->check contains already the pseudo hdr checksum
2569 * so just set the header flags
2570 */
2571 if (iph->protocol == IPPROTO_UDP)
2572 hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_UDP;
2573 hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_CSUM_TRANSP_REQ |
2574 QETH_HDR_EXT_CSUM_HDR_REQ;
2575 iph->check = 0;
2576 if (card->options.performance_stats)
2577 card->perf_stats.tx_csum++;
2578 }
2579
2580 static void qeth_tso_fill_header(struct qeth_card *card,
2581 struct qeth_hdr *qhdr, struct sk_buff *skb)
2582 {
2583 struct qeth_hdr_tso *hdr = (struct qeth_hdr_tso *)qhdr;
2584 struct tcphdr *tcph = tcp_hdr(skb);
2585 struct iphdr *iph = ip_hdr(skb);
2586 struct ipv6hdr *ip6h = ipv6_hdr(skb);
2587
2588 /*fix header to TSO values ...*/
2589 hdr->hdr.hdr.l3.id = QETH_HEADER_TYPE_TSO;
2590 hdr->hdr.hdr.l3.length = skb->len - sizeof(struct qeth_hdr_tso);
2591 /*set values which are fix for the first approach ...*/
2592 hdr->ext.hdr_tot_len = (__u16) sizeof(struct qeth_hdr_ext_tso);
2593 hdr->ext.imb_hdr_no = 1;
2594 hdr->ext.hdr_type = 1;
2595 hdr->ext.hdr_version = 1;
2596 hdr->ext.hdr_len = 28;
2597 /*insert non-fix values */
2598 hdr->ext.mss = skb_shinfo(skb)->gso_size;
2599 hdr->ext.dg_hdr_len = (__u16)(ip_hdrlen(skb) + tcp_hdrlen(skb));
2600 hdr->ext.payload_len = (__u16)(skb->len - hdr->ext.dg_hdr_len -
2601 sizeof(struct qeth_hdr_tso));
2602 tcph->check = 0;
2603 if (be16_to_cpu(skb->protocol) == ETH_P_IPV6) {
2604 ip6h->payload_len = 0;
2605 tcph->check = ~csum_ipv6_magic(&ip6h->saddr, &ip6h->daddr,
2606 0, IPPROTO_TCP, 0);
2607 } else {
2608 /*OSA want us to set these values ...*/
2609 tcph->check = ~csum_tcpudp_magic(iph->saddr, iph->daddr,
2610 0, IPPROTO_TCP, 0);
2611 iph->tot_len = 0;
2612 iph->check = 0;
2613 }
2614 }
2615
2616 /**
2617 * qeth_l3_get_elements_no_tso() - find number of SBALEs for skb data for tso
2618 * @card: qeth card structure, to check max. elems.
2619 * @skb: SKB address
2620 * @extra_elems: extra elems needed, to check against max.
2621 *
2622 * Returns the number of pages, and thus QDIO buffer elements, needed to cover
2623 * skb data, including linear part and fragments, but excluding TCP header.
2624 * (Exclusion of TCP header distinguishes it from qeth_get_elements_no().)
2625 * Checks if the result plus extra_elems fits under the limit for the card.
2626 * Returns 0 if it does not.
2627 * Note: extra_elems is not included in the returned result.
2628 */
2629 static int qeth_l3_get_elements_no_tso(struct qeth_card *card,
2630 struct sk_buff *skb, int extra_elems)
2631 {
2632 addr_t tcpdptr = (addr_t)tcp_hdr(skb) + tcp_hdrlen(skb);
2633 int elements = qeth_get_elements_for_range(
2634 tcpdptr,
2635 (addr_t)skb->data + skb_headlen(skb)) +
2636 qeth_get_elements_for_frags(skb);
2637
2638 if ((elements + extra_elems) > QETH_MAX_BUFFER_ELEMENTS(card)) {
2639 QETH_DBF_MESSAGE(2,
2640 "Invalid size of TSO IP packet (Number=%d / Length=%d). Discarded.\n",
2641 elements + extra_elems, skb->len);
2642 return 0;
2643 }
2644 return elements;
2645 }
2646
2647 static netdev_tx_t qeth_l3_hard_start_xmit(struct sk_buff *skb,
2648 struct net_device *dev)
2649 {
2650 int rc;
2651 __be16 *tag;
2652 struct qeth_hdr *hdr = NULL;
2653 int hdr_elements = 0;
2654 int elements;
2655 struct qeth_card *card = dev->ml_priv;
2656 struct sk_buff *new_skb = NULL;
2657 int ipv = qeth_get_ip_version(skb);
2658 int cast_type = qeth_l3_get_cast_type(card, skb);
2659 struct qeth_qdio_out_q *queue =
2660 card->qdio.out_qs[card->qdio.do_prio_queueing
2661 || (cast_type && card->info.is_multicast_different) ?
2662 qeth_get_priority_queue(card, skb, ipv, cast_type) :
2663 card->qdio.default_out_queue];
2664 int tx_bytes = skb->len;
2665 unsigned int hd_len = 0;
2666 bool use_tso;
2667 int data_offset = -1;
2668 unsigned int nr_frags;
2669
2670 if (((card->info.type == QETH_CARD_TYPE_IQD) &&
2671 (((card->options.cq != QETH_CQ_ENABLED) && !ipv) ||
2672 ((card->options.cq == QETH_CQ_ENABLED) &&
2673 (be16_to_cpu(skb->protocol) != ETH_P_AF_IUCV)))) ||
2674 card->options.sniffer)
2675 goto tx_drop;
2676
2677 if ((card->state != CARD_STATE_UP) || !card->lan_online) {
2678 card->stats.tx_carrier_errors++;
2679 goto tx_drop;
2680 }
2681
2682 if ((cast_type == RTN_BROADCAST) &&
2683 (card->info.broadcast_capable == 0))
2684 goto tx_drop;
2685
2686 if (card->options.performance_stats) {
2687 card->perf_stats.outbound_cnt++;
2688 card->perf_stats.outbound_start_time = qeth_get_micros();
2689 }
2690
2691 /* Ignore segment size from skb_is_gso(), 1 page is always used. */
2692 use_tso = skb_is_gso(skb) &&
2693 (skb_shinfo(skb)->gso_type & SKB_GSO_TCPV4);
2694
2695 if (card->info.type == QETH_CARD_TYPE_IQD) {
2696 new_skb = skb;
2697 data_offset = ETH_HLEN;
2698 hd_len = sizeof(*hdr);
2699 hdr = kmem_cache_alloc(qeth_core_header_cache, GFP_ATOMIC);
2700 if (!hdr)
2701 goto tx_drop;
2702 hdr_elements++;
2703 } else {
2704 /* create a clone with writeable headroom */
2705 new_skb = skb_realloc_headroom(skb, sizeof(struct qeth_hdr_tso)
2706 + VLAN_HLEN);
2707 if (!new_skb)
2708 goto tx_drop;
2709
2710 if (ipv == 4) {
2711 skb_pull(new_skb, ETH_HLEN);
2712 }
2713
2714 if (ipv != 4 && skb_vlan_tag_present(new_skb)) {
2715 skb_push(new_skb, VLAN_HLEN);
2716 skb_copy_to_linear_data(new_skb, new_skb->data + 4, 4);
2717 skb_copy_to_linear_data_offset(new_skb, 4,
2718 new_skb->data + 8, 4);
2719 skb_copy_to_linear_data_offset(new_skb, 8,
2720 new_skb->data + 12, 4);
2721 tag = (__be16 *)(new_skb->data + 12);
2722 *tag = cpu_to_be16(ETH_P_8021Q);
2723 *(tag + 1) = cpu_to_be16(skb_vlan_tag_get(new_skb));
2724 }
2725 }
2726
2727 netif_stop_queue(dev);
2728
2729 /* fix hardware limitation: as long as we do not have sbal
2730 * chaining we can not send long frag lists
2731 */
2732 if ((card->info.type != QETH_CARD_TYPE_IQD) &&
2733 ((use_tso && !qeth_l3_get_elements_no_tso(card, new_skb, 1)) ||
2734 (!use_tso && !qeth_get_elements_no(card, new_skb, 0, 0)))) {
2735 int lin_rc = skb_linearize(new_skb);
2736
2737 if (card->options.performance_stats) {
2738 if (lin_rc)
2739 card->perf_stats.tx_linfail++;
2740 else
2741 card->perf_stats.tx_lin++;
2742 }
2743 if (lin_rc)
2744 goto tx_drop;
2745 }
2746 nr_frags = skb_shinfo(new_skb)->nr_frags;
2747
2748 if (use_tso) {
2749 hdr = skb_push(new_skb, sizeof(struct qeth_hdr_tso));
2750 memset(hdr, 0, sizeof(struct qeth_hdr_tso));
2751 qeth_l3_fill_header(card, hdr, new_skb, ipv, cast_type);
2752 qeth_tso_fill_header(card, hdr, new_skb);
2753 hdr_elements++;
2754 } else {
2755 if (data_offset < 0) {
2756 hdr = skb_push(new_skb, sizeof(struct qeth_hdr));
2757 qeth_l3_fill_header(card, hdr, new_skb, ipv,
2758 cast_type);
2759 } else {
2760 if (be16_to_cpu(new_skb->protocol) == ETH_P_AF_IUCV)
2761 qeth_l3_fill_af_iucv_hdr(card, hdr, new_skb);
2762 else {
2763 qeth_l3_fill_header(card, hdr, new_skb, ipv,
2764 cast_type);
2765 hdr->hdr.l3.length = new_skb->len - data_offset;
2766 }
2767 }
2768
2769 if (skb->ip_summed == CHECKSUM_PARTIAL)
2770 qeth_l3_hdr_csum(card, hdr, new_skb);
2771 }
2772
2773 elements = use_tso ?
2774 qeth_l3_get_elements_no_tso(card, new_skb, hdr_elements) :
2775 qeth_get_elements_no(card, new_skb, hdr_elements,
2776 (data_offset > 0) ? data_offset : 0);
2777 if (!elements) {
2778 if (data_offset >= 0)
2779 kmem_cache_free(qeth_core_header_cache, hdr);
2780 goto tx_drop;
2781 }
2782 elements += hdr_elements;
2783
2784 if (card->info.type != QETH_CARD_TYPE_IQD) {
2785 int len;
2786 if (use_tso) {
2787 hd_len = sizeof(struct qeth_hdr_tso) +
2788 ip_hdrlen(new_skb) + tcp_hdrlen(new_skb);
2789 len = hd_len;
2790 } else {
2791 len = sizeof(struct qeth_hdr_layer3);
2792 }
2793
2794 if (qeth_hdr_chk_and_bounce(new_skb, &hdr, len))
2795 goto tx_drop;
2796 rc = qeth_do_send_packet(card, queue, new_skb, hdr, hd_len,
2797 hd_len, elements);
2798 } else
2799 rc = qeth_do_send_packet_fast(queue, new_skb, hdr, data_offset,
2800 hd_len);
2801
2802 if (!rc) {
2803 card->stats.tx_packets++;
2804 card->stats.tx_bytes += tx_bytes;
2805 if (new_skb != skb)
2806 dev_kfree_skb_any(skb);
2807 if (card->options.performance_stats) {
2808 if (use_tso) {
2809 card->perf_stats.large_send_bytes += tx_bytes;
2810 card->perf_stats.large_send_cnt++;
2811 }
2812 if (nr_frags) {
2813 card->perf_stats.sg_skbs_sent++;
2814 /* nr_frags + skb->data */
2815 card->perf_stats.sg_frags_sent += nr_frags + 1;
2816 }
2817 }
2818 rc = NETDEV_TX_OK;
2819 } else {
2820 if (data_offset >= 0)
2821 kmem_cache_free(qeth_core_header_cache, hdr);
2822
2823 if (rc == -EBUSY) {
2824 if (new_skb != skb)
2825 dev_kfree_skb_any(new_skb);
2826 return NETDEV_TX_BUSY;
2827 } else
2828 goto tx_drop;
2829 }
2830
2831 netif_wake_queue(dev);
2832 if (card->options.performance_stats)
2833 card->perf_stats.outbound_time += qeth_get_micros() -
2834 card->perf_stats.outbound_start_time;
2835 return rc;
2836
2837 tx_drop:
2838 card->stats.tx_dropped++;
2839 card->stats.tx_errors++;
2840 if ((new_skb != skb) && new_skb)
2841 dev_kfree_skb_any(new_skb);
2842 dev_kfree_skb_any(skb);
2843 netif_wake_queue(dev);
2844 return NETDEV_TX_OK;
2845 }
2846
2847 static int __qeth_l3_open(struct net_device *dev)
2848 {
2849 struct qeth_card *card = dev->ml_priv;
2850 int rc = 0;
2851
2852 QETH_CARD_TEXT(card, 4, "qethopen");
2853 if (card->state == CARD_STATE_UP)
2854 return rc;
2855 if (card->state != CARD_STATE_SOFTSETUP)
2856 return -ENODEV;
2857 card->data.state = CH_STATE_UP;
2858 card->state = CARD_STATE_UP;
2859 netif_start_queue(dev);
2860
2861 if (qdio_stop_irq(card->data.ccwdev, 0) >= 0) {
2862 napi_enable(&card->napi);
2863 napi_schedule(&card->napi);
2864 } else
2865 rc = -EIO;
2866 return rc;
2867 }
2868
2869 static int qeth_l3_open(struct net_device *dev)
2870 {
2871 struct qeth_card *card = dev->ml_priv;
2872
2873 QETH_CARD_TEXT(card, 5, "qethope_");
2874 if (qeth_wait_for_threads(card, QETH_RECOVER_THREAD)) {
2875 QETH_CARD_TEXT(card, 3, "openREC");
2876 return -ERESTARTSYS;
2877 }
2878 return __qeth_l3_open(dev);
2879 }
2880
2881 static int qeth_l3_stop(struct net_device *dev)
2882 {
2883 struct qeth_card *card = dev->ml_priv;
2884
2885 QETH_CARD_TEXT(card, 4, "qethstop");
2886 netif_tx_disable(dev);
2887 if (card->state == CARD_STATE_UP) {
2888 card->state = CARD_STATE_SOFTSETUP;
2889 napi_disable(&card->napi);
2890 }
2891 return 0;
2892 }
2893
2894 static const struct ethtool_ops qeth_l3_ethtool_ops = {
2895 .get_link = ethtool_op_get_link,
2896 .get_strings = qeth_core_get_strings,
2897 .get_ethtool_stats = qeth_core_get_ethtool_stats,
2898 .get_sset_count = qeth_core_get_sset_count,
2899 .get_drvinfo = qeth_core_get_drvinfo,
2900 .get_link_ksettings = qeth_core_ethtool_get_link_ksettings,
2901 };
2902
2903 /*
2904 * we need NOARP for IPv4 but we want neighbor solicitation for IPv6. Setting
2905 * NOARP on the netdevice is no option because it also turns off neighbor
2906 * solicitation. For IPv4 we install a neighbor_setup function. We don't want
2907 * arp resolution but we want the hard header (packet socket will work
2908 * e.g. tcpdump)
2909 */
2910 static int qeth_l3_neigh_setup_noarp(struct neighbour *n)
2911 {
2912 n->nud_state = NUD_NOARP;
2913 memcpy(n->ha, "FAKELL", 6);
2914 n->output = n->ops->connected_output;
2915 return 0;
2916 }
2917
2918 static int
2919 qeth_l3_neigh_setup(struct net_device *dev, struct neigh_parms *np)
2920 {
2921 if (np->tbl->family == AF_INET)
2922 np->neigh_setup = qeth_l3_neigh_setup_noarp;
2923
2924 return 0;
2925 }
2926
2927 static const struct net_device_ops qeth_l3_netdev_ops = {
2928 .ndo_open = qeth_l3_open,
2929 .ndo_stop = qeth_l3_stop,
2930 .ndo_get_stats = qeth_get_stats,
2931 .ndo_start_xmit = qeth_l3_hard_start_xmit,
2932 .ndo_validate_addr = eth_validate_addr,
2933 .ndo_set_rx_mode = qeth_l3_set_multicast_list,
2934 .ndo_do_ioctl = qeth_do_ioctl,
2935 .ndo_change_mtu = qeth_change_mtu,
2936 .ndo_fix_features = qeth_fix_features,
2937 .ndo_set_features = qeth_set_features,
2938 .ndo_vlan_rx_add_vid = qeth_l3_vlan_rx_add_vid,
2939 .ndo_vlan_rx_kill_vid = qeth_l3_vlan_rx_kill_vid,
2940 .ndo_tx_timeout = qeth_tx_timeout,
2941 };
2942
2943 static const struct net_device_ops qeth_l3_osa_netdev_ops = {
2944 .ndo_open = qeth_l3_open,
2945 .ndo_stop = qeth_l3_stop,
2946 .ndo_get_stats = qeth_get_stats,
2947 .ndo_start_xmit = qeth_l3_hard_start_xmit,
2948 .ndo_features_check = qeth_features_check,
2949 .ndo_validate_addr = eth_validate_addr,
2950 .ndo_set_rx_mode = qeth_l3_set_multicast_list,
2951 .ndo_do_ioctl = qeth_do_ioctl,
2952 .ndo_change_mtu = qeth_change_mtu,
2953 .ndo_fix_features = qeth_fix_features,
2954 .ndo_set_features = qeth_set_features,
2955 .ndo_vlan_rx_add_vid = qeth_l3_vlan_rx_add_vid,
2956 .ndo_vlan_rx_kill_vid = qeth_l3_vlan_rx_kill_vid,
2957 .ndo_tx_timeout = qeth_tx_timeout,
2958 .ndo_neigh_setup = qeth_l3_neigh_setup,
2959 };
2960
2961 static int qeth_l3_setup_netdev(struct qeth_card *card)
2962 {
2963 int rc;
2964
2965 if (card->info.type == QETH_CARD_TYPE_OSD ||
2966 card->info.type == QETH_CARD_TYPE_OSX) {
2967 if ((card->info.link_type == QETH_LINK_TYPE_LANE_TR) ||
2968 (card->info.link_type == QETH_LINK_TYPE_HSTR)) {
2969 pr_info("qeth_l3: ignoring TR device\n");
2970 return -ENODEV;
2971 } else {
2972 card->dev = alloc_etherdev(0);
2973 if (!card->dev)
2974 return -ENODEV;
2975 card->dev->netdev_ops = &qeth_l3_osa_netdev_ops;
2976
2977 /*IPv6 address autoconfiguration stuff*/
2978 qeth_l3_get_unique_id(card);
2979 if (!(card->info.unique_id & UNIQUE_ID_NOT_BY_CARD))
2980 card->dev->dev_id = card->info.unique_id &
2981 0xffff;
2982 if (!card->info.guestlan) {
2983 card->dev->hw_features = NETIF_F_SG |
2984 NETIF_F_RXCSUM | NETIF_F_IP_CSUM |
2985 NETIF_F_TSO;
2986 card->dev->vlan_features = NETIF_F_SG |
2987 NETIF_F_RXCSUM | NETIF_F_IP_CSUM |
2988 NETIF_F_TSO;
2989 card->dev->features |= NETIF_F_SG;
2990 }
2991 }
2992 } else if (card->info.type == QETH_CARD_TYPE_IQD) {
2993 card->dev = alloc_netdev(0, "hsi%d", NET_NAME_UNKNOWN,
2994 ether_setup);
2995 if (!card->dev)
2996 return -ENODEV;
2997 card->dev->flags |= IFF_NOARP;
2998 card->dev->netdev_ops = &qeth_l3_netdev_ops;
2999 rc = qeth_l3_iqd_read_initial_mac(card);
3000 if (rc)
3001 return rc;
3002 if (card->options.hsuid[0])
3003 memcpy(card->dev->perm_addr, card->options.hsuid, 9);
3004 } else
3005 return -ENODEV;
3006
3007 card->dev->ml_priv = card;
3008 card->dev->watchdog_timeo = QETH_TX_TIMEOUT;
3009 card->dev->mtu = card->info.initial_mtu;
3010 card->dev->min_mtu = 64;
3011 card->dev->max_mtu = ETH_MAX_MTU;
3012 card->dev->ethtool_ops = &qeth_l3_ethtool_ops;
3013 card->dev->features |= NETIF_F_HW_VLAN_CTAG_TX |
3014 NETIF_F_HW_VLAN_CTAG_RX |
3015 NETIF_F_HW_VLAN_CTAG_FILTER;
3016 netif_keep_dst(card->dev);
3017 netif_set_gso_max_size(card->dev, (QETH_MAX_BUFFER_ELEMENTS(card) - 1) *
3018 PAGE_SIZE);
3019
3020 SET_NETDEV_DEV(card->dev, &card->gdev->dev);
3021 netif_napi_add(card->dev, &card->napi, qeth_poll, QETH_NAPI_WEIGHT);
3022 netif_carrier_off(card->dev);
3023 return register_netdev(card->dev);
3024 }
3025
3026 static const struct device_type qeth_l3_devtype = {
3027 .name = "qeth_layer3",
3028 .groups = qeth_l3_attr_groups,
3029 };
3030
3031 static int qeth_l3_probe_device(struct ccwgroup_device *gdev)
3032 {
3033 struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3034 int rc;
3035
3036 if (gdev->dev.type == &qeth_generic_devtype) {
3037 rc = qeth_l3_create_device_attributes(&gdev->dev);
3038 if (rc)
3039 return rc;
3040 }
3041 hash_init(card->ip_htable);
3042 hash_init(card->ip_mc_htable);
3043 card->options.layer2 = 0;
3044 card->info.hwtrap = 0;
3045 return 0;
3046 }
3047
3048 static void qeth_l3_remove_device(struct ccwgroup_device *cgdev)
3049 {
3050 struct qeth_card *card = dev_get_drvdata(&cgdev->dev);
3051
3052 if (cgdev->dev.type == &qeth_generic_devtype)
3053 qeth_l3_remove_device_attributes(&cgdev->dev);
3054
3055 qeth_set_allowed_threads(card, 0, 1);
3056 wait_event(card->wait_q, qeth_threads_running(card, 0xffffffff) == 0);
3057
3058 if (cgdev->state == CCWGROUP_ONLINE)
3059 qeth_l3_set_offline(cgdev);
3060
3061 if (card->dev) {
3062 netif_napi_del(&card->napi);
3063 unregister_netdev(card->dev);
3064 card->dev = NULL;
3065 }
3066
3067 qeth_l3_clear_ip_htable(card, 0);
3068 qeth_l3_clear_ipato_list(card);
3069 return;
3070 }
3071
3072 static int __qeth_l3_set_online(struct ccwgroup_device *gdev, int recovery_mode)
3073 {
3074 struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3075 int rc = 0;
3076 enum qeth_card_states recover_flag;
3077
3078 mutex_lock(&card->discipline_mutex);
3079 mutex_lock(&card->conf_mutex);
3080 QETH_DBF_TEXT(SETUP, 2, "setonlin");
3081 QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
3082
3083 recover_flag = card->state;
3084 rc = qeth_core_hardsetup_card(card);
3085 if (rc) {
3086 QETH_DBF_TEXT_(SETUP, 2, "2err%04x", rc);
3087 rc = -ENODEV;
3088 goto out_remove;
3089 }
3090
3091 if (!card->dev && qeth_l3_setup_netdev(card)) {
3092 rc = -ENODEV;
3093 goto out_remove;
3094 }
3095
3096 if (qeth_is_diagass_supported(card, QETH_DIAGS_CMD_TRAP)) {
3097 if (card->info.hwtrap &&
3098 qeth_hw_trap(card, QETH_DIAGS_TRAP_ARM))
3099 card->info.hwtrap = 0;
3100 } else
3101 card->info.hwtrap = 0;
3102
3103 card->state = CARD_STATE_HARDSETUP;
3104 memset(&card->rx, 0, sizeof(struct qeth_rx));
3105 qeth_print_status_message(card);
3106
3107 /* softsetup */
3108 QETH_DBF_TEXT(SETUP, 2, "softsetp");
3109
3110 rc = qeth_l3_setadapter_parms(card);
3111 if (rc)
3112 QETH_DBF_TEXT_(SETUP, 2, "2err%04x", rc);
3113 if (!card->options.sniffer) {
3114 rc = qeth_l3_start_ipassists(card);
3115 if (rc) {
3116 QETH_DBF_TEXT_(SETUP, 2, "3err%d", rc);
3117 goto out_remove;
3118 }
3119 rc = qeth_l3_setrouting_v4(card);
3120 if (rc)
3121 QETH_DBF_TEXT_(SETUP, 2, "4err%04x", rc);
3122 rc = qeth_l3_setrouting_v6(card);
3123 if (rc)
3124 QETH_DBF_TEXT_(SETUP, 2, "5err%04x", rc);
3125 }
3126 netif_tx_disable(card->dev);
3127
3128 rc = qeth_init_qdio_queues(card);
3129 if (rc) {
3130 QETH_DBF_TEXT_(SETUP, 2, "6err%d", rc);
3131 rc = -ENODEV;
3132 goto out_remove;
3133 }
3134 card->state = CARD_STATE_SOFTSETUP;
3135
3136 qeth_set_allowed_threads(card, 0xffffffff, 0);
3137 qeth_l3_recover_ip(card);
3138 if (card->lan_online)
3139 netif_carrier_on(card->dev);
3140 else
3141 netif_carrier_off(card->dev);
3142 if (recover_flag == CARD_STATE_RECOVER) {
3143 rtnl_lock();
3144 if (recovery_mode)
3145 __qeth_l3_open(card->dev);
3146 else
3147 dev_open(card->dev);
3148 qeth_l3_set_multicast_list(card->dev);
3149 qeth_recover_features(card->dev);
3150 rtnl_unlock();
3151 }
3152 qeth_trace_features(card);
3153 /* let user_space know that device is online */
3154 kobject_uevent(&gdev->dev.kobj, KOBJ_CHANGE);
3155 mutex_unlock(&card->conf_mutex);
3156 mutex_unlock(&card->discipline_mutex);
3157 return 0;
3158 out_remove:
3159 qeth_l3_stop_card(card, 0);
3160 ccw_device_set_offline(CARD_DDEV(card));
3161 ccw_device_set_offline(CARD_WDEV(card));
3162 ccw_device_set_offline(CARD_RDEV(card));
3163 qdio_free(CARD_DDEV(card));
3164 if (recover_flag == CARD_STATE_RECOVER)
3165 card->state = CARD_STATE_RECOVER;
3166 else
3167 card->state = CARD_STATE_DOWN;
3168 mutex_unlock(&card->conf_mutex);
3169 mutex_unlock(&card->discipline_mutex);
3170 return rc;
3171 }
3172
3173 static int qeth_l3_set_online(struct ccwgroup_device *gdev)
3174 {
3175 return __qeth_l3_set_online(gdev, 0);
3176 }
3177
3178 static int __qeth_l3_set_offline(struct ccwgroup_device *cgdev,
3179 int recovery_mode)
3180 {
3181 struct qeth_card *card = dev_get_drvdata(&cgdev->dev);
3182 int rc = 0, rc2 = 0, rc3 = 0;
3183 enum qeth_card_states recover_flag;
3184
3185 mutex_lock(&card->discipline_mutex);
3186 mutex_lock(&card->conf_mutex);
3187 QETH_DBF_TEXT(SETUP, 3, "setoffl");
3188 QETH_DBF_HEX(SETUP, 3, &card, sizeof(void *));
3189
3190 if (card->dev && netif_carrier_ok(card->dev))
3191 netif_carrier_off(card->dev);
3192 recover_flag = card->state;
3193 if ((!recovery_mode && card->info.hwtrap) || card->info.hwtrap == 2) {
3194 qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
3195 card->info.hwtrap = 1;
3196 }
3197 qeth_l3_stop_card(card, recovery_mode);
3198 if ((card->options.cq == QETH_CQ_ENABLED) && card->dev) {
3199 rtnl_lock();
3200 call_netdevice_notifiers(NETDEV_REBOOT, card->dev);
3201 rtnl_unlock();
3202 }
3203 rc = ccw_device_set_offline(CARD_DDEV(card));
3204 rc2 = ccw_device_set_offline(CARD_WDEV(card));
3205 rc3 = ccw_device_set_offline(CARD_RDEV(card));
3206 if (!rc)
3207 rc = (rc2) ? rc2 : rc3;
3208 if (rc)
3209 QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
3210 qdio_free(CARD_DDEV(card));
3211 if (recover_flag == CARD_STATE_UP)
3212 card->state = CARD_STATE_RECOVER;
3213 /* let user_space know that device is offline */
3214 kobject_uevent(&cgdev->dev.kobj, KOBJ_CHANGE);
3215 mutex_unlock(&card->conf_mutex);
3216 mutex_unlock(&card->discipline_mutex);
3217 return 0;
3218 }
3219
3220 static int qeth_l3_set_offline(struct ccwgroup_device *cgdev)
3221 {
3222 return __qeth_l3_set_offline(cgdev, 0);
3223 }
3224
3225 static int qeth_l3_recover(void *ptr)
3226 {
3227 struct qeth_card *card;
3228 int rc = 0;
3229
3230 card = (struct qeth_card *) ptr;
3231 QETH_CARD_TEXT(card, 2, "recover1");
3232 QETH_CARD_HEX(card, 2, &card, sizeof(void *));
3233 if (!qeth_do_run_thread(card, QETH_RECOVER_THREAD))
3234 return 0;
3235 QETH_CARD_TEXT(card, 2, "recover2");
3236 dev_warn(&card->gdev->dev,
3237 "A recovery process has been started for the device\n");
3238 qeth_set_recovery_task(card);
3239 __qeth_l3_set_offline(card->gdev, 1);
3240 rc = __qeth_l3_set_online(card->gdev, 1);
3241 if (!rc)
3242 dev_info(&card->gdev->dev,
3243 "Device successfully recovered!\n");
3244 else {
3245 qeth_close_dev(card);
3246 dev_warn(&card->gdev->dev, "The qeth device driver "
3247 "failed to recover an error on the device\n");
3248 }
3249 qeth_clear_recovery_task(card);
3250 qeth_clear_thread_start_bit(card, QETH_RECOVER_THREAD);
3251 qeth_clear_thread_running_bit(card, QETH_RECOVER_THREAD);
3252 return 0;
3253 }
3254
3255 static int qeth_l3_pm_suspend(struct ccwgroup_device *gdev)
3256 {
3257 struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3258
3259 if (card->dev)
3260 netif_device_detach(card->dev);
3261 qeth_set_allowed_threads(card, 0, 1);
3262 wait_event(card->wait_q, qeth_threads_running(card, 0xffffffff) == 0);
3263 if (gdev->state == CCWGROUP_OFFLINE)
3264 return 0;
3265 if (card->state == CARD_STATE_UP) {
3266 if (card->info.hwtrap)
3267 qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
3268 __qeth_l3_set_offline(card->gdev, 1);
3269 } else
3270 __qeth_l3_set_offline(card->gdev, 0);
3271 return 0;
3272 }
3273
3274 static int qeth_l3_pm_resume(struct ccwgroup_device *gdev)
3275 {
3276 struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3277 int rc = 0;
3278
3279 if (gdev->state == CCWGROUP_OFFLINE)
3280 goto out;
3281
3282 if (card->state == CARD_STATE_RECOVER) {
3283 rc = __qeth_l3_set_online(card->gdev, 1);
3284 if (rc) {
3285 rtnl_lock();
3286 dev_close(card->dev);
3287 rtnl_unlock();
3288 }
3289 } else
3290 rc = __qeth_l3_set_online(card->gdev, 0);
3291 out:
3292 qeth_set_allowed_threads(card, 0xffffffff, 0);
3293 if (card->dev)
3294 netif_device_attach(card->dev);
3295 if (rc)
3296 dev_warn(&card->gdev->dev, "The qeth device driver "
3297 "failed to recover an error on the device\n");
3298 return rc;
3299 }
3300
3301 /* Returns zero if the command is successfully "consumed" */
3302 static int qeth_l3_control_event(struct qeth_card *card,
3303 struct qeth_ipa_cmd *cmd)
3304 {
3305 return 1;
3306 }
3307
3308 struct qeth_discipline qeth_l3_discipline = {
3309 .devtype = &qeth_l3_devtype,
3310 .start_poll = qeth_qdio_start_poll,
3311 .input_handler = (qdio_handler_t *) qeth_qdio_input_handler,
3312 .output_handler = (qdio_handler_t *) qeth_qdio_output_handler,
3313 .process_rx_buffer = qeth_l3_process_inbound_buffer,
3314 .recover = qeth_l3_recover,
3315 .setup = qeth_l3_probe_device,
3316 .remove = qeth_l3_remove_device,
3317 .set_online = qeth_l3_set_online,
3318 .set_offline = qeth_l3_set_offline,
3319 .freeze = qeth_l3_pm_suspend,
3320 .thaw = qeth_l3_pm_resume,
3321 .restore = qeth_l3_pm_resume,
3322 .do_ioctl = qeth_l3_do_ioctl,
3323 .control_event_handler = qeth_l3_control_event,
3324 };
3325 EXPORT_SYMBOL_GPL(qeth_l3_discipline);
3326
3327 static int qeth_l3_ip_event(struct notifier_block *this,
3328 unsigned long event, void *ptr)
3329 {
3330
3331 struct in_ifaddr *ifa = (struct in_ifaddr *)ptr;
3332 struct net_device *dev = (struct net_device *)ifa->ifa_dev->dev;
3333 struct qeth_ipaddr *addr;
3334 struct qeth_card *card;
3335
3336 if (dev_net(dev) != &init_net)
3337 return NOTIFY_DONE;
3338
3339 card = qeth_l3_get_card_from_dev(dev);
3340 if (!card)
3341 return NOTIFY_DONE;
3342 QETH_CARD_TEXT(card, 3, "ipevent");
3343
3344 addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
3345 if (addr) {
3346 addr->u.a4.addr = be32_to_cpu(ifa->ifa_address);
3347 addr->u.a4.mask = be32_to_cpu(ifa->ifa_mask);
3348 addr->type = QETH_IP_TYPE_NORMAL;
3349 } else
3350 return NOTIFY_DONE;
3351
3352 switch (event) {
3353 case NETDEV_UP:
3354 spin_lock_bh(&card->ip_lock);
3355 qeth_l3_add_ip(card, addr);
3356 spin_unlock_bh(&card->ip_lock);
3357 break;
3358 case NETDEV_DOWN:
3359 spin_lock_bh(&card->ip_lock);
3360 qeth_l3_delete_ip(card, addr);
3361 spin_unlock_bh(&card->ip_lock);
3362 break;
3363 }
3364
3365 kfree(addr);
3366 return NOTIFY_DONE;
3367 }
3368
3369 static struct notifier_block qeth_l3_ip_notifier = {
3370 qeth_l3_ip_event,
3371 NULL,
3372 };
3373
3374 #ifdef CONFIG_QETH_IPV6
3375 /**
3376 * IPv6 event handler
3377 */
3378 static int qeth_l3_ip6_event(struct notifier_block *this,
3379 unsigned long event, void *ptr)
3380 {
3381 struct inet6_ifaddr *ifa = (struct inet6_ifaddr *)ptr;
3382 struct net_device *dev = (struct net_device *)ifa->idev->dev;
3383 struct qeth_ipaddr *addr;
3384 struct qeth_card *card;
3385
3386 card = qeth_l3_get_card_from_dev(dev);
3387 if (!card)
3388 return NOTIFY_DONE;
3389 QETH_CARD_TEXT(card, 3, "ip6event");
3390 if (!qeth_is_supported(card, IPA_IPV6))
3391 return NOTIFY_DONE;
3392
3393 addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
3394 if (addr) {
3395 memcpy(&addr->u.a6.addr, &ifa->addr, sizeof(struct in6_addr));
3396 addr->u.a6.pfxlen = ifa->prefix_len;
3397 addr->type = QETH_IP_TYPE_NORMAL;
3398 } else
3399 return NOTIFY_DONE;
3400
3401 switch (event) {
3402 case NETDEV_UP:
3403 spin_lock_bh(&card->ip_lock);
3404 qeth_l3_add_ip(card, addr);
3405 spin_unlock_bh(&card->ip_lock);
3406 break;
3407 case NETDEV_DOWN:
3408 spin_lock_bh(&card->ip_lock);
3409 qeth_l3_delete_ip(card, addr);
3410 spin_unlock_bh(&card->ip_lock);
3411 break;
3412 }
3413
3414 kfree(addr);
3415 return NOTIFY_DONE;
3416 }
3417
3418 static struct notifier_block qeth_l3_ip6_notifier = {
3419 qeth_l3_ip6_event,
3420 NULL,
3421 };
3422 #endif
3423
3424 static int qeth_l3_register_notifiers(void)
3425 {
3426 int rc;
3427
3428 QETH_DBF_TEXT(SETUP, 5, "regnotif");
3429 rc = register_inetaddr_notifier(&qeth_l3_ip_notifier);
3430 if (rc)
3431 return rc;
3432 #ifdef CONFIG_QETH_IPV6
3433 rc = register_inet6addr_notifier(&qeth_l3_ip6_notifier);
3434 if (rc) {
3435 unregister_inetaddr_notifier(&qeth_l3_ip_notifier);
3436 return rc;
3437 }
3438 #else
3439 pr_warn("There is no IPv6 support for the layer 3 discipline\n");
3440 #endif
3441 return 0;
3442 }
3443
3444 static void qeth_l3_unregister_notifiers(void)
3445 {
3446
3447 QETH_DBF_TEXT(SETUP, 5, "unregnot");
3448 WARN_ON(unregister_inetaddr_notifier(&qeth_l3_ip_notifier));
3449 #ifdef CONFIG_QETH_IPV6
3450 WARN_ON(unregister_inet6addr_notifier(&qeth_l3_ip6_notifier));
3451 #endif /* QETH_IPV6 */
3452 }
3453
3454 static int __init qeth_l3_init(void)
3455 {
3456 int rc = 0;
3457
3458 pr_info("register layer 3 discipline\n");
3459 rc = qeth_l3_register_notifiers();
3460 return rc;
3461 }
3462
3463 static void __exit qeth_l3_exit(void)
3464 {
3465 qeth_l3_unregister_notifiers();
3466 pr_info("unregister layer 3 discipline\n");
3467 }
3468
3469 module_init(qeth_l3_init);
3470 module_exit(qeth_l3_exit);
3471 MODULE_AUTHOR("Frank Blaschka <frank.blaschka@de.ibm.com>");
3472 MODULE_DESCRIPTION("qeth layer 3 discipline");
3473 MODULE_LICENSE("GPL");