?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
[PATCH] W1: w1_netlink: New init/fini netlink callbacks.
[linux-2.6/verdex.git] / drivers / s390 / net / qeth_main.c
blob79c74f3a11f5f471d79fa6c3507e56d9fe553a33
1 /*
2 *
3 * linux/drivers/s390/net/qeth_main.c ($Revision: 1.214 $)
4 *
5 * Linux on zSeries OSA Express and HiperSockets support
6 *
7 * Copyright 2000,2003 IBM Corporation
8 *
9 * Author(s): Original Code written by
10 * Utz Bacher (utz.bacher@de.ibm.com)
11 * Rewritten by
12 * Frank Pavlic (pavlic@de.ibm.com) and
13 * Thomas Spatzier <tspat@de.ibm.com>
14 *
15 * $Revision: 1.214 $ $Date: 2005/05/04 20:19:18 $
16 *
17 * This program is free software; you can redistribute it and/or modify
18 * it under the terms of the GNU General Public License as published by
19 * the Free Software Foundation; either version 2, or (at your option)
20 * any later version.
21 *
22 * This program is distributed in the hope that it will be useful,
23 * but WITHOUT ANY WARRANTY; without even the implied warranty of
24 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
25 * GNU General Public License for more details.
26 *
27 * You should have received a copy of the GNU General Public License
28 * along with this program; if not, write to the Free Software
29 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
30 */
31
32 /***
33 * eye catcher; just for debugging purposes
34 */
35 void volatile
36 qeth_eyecatcher(void)
37 {
38 return;
39 }
40
41 #include <linux/config.h>
42 #include <linux/module.h>
43 #include <linux/moduleparam.h>
44 #include <linux/string.h>
45 #include <linux/errno.h>
46 #include <linux/mm.h>
47 #include <linux/ip.h>
48 #include <linux/inetdevice.h>
49 #include <linux/netdevice.h>
50 #include <linux/sched.h>
51 #include <linux/workqueue.h>
52 #include <linux/kernel.h>
53 #include <linux/slab.h>
54 #include <linux/interrupt.h>
55 #include <linux/tcp.h>
56 #include <linux/icmp.h>
57 #include <linux/skbuff.h>
58 #include <linux/in.h>
59 #include <linux/igmp.h>
60 #include <linux/init.h>
61 #include <linux/reboot.h>
62 #include <linux/mii.h>
63 #include <linux/rcupdate.h>
64 #include <linux/ethtool.h>
65
66 #include <net/arp.h>
67 #include <net/ip.h>
68 #include <net/route.h>
69
70 #include <asm/ebcdic.h>
71 #include <asm/io.h>
72 #include <asm/qeth.h>
73 #include <asm/timex.h>
74 #include <asm/semaphore.h>
75 #include <asm/uaccess.h>
76
77 #include "qeth.h"
78 #include "qeth_mpc.h"
79 #include "qeth_fs.h"
80 #include "qeth_eddp.h"
81 #include "qeth_tso.h"
82
83 #define VERSION_QETH_C "$Revision: 1.214 $"
84 static const char *version = "qeth S/390 OSA-Express driver";
85
86 /**
87 * Debug Facility Stuff
88 */
89 static debug_info_t *qeth_dbf_setup = NULL;
90 static debug_info_t *qeth_dbf_data = NULL;
91 static debug_info_t *qeth_dbf_misc = NULL;
92 static debug_info_t *qeth_dbf_control = NULL;
93 debug_info_t *qeth_dbf_trace = NULL;
94 static debug_info_t *qeth_dbf_sense = NULL;
95 static debug_info_t *qeth_dbf_qerr = NULL;
96
97 DEFINE_PER_CPU(char[256], qeth_dbf_txt_buf);
98
99 /**
100 * some more definitions and declarations
101 */
102 static unsigned int known_devices[][10] = QETH_MODELLIST_ARRAY;
103
104 /* list of our cards */
105 struct qeth_card_list_struct qeth_card_list;
106 /*process list want to be notified*/
107 spinlock_t qeth_notify_lock;
108 struct list_head qeth_notify_list;
109
110 static void qeth_send_control_data_cb(struct qeth_channel *,
111 struct qeth_cmd_buffer *);
112
113 /**
114 * here we go with function implementation
115 */
116 static void
117 qeth_init_qdio_info(struct qeth_card *card);
118
119 static int
120 qeth_init_qdio_queues(struct qeth_card *card);
121
122 static int
123 qeth_alloc_qdio_buffers(struct qeth_card *card);
124
125 static void
126 qeth_free_qdio_buffers(struct qeth_card *);
127
128 static void
129 qeth_clear_qdio_buffers(struct qeth_card *);
130
131 static void
132 qeth_clear_ip_list(struct qeth_card *, int, int);
133
134 static void
135 qeth_clear_ipacmd_list(struct qeth_card *);
136
137 static int
138 qeth_qdio_clear_card(struct qeth_card *, int);
139
140 static void
141 qeth_clear_working_pool_list(struct qeth_card *);
142
143 static void
144 qeth_clear_cmd_buffers(struct qeth_channel *);
145
146 static int
147 qeth_stop(struct net_device *);
148
149 static void
150 qeth_clear_ipato_list(struct qeth_card *);
151
152 static int
153 qeth_is_addr_covered_by_ipato(struct qeth_card *, struct qeth_ipaddr *);
154
155 static void
156 qeth_irq_tasklet(unsigned long);
157
158 static int
159 qeth_set_online(struct ccwgroup_device *);
160
161 static int
162 __qeth_set_online(struct ccwgroup_device *gdev, int recovery_mode);
163
164 static struct qeth_ipaddr *
165 qeth_get_addr_buffer(enum qeth_prot_versions);
166
167 static void
168 qeth_set_multicast_list(struct net_device *);
169
170 static void
171 qeth_notify_processes(void)
172 {
173 /*notify all registered processes */
174 struct qeth_notify_list_struct *n_entry;
175
176 QETH_DBF_TEXT(trace,3,"procnoti");
177 spin_lock(&qeth_notify_lock);
178 list_for_each_entry(n_entry, &qeth_notify_list, list) {
179 send_sig(n_entry->signum, n_entry->task, 1);
180 }
181 spin_unlock(&qeth_notify_lock);
182
183 }
184 int
185 qeth_notifier_unregister(struct task_struct *p)
186 {
187 struct qeth_notify_list_struct *n_entry, *tmp;
188
189 QETH_DBF_TEXT(trace, 2, "notunreg");
190 spin_lock(&qeth_notify_lock);
191 list_for_each_entry_safe(n_entry, tmp, &qeth_notify_list, list) {
192 if (n_entry->task == p) {
193 list_del(&n_entry->list);
194 kfree(n_entry);
195 goto out;
196 }
197 }
198 out:
199 spin_unlock(&qeth_notify_lock);
200 return 0;
201 }
202 int
203 qeth_notifier_register(struct task_struct *p, int signum)
204 {
205 struct qeth_notify_list_struct *n_entry;
206
207
208 /*check first if entry already exists*/
209 spin_lock(&qeth_notify_lock);
210 list_for_each_entry(n_entry, &qeth_notify_list, list) {
211 if (n_entry->task == p) {
212 n_entry->signum = signum;
213 spin_unlock(&qeth_notify_lock);
214 return 0;
215 }
216 }
217 spin_unlock(&qeth_notify_lock);
218
219 n_entry = (struct qeth_notify_list_struct *)
220 kmalloc(sizeof(struct qeth_notify_list_struct),GFP_KERNEL);
221 if (!n_entry)
222 return -ENOMEM;
223 n_entry->task = p;
224 n_entry->signum = signum;
225 spin_lock(&qeth_notify_lock);
226 list_add(&n_entry->list,&qeth_notify_list);
227 spin_unlock(&qeth_notify_lock);
228 return 0;
229 }
230
231
232 /**
233 * free channel command buffers
234 */
235 static void
236 qeth_clean_channel(struct qeth_channel *channel)
237 {
238 int cnt;
239
240 QETH_DBF_TEXT(setup, 2, "freech");
241 for (cnt = 0; cnt < QETH_CMD_BUFFER_NO; cnt++)
242 kfree(channel->iob[cnt].data);
243 }
244
245 /**
246 * free card
247 */
248 static void
249 qeth_free_card(struct qeth_card *card)
250 {
251
252 QETH_DBF_TEXT(setup, 2, "freecrd");
253 QETH_DBF_HEX(setup, 2, &card, sizeof(void *));
254 qeth_clean_channel(&card->read);
255 qeth_clean_channel(&card->write);
256 if (card->dev)
257 free_netdev(card->dev);
258 qeth_clear_ip_list(card, 0, 0);
259 qeth_clear_ipato_list(card);
260 kfree(card->ip_tbd_list);
261 qeth_free_qdio_buffers(card);
262 kfree(card);
263 }
264
265 /**
266 * alloc memory for command buffer per channel
267 */
268 static int
269 qeth_setup_channel(struct qeth_channel *channel)
270 {
271 int cnt;
272
273 QETH_DBF_TEXT(setup, 2, "setupch");
274 for (cnt=0; cnt < QETH_CMD_BUFFER_NO; cnt++) {
275 channel->iob[cnt].data = (char *)
276 kmalloc(QETH_BUFSIZE, GFP_DMA|GFP_KERNEL);
277 if (channel->iob[cnt].data == NULL)
278 break;
279 channel->iob[cnt].state = BUF_STATE_FREE;
280 channel->iob[cnt].channel = channel;
281 channel->iob[cnt].callback = qeth_send_control_data_cb;
282 channel->iob[cnt].rc = 0;
283 }
284 if (cnt < QETH_CMD_BUFFER_NO) {
285 while (cnt-- > 0)
286 kfree(channel->iob[cnt].data);
287 return -ENOMEM;
288 }
289 channel->buf_no = 0;
290 channel->io_buf_no = 0;
291 atomic_set(&channel->irq_pending, 0);
292 spin_lock_init(&channel->iob_lock);
293
294 init_waitqueue_head(&channel->wait_q);
295 channel->irq_tasklet.data = (unsigned long) channel;
296 channel->irq_tasklet.func = qeth_irq_tasklet;
297 return 0;
298 }
299
300 /**
301 * alloc memory for card structure
302 */
303 static struct qeth_card *
304 qeth_alloc_card(void)
305 {
306 struct qeth_card *card;
307
308 QETH_DBF_TEXT(setup, 2, "alloccrd");
309 card = (struct qeth_card *) kmalloc(sizeof(struct qeth_card),
310 GFP_DMA|GFP_KERNEL);
311 if (!card)
312 return NULL;
313 QETH_DBF_HEX(setup, 2, &card, sizeof(void *));
314 memset(card, 0, sizeof(struct qeth_card));
315 if (qeth_setup_channel(&card->read)) {
316 kfree(card);
317 return NULL;
318 }
319 if (qeth_setup_channel(&card->write)) {
320 qeth_clean_channel(&card->read);
321 kfree(card);
322 return NULL;
323 }
324 return card;
325 }
326
327 static long
328 __qeth_check_irb_error(struct ccw_device *cdev, struct irb *irb)
329 {
330 if (!IS_ERR(irb))
331 return 0;
332
333 switch (PTR_ERR(irb)) {
334 case -EIO:
335 PRINT_WARN("i/o-error on device %s\n", cdev->dev.bus_id);
336 QETH_DBF_TEXT(trace, 2, "ckirberr");
337 QETH_DBF_TEXT_(trace, 2, " rc%d", -EIO);
338 break;
339 case -ETIMEDOUT:
340 PRINT_WARN("timeout on device %s\n", cdev->dev.bus_id);
341 QETH_DBF_TEXT(trace, 2, "ckirberr");
342 QETH_DBF_TEXT_(trace, 2, " rc%d", -ETIMEDOUT);
343 break;
344 default:
345 PRINT_WARN("unknown error %ld on device %s\n", PTR_ERR(irb),
346 cdev->dev.bus_id);
347 QETH_DBF_TEXT(trace, 2, "ckirberr");
348 QETH_DBF_TEXT(trace, 2, " rc???");
349 }
350 return PTR_ERR(irb);
351 }
352
353 static int
354 qeth_get_problem(struct ccw_device *cdev, struct irb *irb)
355 {
356 int dstat,cstat;
357 char *sense;
358
359 sense = (char *) irb->ecw;
360 cstat = irb->scsw.cstat;
361 dstat = irb->scsw.dstat;
362
363 if (cstat & (SCHN_STAT_CHN_CTRL_CHK | SCHN_STAT_INTF_CTRL_CHK |
364 SCHN_STAT_CHN_DATA_CHK | SCHN_STAT_CHAIN_CHECK |
365 SCHN_STAT_PROT_CHECK | SCHN_STAT_PROG_CHECK)) {
366 QETH_DBF_TEXT(trace,2, "CGENCHK");
367 PRINT_WARN("check on device %s, dstat=x%x, cstat=x%x ",
368 cdev->dev.bus_id, dstat, cstat);
369 HEXDUMP16(WARN, "irb: ", irb);
370 HEXDUMP16(WARN, "irb: ", ((char *) irb) + 32);
371 return 1;
372 }
373
374 if (dstat & DEV_STAT_UNIT_CHECK) {
375 if (sense[SENSE_RESETTING_EVENT_BYTE] &
376 SENSE_RESETTING_EVENT_FLAG) {
377 QETH_DBF_TEXT(trace,2,"REVIND");
378 return 1;
379 }
380 if (sense[SENSE_COMMAND_REJECT_BYTE] &
381 SENSE_COMMAND_REJECT_FLAG) {
382 QETH_DBF_TEXT(trace,2,"CMDREJi");
383 return 0;
384 }
385 if ((sense[2] == 0xaf) && (sense[3] == 0xfe)) {
386 QETH_DBF_TEXT(trace,2,"AFFE");
387 return 1;
388 }
389 if ((!sense[0]) && (!sense[1]) && (!sense[2]) && (!sense[3])) {
390 QETH_DBF_TEXT(trace,2,"ZEROSEN");
391 return 0;
392 }
393 QETH_DBF_TEXT(trace,2,"DGENCHK");
394 return 1;
395 }
396 return 0;
397 }
398 static int qeth_issue_next_read(struct qeth_card *);
399
400 /**
401 * interrupt handler
402 */
403 static void
404 qeth_irq(struct ccw_device *cdev, unsigned long intparm, struct irb *irb)
405 {
406 int rc;
407 int cstat,dstat;
408 struct qeth_cmd_buffer *buffer;
409 struct qeth_channel *channel;
410 struct qeth_card *card;
411
412 QETH_DBF_TEXT(trace,5,"irq");
413
414 if (__qeth_check_irb_error(cdev, irb))
415 return;
416 cstat = irb->scsw.cstat;
417 dstat = irb->scsw.dstat;
418
419 card = CARD_FROM_CDEV(cdev);
420 if (!card)
421 return;
422
423 if (card->read.ccwdev == cdev){
424 channel = &card->read;
425 QETH_DBF_TEXT(trace,5,"read");
426 } else if (card->write.ccwdev == cdev) {
427 channel = &card->write;
428 QETH_DBF_TEXT(trace,5,"write");
429 } else {
430 channel = &card->data;
431 QETH_DBF_TEXT(trace,5,"data");
432 }
433 atomic_set(&channel->irq_pending, 0);
434
435 if (irb->scsw.fctl & (SCSW_FCTL_CLEAR_FUNC))
436 channel->state = CH_STATE_STOPPED;
437
438 if (irb->scsw.fctl & (SCSW_FCTL_HALT_FUNC))
439 channel->state = CH_STATE_HALTED;
440
441 /*let's wake up immediately on data channel*/
442 if ((channel == &card->data) && (intparm != 0))
443 goto out;
444
445 if (intparm == QETH_CLEAR_CHANNEL_PARM) {
446 QETH_DBF_TEXT(trace, 6, "clrchpar");
447 /* we don't have to handle this further */
448 intparm = 0;
449 }
450 if (intparm == QETH_HALT_CHANNEL_PARM) {
451 QETH_DBF_TEXT(trace, 6, "hltchpar");
452 /* we don't have to handle this further */
453 intparm = 0;
454 }
455 if ((dstat & DEV_STAT_UNIT_EXCEP) ||
456 (dstat & DEV_STAT_UNIT_CHECK) ||
457 (cstat)) {
458 if (irb->esw.esw0.erw.cons) {
459 /* TODO: we should make this s390dbf */
460 PRINT_WARN("sense data available on channel %s.\n",
461 CHANNEL_ID(channel));
462 PRINT_WARN(" cstat 0x%X\n dstat 0x%X\n", cstat, dstat);
463 HEXDUMP16(WARN,"irb: ",irb);
464 HEXDUMP16(WARN,"sense data: ",irb->ecw);
465 }
466 rc = qeth_get_problem(cdev,irb);
467 if (rc) {
468 qeth_schedule_recovery(card);
469 goto out;
470 }
471 }
472
473 if (intparm) {
474 buffer = (struct qeth_cmd_buffer *) __va((addr_t)intparm);
475 buffer->state = BUF_STATE_PROCESSED;
476 }
477 if (channel == &card->data)
478 return;
479
480 if (channel == &card->read &&
481 channel->state == CH_STATE_UP)
482 qeth_issue_next_read(card);
483
484 tasklet_schedule(&channel->irq_tasklet);
485 return;
486 out:
487 wake_up(&card->wait_q);
488 }
489
490 /**
491 * tasklet function scheduled from irq handler
492 */
493 static void
494 qeth_irq_tasklet(unsigned long data)
495 {
496 struct qeth_card *card;
497 struct qeth_channel *channel;
498 struct qeth_cmd_buffer *iob;
499 __u8 index;
500
501 QETH_DBF_TEXT(trace,5,"irqtlet");
502 channel = (struct qeth_channel *) data;
503 iob = channel->iob;
504 index = channel->buf_no;
505 card = CARD_FROM_CDEV(channel->ccwdev);
506 while (iob[index].state == BUF_STATE_PROCESSED) {
507 if (iob[index].callback !=NULL) {
508 iob[index].callback(channel,iob + index);
509 }
510 index = (index + 1) % QETH_CMD_BUFFER_NO;
511 }
512 channel->buf_no = index;
513 wake_up(&card->wait_q);
514 }
515
516 static int qeth_stop_card(struct qeth_card *, int);
517
518 static int
519 __qeth_set_offline(struct ccwgroup_device *cgdev, int recovery_mode)
520 {
521 struct qeth_card *card = (struct qeth_card *) cgdev->dev.driver_data;
522 int rc = 0;
523 enum qeth_card_states recover_flag;
524
525 QETH_DBF_TEXT(setup, 3, "setoffl");
526 QETH_DBF_HEX(setup, 3, &card, sizeof(void *));
527
528 recover_flag = card->state;
529 if (qeth_stop_card(card, recovery_mode) == -ERESTARTSYS){
530 PRINT_WARN("Stopping card %s interrupted by user!\n",
531 CARD_BUS_ID(card));
532 return -ERESTARTSYS;
533 }
534 if ((rc = ccw_device_set_offline(CARD_DDEV(card))) ||
535 (rc = ccw_device_set_offline(CARD_WDEV(card))) ||
536 (rc = ccw_device_set_offline(CARD_RDEV(card)))) {
537 QETH_DBF_TEXT_(setup, 2, "1err%d", rc);
538 }
539 if (recover_flag == CARD_STATE_UP)
540 card->state = CARD_STATE_RECOVER;
541 qeth_notify_processes();
542 return 0;
543 }
544
545 static int
546 qeth_set_offline(struct ccwgroup_device *cgdev)
547 {
548 return __qeth_set_offline(cgdev, 0);
549 }
550
551 static int
552 qeth_wait_for_threads(struct qeth_card *card, unsigned long threads);
553
554
555 static void
556 qeth_remove_device(struct ccwgroup_device *cgdev)
557 {
558 struct qeth_card *card = (struct qeth_card *) cgdev->dev.driver_data;
559 unsigned long flags;
560
561 QETH_DBF_TEXT(setup, 3, "rmdev");
562 QETH_DBF_HEX(setup, 3, &card, sizeof(void *));
563
564 if (!card)
565 return;
566
567 if (qeth_wait_for_threads(card, 0xffffffff))
568 return;
569
570 if (cgdev->state == CCWGROUP_ONLINE){
571 card->use_hard_stop = 1;
572 qeth_set_offline(cgdev);
573 }
574 /* remove form our internal list */
575 write_lock_irqsave(&qeth_card_list.rwlock, flags);
576 list_del(&card->list);
577 write_unlock_irqrestore(&qeth_card_list.rwlock, flags);
578 if (card->dev)
579 unregister_netdev(card->dev);
580 qeth_remove_device_attributes(&cgdev->dev);
581 qeth_free_card(card);
582 cgdev->dev.driver_data = NULL;
583 put_device(&cgdev->dev);
584 }
585
586 static int
587 qeth_register_addr_entry(struct qeth_card *, struct qeth_ipaddr *);
588 static int
589 qeth_deregister_addr_entry(struct qeth_card *, struct qeth_ipaddr *);
590
591 /**
592 * Add/remove address to/from card's ip list, i.e. try to add or remove
593 * reference to/from an IP address that is already registered on the card.
594 * Returns:
595 * 0 address was on card and its reference count has been adjusted,
596 * but is still > 0, so nothing has to be done
597 * also returns 0 if card was not on card and the todo was to delete
598 * the address -> there is also nothing to be done
599 * 1 address was not on card and the todo is to add it to the card's ip
600 * list
601 * -1 address was on card and its reference count has been decremented
602 * to <= 0 by the todo -> address must be removed from card
603 */
604 static int
605 __qeth_ref_ip_on_card(struct qeth_card *card, struct qeth_ipaddr *todo,
606 struct qeth_ipaddr **__addr)
607 {
608 struct qeth_ipaddr *addr;
609 int found = 0;
610
611 list_for_each_entry(addr, &card->ip_list, entry) {
612 if ((addr->proto == QETH_PROT_IPV4) &&
613 (todo->proto == QETH_PROT_IPV4) &&
614 (addr->type == todo->type) &&
615 (addr->u.a4.addr == todo->u.a4.addr) &&
616 (addr->u.a4.mask == todo->u.a4.mask) ){
617 found = 1;
618 break;
619 }
620 if ((addr->proto == QETH_PROT_IPV6) &&
621 (todo->proto == QETH_PROT_IPV6) &&
622 (addr->type == todo->type) &&
623 (addr->u.a6.pfxlen == todo->u.a6.pfxlen) &&
624 (memcmp(&addr->u.a6.addr, &todo->u.a6.addr,
625 sizeof(struct in6_addr)) == 0)) {
626 found = 1;
627 break;
628 }
629 }
630 if (found){
631 addr->users += todo->users;
632 if (addr->users <= 0){
633 *__addr = addr;
634 return -1;
635 } else {
636 /* for VIPA and RXIP limit refcount to 1 */
637 if (addr->type != QETH_IP_TYPE_NORMAL)
638 addr->users = 1;
639 return 0;
640 }
641 }
642 if (todo->users > 0){
643 /* for VIPA and RXIP limit refcount to 1 */
644 if (todo->type != QETH_IP_TYPE_NORMAL)
645 todo->users = 1;
646 return 1;
647 } else
648 return 0;
649 }
650
651 static inline int
652 __qeth_address_exists_in_list(struct list_head *list, struct qeth_ipaddr *addr,
653 int same_type)
654 {
655 struct qeth_ipaddr *tmp;
656
657 list_for_each_entry(tmp, list, entry) {
658 if ((tmp->proto == QETH_PROT_IPV4) &&
659 (addr->proto == QETH_PROT_IPV4) &&
660 ((same_type && (tmp->type == addr->type)) ||
661 (!same_type && (tmp->type != addr->type)) ) &&
662 (tmp->u.a4.addr == addr->u.a4.addr) ){
663 return 1;
664 }
665 if ((tmp->proto == QETH_PROT_IPV6) &&
666 (addr->proto == QETH_PROT_IPV6) &&
667 ((same_type && (tmp->type == addr->type)) ||
668 (!same_type && (tmp->type != addr->type)) ) &&
669 (memcmp(&tmp->u.a6.addr, &addr->u.a6.addr,
670 sizeof(struct in6_addr)) == 0) ) {
671 return 1;
672 }
673 }
674 return 0;
675 }
676
677 /*
678 * Add IP to be added to todo list. If there is already an "add todo"
679 * in this list we just incremenent the reference count.
680 * Returns 0 if we just incremented reference count.
681 */
682 static int
683 __qeth_insert_ip_todo(struct qeth_card *card, struct qeth_ipaddr *addr, int add)
684 {
685 struct qeth_ipaddr *tmp, *t;
686 int found = 0;
687
688 list_for_each_entry_safe(tmp, t, card->ip_tbd_list, entry) {
689 if ((addr->type == QETH_IP_TYPE_DEL_ALL_MC) &&
690 (tmp->type == QETH_IP_TYPE_DEL_ALL_MC))
691 return 0;
692 if ((tmp->proto == QETH_PROT_IPV4) &&
693 (addr->proto == QETH_PROT_IPV4) &&
694 (tmp->type == addr->type) &&
695 (tmp->is_multicast == addr->is_multicast) &&
696 (tmp->u.a4.addr == addr->u.a4.addr) &&
697 (tmp->u.a4.mask == addr->u.a4.mask) ){
698 found = 1;
699 break;
700 }
701 if ((tmp->proto == QETH_PROT_IPV6) &&
702 (addr->proto == QETH_PROT_IPV6) &&
703 (tmp->type == addr->type) &&
704 (tmp->is_multicast == addr->is_multicast) &&
705 (tmp->u.a6.pfxlen == addr->u.a6.pfxlen) &&
706 (memcmp(&tmp->u.a6.addr, &addr->u.a6.addr,
707 sizeof(struct in6_addr)) == 0) ){
708 found = 1;
709 break;
710 }
711 }
712 if (found){
713 if (addr->users != 0)
714 tmp->users += addr->users;
715 else
716 tmp->users += add? 1:-1;
717 if (tmp->users == 0){
718 list_del(&tmp->entry);
719 kfree(tmp);
720 }
721 return 0;
722 } else {
723 if (addr->type == QETH_IP_TYPE_DEL_ALL_MC)
724 list_add(&addr->entry, card->ip_tbd_list);
725 else {
726 if (addr->users == 0)
727 addr->users += add? 1:-1;
728 if (add && (addr->type == QETH_IP_TYPE_NORMAL) &&
729 qeth_is_addr_covered_by_ipato(card, addr)){
730 QETH_DBF_TEXT(trace, 2, "tkovaddr");
731 addr->set_flags |= QETH_IPA_SETIP_TAKEOVER_FLAG;
732 }
733 list_add_tail(&addr->entry, card->ip_tbd_list);
734 }
735 return 1;
736 }
737 }
738
739 /**
740 * Remove IP address from list
741 */
742 static int
743 qeth_delete_ip(struct qeth_card *card, struct qeth_ipaddr *addr)
744 {
745 unsigned long flags;
746 int rc = 0;
747
748 QETH_DBF_TEXT(trace,4,"delip");
749 if (addr->proto == QETH_PROT_IPV4)
750 QETH_DBF_HEX(trace,4,&addr->u.a4.addr,4);
751 else {
752 QETH_DBF_HEX(trace,4,&addr->u.a6.addr,8);
753 QETH_DBF_HEX(trace,4,((char *)&addr->u.a6.addr)+8,8);
754 }
755 spin_lock_irqsave(&card->ip_lock, flags);
756 rc = __qeth_insert_ip_todo(card, addr, 0);
757 spin_unlock_irqrestore(&card->ip_lock, flags);
758 return rc;
759 }
760
761 static int
762 qeth_add_ip(struct qeth_card *card, struct qeth_ipaddr *addr)
763 {
764 unsigned long flags;
765 int rc = 0;
766
767 QETH_DBF_TEXT(trace,4,"addip");
768 if (addr->proto == QETH_PROT_IPV4)
769 QETH_DBF_HEX(trace,4,&addr->u.a4.addr,4);
770 else {
771 QETH_DBF_HEX(trace,4,&addr->u.a6.addr,8);
772 QETH_DBF_HEX(trace,4,((char *)&addr->u.a6.addr)+8,8);
773 }
774 spin_lock_irqsave(&card->ip_lock, flags);
775 rc = __qeth_insert_ip_todo(card, addr, 1);
776 spin_unlock_irqrestore(&card->ip_lock, flags);
777 return rc;
778 }
779
780 static inline void
781 __qeth_delete_all_mc(struct qeth_card *card, unsigned long *flags)
782 {
783 struct qeth_ipaddr *addr, *tmp;
784 int rc;
785
786 list_for_each_entry_safe(addr, tmp, &card->ip_list, entry) {
787 if (addr->is_multicast) {
788 spin_unlock_irqrestore(&card->ip_lock, *flags);
789 rc = qeth_deregister_addr_entry(card, addr);
790 spin_lock_irqsave(&card->ip_lock, *flags);
791 if (!rc) {
792 list_del(&addr->entry);
793 kfree(addr);
794 }
795 }
796 }
797 }
798
799 static void
800 qeth_set_ip_addr_list(struct qeth_card *card)
801 {
802 struct list_head *tbd_list;
803 struct qeth_ipaddr *todo, *addr;
804 unsigned long flags;
805 int rc;
806
807 QETH_DBF_TEXT(trace, 2, "sdiplist");
808 QETH_DBF_HEX(trace, 2, &card, sizeof(void *));
809
810 spin_lock_irqsave(&card->ip_lock, flags);
811 tbd_list = card->ip_tbd_list;
812 card->ip_tbd_list = kmalloc(sizeof(struct list_head), GFP_ATOMIC);
813 if (!card->ip_tbd_list) {
814 QETH_DBF_TEXT(trace, 0, "silnomem");
815 card->ip_tbd_list = tbd_list;
816 spin_unlock_irqrestore(&card->ip_lock, flags);
817 return;
818 } else
819 INIT_LIST_HEAD(card->ip_tbd_list);
820
821 while (!list_empty(tbd_list)){
822 todo = list_entry(tbd_list->next, struct qeth_ipaddr, entry);
823 list_del(&todo->entry);
824 if (todo->type == QETH_IP_TYPE_DEL_ALL_MC){
825 __qeth_delete_all_mc(card, &flags);
826 kfree(todo);
827 continue;
828 }
829 rc = __qeth_ref_ip_on_card(card, todo, &addr);
830 if (rc == 0) {
831 /* nothing to be done; only adjusted refcount */
832 kfree(todo);
833 } else if (rc == 1) {
834 /* new entry to be added to on-card list */
835 spin_unlock_irqrestore(&card->ip_lock, flags);
836 rc = qeth_register_addr_entry(card, todo);
837 spin_lock_irqsave(&card->ip_lock, flags);
838 if (!rc)
839 list_add_tail(&todo->entry, &card->ip_list);
840 else
841 kfree(todo);
842 } else if (rc == -1) {
843 /* on-card entry to be removed */
844 list_del_init(&addr->entry);
845 spin_unlock_irqrestore(&card->ip_lock, flags);
846 rc = qeth_deregister_addr_entry(card, addr);
847 spin_lock_irqsave(&card->ip_lock, flags);
848 if (!rc)
849 kfree(addr);
850 else
851 list_add_tail(&addr->entry, &card->ip_list);
852 kfree(todo);
853 }
854 }
855 spin_unlock_irqrestore(&card->ip_lock, flags);
856 kfree(tbd_list);
857 }
858
859 static void qeth_delete_mc_addresses(struct qeth_card *);
860 static void qeth_add_multicast_ipv4(struct qeth_card *);
861 #ifdef CONFIG_QETH_IPV6
862 static void qeth_add_multicast_ipv6(struct qeth_card *);
863 #endif
864
865 static inline int
866 qeth_set_thread_start_bit(struct qeth_card *card, unsigned long thread)
867 {
868 unsigned long flags;
869
870 spin_lock_irqsave(&card->thread_mask_lock, flags);
871 if ( !(card->thread_allowed_mask & thread) ||
872 (card->thread_start_mask & thread) ) {
873 spin_unlock_irqrestore(&card->thread_mask_lock, flags);
874 return -EPERM;
875 }
876 card->thread_start_mask |= thread;
877 spin_unlock_irqrestore(&card->thread_mask_lock, flags);
878 return 0;
879 }
880
881 static void
882 qeth_clear_thread_start_bit(struct qeth_card *card, unsigned long thread)
883 {
884 unsigned long flags;
885
886 spin_lock_irqsave(&card->thread_mask_lock, flags);
887 card->thread_start_mask &= ~thread;
888 spin_unlock_irqrestore(&card->thread_mask_lock, flags);
889 wake_up(&card->wait_q);
890 }
891
892 static void
893 qeth_clear_thread_running_bit(struct qeth_card *card, unsigned long thread)
894 {
895 unsigned long flags;
896
897 spin_lock_irqsave(&card->thread_mask_lock, flags);
898 card->thread_running_mask &= ~thread;
899 spin_unlock_irqrestore(&card->thread_mask_lock, flags);
900 wake_up(&card->wait_q);
901 }
902
903 static inline int
904 __qeth_do_run_thread(struct qeth_card *card, unsigned long thread)
905 {
906 unsigned long flags;
907 int rc = 0;
908
909 spin_lock_irqsave(&card->thread_mask_lock, flags);
910 if (card->thread_start_mask & thread){
911 if ((card->thread_allowed_mask & thread) &&
912 !(card->thread_running_mask & thread)){
913 rc = 1;
914 card->thread_start_mask &= ~thread;
915 card->thread_running_mask |= thread;
916 } else
917 rc = -EPERM;
918 }
919 spin_unlock_irqrestore(&card->thread_mask_lock, flags);
920 return rc;
921 }
922
923 static int
924 qeth_do_run_thread(struct qeth_card *card, unsigned long thread)
925 {
926 int rc = 0;
927
928 wait_event(card->wait_q,
929 (rc = __qeth_do_run_thread(card, thread)) >= 0);
930 return rc;
931 }
932
933 static int
934 qeth_register_ip_addresses(void *ptr)
935 {
936 struct qeth_card *card;
937
938 card = (struct qeth_card *) ptr;
939 daemonize("qeth_reg_ip");
940 QETH_DBF_TEXT(trace,4,"regipth1");
941 if (!qeth_do_run_thread(card, QETH_SET_IP_THREAD))
942 return 0;
943 QETH_DBF_TEXT(trace,4,"regipth2");
944 qeth_set_ip_addr_list(card);
945 qeth_clear_thread_running_bit(card, QETH_SET_IP_THREAD);
946 return 0;
947 }
948
949 static int
950 qeth_recover(void *ptr)
951 {
952 struct qeth_card *card;
953 int rc = 0;
954
955 card = (struct qeth_card *) ptr;
956 daemonize("qeth_recover");
957 QETH_DBF_TEXT(trace,2,"recover1");
958 QETH_DBF_HEX(trace, 2, &card, sizeof(void *));
959 if (!qeth_do_run_thread(card, QETH_RECOVER_THREAD))
960 return 0;
961 QETH_DBF_TEXT(trace,2,"recover2");
962 PRINT_WARN("Recovery of device %s started ...\n",
963 CARD_BUS_ID(card));
964 card->use_hard_stop = 1;
965 __qeth_set_offline(card->gdev,1);
966 rc = __qeth_set_online(card->gdev,1);
967 if (!rc)
968 PRINT_INFO("Device %s successfully recovered!\n",
969 CARD_BUS_ID(card));
970 else
971 PRINT_INFO("Device %s could not be recovered!\n",
972 CARD_BUS_ID(card));
973 /* don't run another scheduled recovery */
974 qeth_clear_thread_start_bit(card, QETH_RECOVER_THREAD);
975 qeth_clear_thread_running_bit(card, QETH_RECOVER_THREAD);
976 return 0;
977 }
978
979 void
980 qeth_schedule_recovery(struct qeth_card *card)
981 {
982 QETH_DBF_TEXT(trace,2,"startrec");
983
984 if (qeth_set_thread_start_bit(card, QETH_RECOVER_THREAD) == 0)
985 schedule_work(&card->kernel_thread_starter);
986 }
987
988 static int
989 qeth_do_start_thread(struct qeth_card *card, unsigned long thread)
990 {
991 unsigned long flags;
992 int rc = 0;
993
994 spin_lock_irqsave(&card->thread_mask_lock, flags);
995 QETH_DBF_TEXT_(trace, 4, " %02x%02x%02x",
996 (u8) card->thread_start_mask,
997 (u8) card->thread_allowed_mask,
998 (u8) card->thread_running_mask);
999 rc = (card->thread_start_mask & thread);
1000 spin_unlock_irqrestore(&card->thread_mask_lock, flags);
1001 return rc;
1002 }
1003
1004 static void
1005 qeth_start_kernel_thread(struct qeth_card *card)
1006 {
1007 QETH_DBF_TEXT(trace , 2, "strthrd");
1008
1009 if (card->read.state != CH_STATE_UP &&
1010 card->write.state != CH_STATE_UP)
1011 return;
1012
1013 if (qeth_do_start_thread(card, QETH_SET_IP_THREAD))
1014 kernel_thread(qeth_register_ip_addresses, (void *)card,SIGCHLD);
1015 if (qeth_do_start_thread(card, QETH_RECOVER_THREAD))
1016 kernel_thread(qeth_recover, (void *) card, SIGCHLD);
1017 }
1018
1019
1020 static void
1021 qeth_set_intial_options(struct qeth_card *card)
1022 {
1023 card->options.route4.type = NO_ROUTER;
1024 #ifdef CONFIG_QETH_IPV6
1025 card->options.route6.type = NO_ROUTER;
1026 #endif /* QETH_IPV6 */
1027 card->options.checksum_type = QETH_CHECKSUM_DEFAULT;
1028 card->options.broadcast_mode = QETH_TR_BROADCAST_ALLRINGS;
1029 card->options.macaddr_mode = QETH_TR_MACADDR_NONCANONICAL;
1030 card->options.fake_broadcast = 0;
1031 card->options.add_hhlen = DEFAULT_ADD_HHLEN;
1032 card->options.fake_ll = 0;
1033 card->options.layer2 = 0;
1034 }
1035
1036 /**
1037 * initialize channels ,card and all state machines
1038 */
1039 static int
1040 qeth_setup_card(struct qeth_card *card)
1041 {
1042
1043 QETH_DBF_TEXT(setup, 2, "setupcrd");
1044 QETH_DBF_HEX(setup, 2, &card, sizeof(void *));
1045
1046 card->read.state = CH_STATE_DOWN;
1047 card->write.state = CH_STATE_DOWN;
1048 card->data.state = CH_STATE_DOWN;
1049 card->state = CARD_STATE_DOWN;
1050 card->lan_online = 0;
1051 card->use_hard_stop = 0;
1052 card->dev = NULL;
1053 #ifdef CONFIG_QETH_VLAN
1054 spin_lock_init(&card->vlanlock);
1055 card->vlangrp = NULL;
1056 #endif
1057 spin_lock_init(&card->ip_lock);
1058 spin_lock_init(&card->thread_mask_lock);
1059 card->thread_start_mask = 0;
1060 card->thread_allowed_mask = 0;
1061 card->thread_running_mask = 0;
1062 INIT_WORK(&card->kernel_thread_starter,
1063 (void *)qeth_start_kernel_thread,card);
1064 INIT_LIST_HEAD(&card->ip_list);
1065 card->ip_tbd_list = kmalloc(sizeof(struct list_head), GFP_KERNEL);
1066 if (!card->ip_tbd_list) {
1067 QETH_DBF_TEXT(setup, 0, "iptbdnom");
1068 return -ENOMEM;
1069 }
1070 INIT_LIST_HEAD(card->ip_tbd_list);
1071 INIT_LIST_HEAD(&card->cmd_waiter_list);
1072 init_waitqueue_head(&card->wait_q);
1073 /* intial options */
1074 qeth_set_intial_options(card);
1075 /* IP address takeover */
1076 INIT_LIST_HEAD(&card->ipato.entries);
1077 card->ipato.enabled = 0;
1078 card->ipato.invert4 = 0;
1079 card->ipato.invert6 = 0;
1080 /* init QDIO stuff */
1081 qeth_init_qdio_info(card);
1082 return 0;
1083 }
1084
1085 static int
1086 is_1920_device (struct qeth_card *card)
1087 {
1088 int single_queue = 0;
1089 struct ccw_device *ccwdev;
1090 struct channelPath_dsc {
1091 u8 flags;
1092 u8 lsn;
1093 u8 desc;
1094 u8 chpid;
1095 u8 swla;
1096 u8 zeroes;
1097 u8 chla;
1098 u8 chpp;
1099 } *chp_dsc;
1100
1101 QETH_DBF_TEXT(setup, 2, "chk_1920");
1102
1103 ccwdev = card->data.ccwdev;
1104 chp_dsc = (struct channelPath_dsc *)ccw_device_get_chp_desc(ccwdev, 0);
1105 if (chp_dsc != NULL) {
1106 /* CHPP field bit 6 == 1 -> single queue */
1107 single_queue = ((chp_dsc->chpp & 0x02) == 0x02);
1108 kfree(chp_dsc);
1109 }
1110 QETH_DBF_TEXT_(setup, 2, "rc:%x", single_queue);
1111 return single_queue;
1112 }
1113
1114 static int
1115 qeth_determine_card_type(struct qeth_card *card)
1116 {
1117 int i = 0;
1118
1119 QETH_DBF_TEXT(setup, 2, "detcdtyp");
1120
1121 while (known_devices[i][4]) {
1122 if ((CARD_RDEV(card)->id.dev_type == known_devices[i][2]) &&
1123 (CARD_RDEV(card)->id.dev_model == known_devices[i][3])) {
1124 card->info.type = known_devices[i][4];
1125 if (is_1920_device(card)) {
1126 PRINT_INFO("Priority Queueing not able "
1127 "due to hardware limitations!\n");
1128 card->qdio.no_out_queues = 1;
1129 card->qdio.default_out_queue = 0;
1130 } else {
1131 card->qdio.no_out_queues = known_devices[i][8];
1132 }
1133 card->info.is_multicast_different = known_devices[i][9];
1134 return 0;
1135 }
1136 i++;
1137 }
1138 card->info.type = QETH_CARD_TYPE_UNKNOWN;
1139 PRINT_ERR("unknown card type on device %s\n", CARD_BUS_ID(card));
1140 return -ENOENT;
1141 }
1142
1143 static int
1144 qeth_probe_device(struct ccwgroup_device *gdev)
1145 {
1146 struct qeth_card *card;
1147 struct device *dev;
1148 unsigned long flags;
1149 int rc;
1150
1151 QETH_DBF_TEXT(setup, 2, "probedev");
1152
1153 dev = &gdev->dev;
1154 if (!get_device(dev))
1155 return -ENODEV;
1156
1157 card = qeth_alloc_card();
1158 if (!card) {
1159 put_device(dev);
1160 QETH_DBF_TEXT_(setup, 2, "1err%d", -ENOMEM);
1161 return -ENOMEM;
1162 }
1163 card->read.ccwdev = gdev->cdev[0];
1164 card->write.ccwdev = gdev->cdev[1];
1165 card->data.ccwdev = gdev->cdev[2];
1166
1167 if ((rc = qeth_setup_card(card))){
1168 QETH_DBF_TEXT_(setup, 2, "2err%d", rc);
1169 put_device(dev);
1170 qeth_free_card(card);
1171 return rc;
1172 }
1173 gdev->dev.driver_data = card;
1174 card->gdev = gdev;
1175 gdev->cdev[0]->handler = qeth_irq;
1176 gdev->cdev[1]->handler = qeth_irq;
1177 gdev->cdev[2]->handler = qeth_irq;
1178
1179 rc = qeth_create_device_attributes(dev);
1180 if (rc) {
1181 put_device(dev);
1182 qeth_free_card(card);
1183 return rc;
1184 }
1185 if ((rc = qeth_determine_card_type(card))){
1186 PRINT_WARN("%s: not a valid card type\n", __func__);
1187 QETH_DBF_TEXT_(setup, 2, "3err%d", rc);
1188 put_device(dev);
1189 qeth_free_card(card);
1190 return rc;
1191 }
1192 /* insert into our internal list */
1193 write_lock_irqsave(&qeth_card_list.rwlock, flags);
1194 list_add_tail(&card->list, &qeth_card_list.list);
1195 write_unlock_irqrestore(&qeth_card_list.rwlock, flags);
1196 return rc;
1197 }
1198
1199
1200 static int
1201 qeth_get_unitaddr(struct qeth_card *card)
1202 {
1203 int length;
1204 char *prcd;
1205 int rc;
1206
1207 QETH_DBF_TEXT(setup, 2, "getunit");
1208 rc = read_conf_data(CARD_DDEV(card), (void **) &prcd, &length);
1209 if (rc) {
1210 PRINT_ERR("read_conf_data for device %s returned %i\n",
1211 CARD_DDEV_ID(card), rc);
1212 return rc;
1213 }
1214 card->info.chpid = prcd[30];
1215 card->info.unit_addr2 = prcd[31];
1216 card->info.cula = prcd[63];
1217 card->info.guestlan = ((prcd[0x10] == _ascebc['V']) &&
1218 (prcd[0x11] == _ascebc['M']));
1219 return 0;
1220 }
1221
1222 static void
1223 qeth_init_tokens(struct qeth_card *card)
1224 {
1225 card->token.issuer_rm_w = 0x00010103UL;
1226 card->token.cm_filter_w = 0x00010108UL;
1227 card->token.cm_connection_w = 0x0001010aUL;
1228 card->token.ulp_filter_w = 0x0001010bUL;
1229 card->token.ulp_connection_w = 0x0001010dUL;
1230 }
1231
1232 static inline __u16
1233 raw_devno_from_bus_id(char *id)
1234 {
1235 id += (strlen(id) - 4);
1236 return (__u16) simple_strtoul(id, &id, 16);
1237 }
1238 /**
1239 * setup channel
1240 */
1241 static void
1242 qeth_setup_ccw(struct qeth_channel *channel,unsigned char *iob, __u32 len)
1243 {
1244 struct qeth_card *card;
1245
1246 QETH_DBF_TEXT(trace, 4, "setupccw");
1247 card = CARD_FROM_CDEV(channel->ccwdev);
1248 if (channel == &card->read)
1249 memcpy(&channel->ccw, READ_CCW, sizeof(struct ccw1));
1250 else
1251 memcpy(&channel->ccw, WRITE_CCW, sizeof(struct ccw1));
1252 channel->ccw.count = len;
1253 channel->ccw.cda = (__u32) __pa(iob);
1254 }
1255
1256 /**
1257 * get free buffer for ccws (IDX activation, lancmds,ipassists...)
1258 */
1259 static struct qeth_cmd_buffer *
1260 __qeth_get_buffer(struct qeth_channel *channel)
1261 {
1262 __u8 index;
1263
1264 QETH_DBF_TEXT(trace, 6, "getbuff");
1265 index = channel->io_buf_no;
1266 do {
1267 if (channel->iob[index].state == BUF_STATE_FREE) {
1268 channel->iob[index].state = BUF_STATE_LOCKED;
1269 channel->io_buf_no = (channel->io_buf_no + 1) %
1270 QETH_CMD_BUFFER_NO;
1271 memset(channel->iob[index].data, 0, QETH_BUFSIZE);
1272 return channel->iob + index;
1273 }
1274 index = (index + 1) % QETH_CMD_BUFFER_NO;
1275 } while(index != channel->io_buf_no);
1276
1277 return NULL;
1278 }
1279
1280 /**
1281 * release command buffer
1282 */
1283 static void
1284 qeth_release_buffer(struct qeth_channel *channel, struct qeth_cmd_buffer *iob)
1285 {
1286 unsigned long flags;
1287
1288 QETH_DBF_TEXT(trace, 6, "relbuff");
1289 spin_lock_irqsave(&channel->iob_lock, flags);
1290 memset(iob->data, 0, QETH_BUFSIZE);
1291 iob->state = BUF_STATE_FREE;
1292 iob->callback = qeth_send_control_data_cb;
1293 iob->rc = 0;
1294 spin_unlock_irqrestore(&channel->iob_lock, flags);
1295 }
1296
1297 static struct qeth_cmd_buffer *
1298 qeth_get_buffer(struct qeth_channel *channel)
1299 {
1300 struct qeth_cmd_buffer *buffer = NULL;
1301 unsigned long flags;
1302
1303 spin_lock_irqsave(&channel->iob_lock, flags);
1304 buffer = __qeth_get_buffer(channel);
1305 spin_unlock_irqrestore(&channel->iob_lock, flags);
1306 return buffer;
1307 }
1308
1309 static struct qeth_cmd_buffer *
1310 qeth_wait_for_buffer(struct qeth_channel *channel)
1311 {
1312 struct qeth_cmd_buffer *buffer;
1313 wait_event(channel->wait_q,
1314 ((buffer = qeth_get_buffer(channel)) != NULL));
1315 return buffer;
1316 }
1317
1318 static void
1319 qeth_clear_cmd_buffers(struct qeth_channel *channel)
1320 {
1321 int cnt = 0;
1322
1323 for (cnt=0; cnt < QETH_CMD_BUFFER_NO; cnt++)
1324 qeth_release_buffer(channel,&channel->iob[cnt]);
1325 channel->buf_no = 0;
1326 channel->io_buf_no = 0;
1327 }
1328
1329 /**
1330 * start IDX for read and write channel
1331 */
1332 static int
1333 qeth_idx_activate_get_answer(struct qeth_channel *channel,
1334 void (*idx_reply_cb)(struct qeth_channel *,
1335 struct qeth_cmd_buffer *))
1336 {
1337 struct qeth_cmd_buffer *iob;
1338 unsigned long flags;
1339 int rc;
1340 struct qeth_card *card;
1341
1342 QETH_DBF_TEXT(setup, 2, "idxanswr");
1343 card = CARD_FROM_CDEV(channel->ccwdev);
1344 iob = qeth_get_buffer(channel);
1345 iob->callback = idx_reply_cb;
1346 memcpy(&channel->ccw, READ_CCW, sizeof(struct ccw1));
1347 channel->ccw.count = QETH_BUFSIZE;
1348 channel->ccw.cda = (__u32) __pa(iob->data);
1349
1350 wait_event(card->wait_q,
1351 atomic_compare_and_swap(0,1,&channel->irq_pending) == 0);
1352 QETH_DBF_TEXT(setup, 6, "noirqpnd");
1353 spin_lock_irqsave(get_ccwdev_lock(channel->ccwdev), flags);
1354 rc = ccw_device_start(channel->ccwdev,
1355 &channel->ccw,(addr_t) iob, 0, 0);
1356 spin_unlock_irqrestore(get_ccwdev_lock(channel->ccwdev), flags);
1357
1358 if (rc) {
1359 PRINT_ERR("qeth: Error2 in activating channel rc=%d\n",rc);
1360 QETH_DBF_TEXT_(setup, 2, "2err%d", rc);
1361 atomic_set(&channel->irq_pending, 0);
1362 wake_up(&card->wait_q);
1363 return rc;
1364 }
1365 rc = wait_event_interruptible_timeout(card->wait_q,
1366 channel->state == CH_STATE_UP, QETH_TIMEOUT);
1367 if (rc == -ERESTARTSYS)
1368 return rc;
1369 if (channel->state != CH_STATE_UP){
1370 rc = -ETIME;
1371 QETH_DBF_TEXT_(setup, 2, "3err%d", rc);
1372 qeth_clear_cmd_buffers(channel);
1373 } else
1374 rc = 0;
1375 return rc;
1376 }
1377
1378 static int
1379 qeth_idx_activate_channel(struct qeth_channel *channel,
1380 void (*idx_reply_cb)(struct qeth_channel *,
1381 struct qeth_cmd_buffer *))
1382 {
1383 struct qeth_card *card;
1384 struct qeth_cmd_buffer *iob;
1385 unsigned long flags;
1386 __u16 temp;
1387 int rc;
1388
1389 card = CARD_FROM_CDEV(channel->ccwdev);
1390
1391 QETH_DBF_TEXT(setup, 2, "idxactch");
1392
1393 iob = qeth_get_buffer(channel);
1394 iob->callback = idx_reply_cb;
1395 memcpy(&channel->ccw, WRITE_CCW, sizeof(struct ccw1));
1396 channel->ccw.count = IDX_ACTIVATE_SIZE;
1397 channel->ccw.cda = (__u32) __pa(iob->data);
1398 if (channel == &card->write) {
1399 memcpy(iob->data, IDX_ACTIVATE_WRITE, IDX_ACTIVATE_SIZE);
1400 memcpy(QETH_TRANSPORT_HEADER_SEQ_NO(iob->data),
1401 &card->seqno.trans_hdr, QETH_SEQ_NO_LENGTH);
1402 card->seqno.trans_hdr++;
1403 } else {
1404 memcpy(iob->data, IDX_ACTIVATE_READ, IDX_ACTIVATE_SIZE);
1405 memcpy(QETH_TRANSPORT_HEADER_SEQ_NO(iob->data),
1406 &card->seqno.trans_hdr, QETH_SEQ_NO_LENGTH);
1407 }
1408 memcpy(QETH_IDX_ACT_ISSUER_RM_TOKEN(iob->data),
1409 &card->token.issuer_rm_w,QETH_MPC_TOKEN_LENGTH);
1410 memcpy(QETH_IDX_ACT_FUNC_LEVEL(iob->data),
1411 &card->info.func_level,sizeof(__u16));
1412 temp = raw_devno_from_bus_id(CARD_DDEV_ID(card));
1413 memcpy(QETH_IDX_ACT_QDIO_DEV_CUA(iob->data), &temp, 2);
1414 temp = (card->info.cula << 8) + card->info.unit_addr2;
1415 memcpy(QETH_IDX_ACT_QDIO_DEV_REALADDR(iob->data), &temp, 2);
1416
1417 wait_event(card->wait_q,
1418 atomic_compare_and_swap(0,1,&channel->irq_pending) == 0);
1419 QETH_DBF_TEXT(setup, 6, "noirqpnd");
1420 spin_lock_irqsave(get_ccwdev_lock(channel->ccwdev), flags);
1421 rc = ccw_device_start(channel->ccwdev,
1422 &channel->ccw,(addr_t) iob, 0, 0);
1423 spin_unlock_irqrestore(get_ccwdev_lock(channel->ccwdev), flags);
1424
1425 if (rc) {
1426 PRINT_ERR("qeth: Error1 in activating channel. rc=%d\n",rc);
1427 QETH_DBF_TEXT_(setup, 2, "1err%d", rc);
1428 atomic_set(&channel->irq_pending, 0);
1429 wake_up(&card->wait_q);
1430 return rc;
1431 }
1432 rc = wait_event_interruptible_timeout(card->wait_q,
1433 channel->state == CH_STATE_ACTIVATING, QETH_TIMEOUT);
1434 if (rc == -ERESTARTSYS)
1435 return rc;
1436 if (channel->state != CH_STATE_ACTIVATING) {
1437 PRINT_WARN("qeth: IDX activate timed out!\n");
1438 QETH_DBF_TEXT_(setup, 2, "2err%d", -ETIME);
1439 qeth_clear_cmd_buffers(channel);
1440 return -ETIME;
1441 }
1442 return qeth_idx_activate_get_answer(channel,idx_reply_cb);
1443 }
1444
1445 static int
1446 qeth_peer_func_level(int level)
1447 {
1448 if ((level & 0xff) == 8)
1449 return (level & 0xff) + 0x400;
1450 if (((level >> 8) & 3) == 1)
1451 return (level & 0xff) + 0x200;
1452 return level;
1453 }
1454
1455 static void
1456 qeth_idx_write_cb(struct qeth_channel *channel, struct qeth_cmd_buffer *iob)
1457 {
1458 struct qeth_card *card;
1459 __u16 temp;
1460
1461 QETH_DBF_TEXT(setup ,2, "idxwrcb");
1462
1463 if (channel->state == CH_STATE_DOWN) {
1464 channel->state = CH_STATE_ACTIVATING;
1465 goto out;
1466 }
1467 card = CARD_FROM_CDEV(channel->ccwdev);
1468
1469 if (!(QETH_IS_IDX_ACT_POS_REPLY(iob->data))) {
1470 PRINT_ERR("IDX_ACTIVATE on write channel device %s: negative "
1471 "reply\n", CARD_WDEV_ID(card));
1472 goto out;
1473 }
1474 memcpy(&temp, QETH_IDX_ACT_FUNC_LEVEL(iob->data), 2);
1475 if ((temp & ~0x0100) != qeth_peer_func_level(card->info.func_level)) {
1476 PRINT_WARN("IDX_ACTIVATE on write channel device %s: "
1477 "function level mismatch "
1478 "(sent: 0x%x, received: 0x%x)\n",
1479 CARD_WDEV_ID(card), card->info.func_level, temp);
1480 goto out;
1481 }
1482 channel->state = CH_STATE_UP;
1483 out:
1484 qeth_release_buffer(channel, iob);
1485 }
1486
1487 static int
1488 qeth_check_idx_response(unsigned char *buffer)
1489 {
1490 if (!buffer)
1491 return 0;
1492
1493 QETH_DBF_HEX(control, 2, buffer, QETH_DBF_CONTROL_LEN);
1494 if ((buffer[2] & 0xc0) == 0xc0) {
1495 PRINT_WARN("received an IDX TERMINATE "
1496 "with cause code 0x%02x%s\n",
1497 buffer[4],
1498 ((buffer[4] == 0x22) ?
1499 " -- try another portname" : ""));
1500 QETH_DBF_TEXT(trace, 2, "ckidxres");
1501 QETH_DBF_TEXT(trace, 2, " idxterm");
1502 QETH_DBF_TEXT_(trace, 2, " rc%d", -EIO);
1503 return -EIO;
1504 }
1505 return 0;
1506 }
1507
1508 static void
1509 qeth_idx_read_cb(struct qeth_channel *channel, struct qeth_cmd_buffer *iob)
1510 {
1511 struct qeth_card *card;
1512 __u16 temp;
1513
1514 QETH_DBF_TEXT(setup , 2, "idxrdcb");
1515 if (channel->state == CH_STATE_DOWN) {
1516 channel->state = CH_STATE_ACTIVATING;
1517 goto out;
1518 }
1519
1520 card = CARD_FROM_CDEV(channel->ccwdev);
1521 if (qeth_check_idx_response(iob->data)) {
1522 goto out;
1523 }
1524 if (!(QETH_IS_IDX_ACT_POS_REPLY(iob->data))) {
1525 PRINT_ERR("IDX_ACTIVATE on read channel device %s: negative "
1526 "reply\n", CARD_RDEV_ID(card));
1527 goto out;
1528 }
1529
1530 /**
1531 * temporary fix for microcode bug
1532 * to revert it,replace OR by AND
1533 */
1534 if ( (!QETH_IDX_NO_PORTNAME_REQUIRED(iob->data)) ||
1535 (card->info.type == QETH_CARD_TYPE_OSAE) )
1536 card->info.portname_required = 1;
1537
1538 memcpy(&temp, QETH_IDX_ACT_FUNC_LEVEL(iob->data), 2);
1539 if (temp != qeth_peer_func_level(card->info.func_level)) {
1540 PRINT_WARN("IDX_ACTIVATE on read channel device %s: function "
1541 "level mismatch (sent: 0x%x, received: 0x%x)\n",
1542 CARD_RDEV_ID(card), card->info.func_level, temp);
1543 goto out;
1544 }
1545 memcpy(&card->token.issuer_rm_r,
1546 QETH_IDX_ACT_ISSUER_RM_TOKEN(iob->data),
1547 QETH_MPC_TOKEN_LENGTH);
1548 memcpy(&card->info.mcl_level[0],
1549 QETH_IDX_REPLY_LEVEL(iob->data), QETH_MCL_LENGTH);
1550 channel->state = CH_STATE_UP;
1551 out:
1552 qeth_release_buffer(channel,iob);
1553 }
1554
1555 static int
1556 qeth_issue_next_read(struct qeth_card *card)
1557 {
1558 int rc;
1559 struct qeth_cmd_buffer *iob;
1560
1561 QETH_DBF_TEXT(trace,5,"issnxrd");
1562 if (card->read.state != CH_STATE_UP)
1563 return -EIO;
1564 iob = qeth_get_buffer(&card->read);
1565 if (!iob) {
1566 PRINT_WARN("issue_next_read failed: no iob available!\n");
1567 return -ENOMEM;
1568 }
1569 qeth_setup_ccw(&card->read, iob->data, QETH_BUFSIZE);
1570 wait_event(card->wait_q,
1571 atomic_compare_and_swap(0,1,&card->read.irq_pending) == 0);
1572 QETH_DBF_TEXT(trace, 6, "noirqpnd");
1573 rc = ccw_device_start(card->read.ccwdev, &card->read.ccw,
1574 (addr_t) iob, 0, 0);
1575 if (rc) {
1576 PRINT_ERR("Error in starting next read ccw! rc=%i\n", rc);
1577 atomic_set(&card->read.irq_pending, 0);
1578 qeth_schedule_recovery(card);
1579 wake_up(&card->wait_q);
1580 }
1581 return rc;
1582 }
1583
1584 static struct qeth_reply *
1585 qeth_alloc_reply(struct qeth_card *card)
1586 {
1587 struct qeth_reply *reply;
1588
1589 reply = kmalloc(sizeof(struct qeth_reply), GFP_ATOMIC);
1590 if (reply){
1591 memset(reply, 0, sizeof(struct qeth_reply));
1592 atomic_set(&reply->refcnt, 1);
1593 reply->card = card;
1594 };
1595 return reply;
1596 }
1597
1598 static void
1599 qeth_get_reply(struct qeth_reply *reply)
1600 {
1601 WARN_ON(atomic_read(&reply->refcnt) <= 0);
1602 atomic_inc(&reply->refcnt);
1603 }
1604
1605 static void
1606 qeth_put_reply(struct qeth_reply *reply)
1607 {
1608 WARN_ON(atomic_read(&reply->refcnt) <= 0);
1609 if (atomic_dec_and_test(&reply->refcnt))
1610 kfree(reply);
1611 }
1612
1613 static void
1614 qeth_cmd_timeout(unsigned long data)
1615 {
1616 struct qeth_reply *reply, *list_reply, *r;
1617 unsigned long flags;
1618
1619 reply = (struct qeth_reply *) data;
1620 spin_lock_irqsave(&reply->card->lock, flags);
1621 list_for_each_entry_safe(list_reply, r,
1622 &reply->card->cmd_waiter_list, list) {
1623 if (reply == list_reply){
1624 qeth_get_reply(reply);
1625 list_del_init(&reply->list);
1626 spin_unlock_irqrestore(&reply->card->lock, flags);
1627 reply->rc = -ETIME;
1628 reply->received = 1;
1629 wake_up(&reply->wait_q);
1630 qeth_put_reply(reply);
1631 return;
1632 }
1633 }
1634 spin_unlock_irqrestore(&reply->card->lock, flags);
1635 }
1636
1637 static void
1638 qeth_reset_ip_addresses(struct qeth_card *card)
1639 {
1640 QETH_DBF_TEXT(trace, 2, "rstipadd");
1641
1642 qeth_clear_ip_list(card, 0, 1);
1643 /* this function will also schedule the SET_IP_THREAD */
1644 qeth_set_multicast_list(card->dev);
1645 }
1646
1647 static struct qeth_ipa_cmd *
1648 qeth_check_ipa_data(struct qeth_card *card, struct qeth_cmd_buffer *iob)
1649 {
1650 struct qeth_ipa_cmd *cmd = NULL;
1651
1652 QETH_DBF_TEXT(trace,5,"chkipad");
1653 if (IS_IPA(iob->data)){
1654 cmd = (struct qeth_ipa_cmd *) PDU_ENCAPSULATION(iob->data);
1655 if (IS_IPA_REPLY(cmd))
1656 return cmd;
1657 else {
1658 switch (cmd->hdr.command) {
1659 case IPA_CMD_STOPLAN:
1660 PRINT_WARN("Link failure on %s (CHPID 0x%X) - "
1661 "there is a network problem or "
1662 "someone pulled the cable or "
1663 "disabled the port.\n",
1664 QETH_CARD_IFNAME(card),
1665 card->info.chpid);
1666 card->lan_online = 0;
1667 netif_carrier_off(card->dev);
1668 return NULL;
1669 case IPA_CMD_STARTLAN:
1670 PRINT_INFO("Link reestablished on %s "
1671 "(CHPID 0x%X). Scheduling "
1672 "IP address reset.\n",
1673 QETH_CARD_IFNAME(card),
1674 card->info.chpid);
1675 card->lan_online = 1;
1676 netif_carrier_on(card->dev);
1677 qeth_reset_ip_addresses(card);
1678 return NULL;
1679 case IPA_CMD_REGISTER_LOCAL_ADDR:
1680 QETH_DBF_TEXT(trace,3, "irla");
1681 break;
1682 case IPA_CMD_UNREGISTER_LOCAL_ADDR:
1683 QETH_DBF_TEXT(trace,3, "urla");
1684 break;
1685 default:
1686 PRINT_WARN("Received data is IPA "
1687 "but not a reply!\n");
1688 break;
1689 }
1690 }
1691 }
1692 return cmd;
1693 }
1694
1695 /**
1696 * wake all waiting ipa commands
1697 */
1698 static void
1699 qeth_clear_ipacmd_list(struct qeth_card *card)
1700 {
1701 struct qeth_reply *reply, *r;
1702 unsigned long flags;
1703
1704 QETH_DBF_TEXT(trace, 4, "clipalst");
1705
1706 spin_lock_irqsave(&card->lock, flags);
1707 list_for_each_entry_safe(reply, r, &card->cmd_waiter_list, list) {
1708 qeth_get_reply(reply);
1709 reply->rc = -EIO;
1710 reply->received = 1;
1711 list_del_init(&reply->list);
1712 wake_up(&reply->wait_q);
1713 qeth_put_reply(reply);
1714 }
1715 spin_unlock_irqrestore(&card->lock, flags);
1716 }
1717
1718 static void
1719 qeth_send_control_data_cb(struct qeth_channel *channel,
1720 struct qeth_cmd_buffer *iob)
1721 {
1722 struct qeth_card *card;
1723 struct qeth_reply *reply, *r;
1724 struct qeth_ipa_cmd *cmd;
1725 unsigned long flags;
1726 int keep_reply;
1727
1728 QETH_DBF_TEXT(trace,4,"sndctlcb");
1729
1730 card = CARD_FROM_CDEV(channel->ccwdev);
1731 if (qeth_check_idx_response(iob->data)) {
1732 qeth_clear_ipacmd_list(card);
1733 qeth_schedule_recovery(card);
1734 goto out;
1735 }
1736
1737 cmd = qeth_check_ipa_data(card, iob);
1738 if ((cmd == NULL) && (card->state != CARD_STATE_DOWN))
1739 goto out;
1740
1741 spin_lock_irqsave(&card->lock, flags);
1742 list_for_each_entry_safe(reply, r, &card->cmd_waiter_list, list) {
1743 if ((reply->seqno == QETH_IDX_COMMAND_SEQNO) ||
1744 ((cmd) && (reply->seqno == cmd->hdr.seqno))) {
1745 qeth_get_reply(reply);
1746 list_del_init(&reply->list);
1747 spin_unlock_irqrestore(&card->lock, flags);
1748 keep_reply = 0;
1749 if (reply->callback != NULL) {
1750 if (cmd) {
1751 reply->offset = (__u16)((char*)cmd -
1752 (char *)iob->data);
1753 keep_reply = reply->callback(card,
1754 reply,
1755 (unsigned long)cmd);
1756 }
1757 else
1758 keep_reply = reply->callback(card,
1759 reply,
1760 (unsigned long)iob);
1761 }
1762 if (cmd)
1763 reply->rc = (u16) cmd->hdr.return_code;
1764 else if (iob->rc)
1765 reply->rc = iob->rc;
1766 if (keep_reply) {
1767 spin_lock_irqsave(&card->lock, flags);
1768 list_add_tail(&reply->list,
1769 &card->cmd_waiter_list);
1770 spin_unlock_irqrestore(&card->lock, flags);
1771 } else {
1772 reply->received = 1;
1773 wake_up(&reply->wait_q);
1774 }
1775 qeth_put_reply(reply);
1776 goto out;
1777 }
1778 }
1779 spin_unlock_irqrestore(&card->lock, flags);
1780 out:
1781 memcpy(&card->seqno.pdu_hdr_ack,
1782 QETH_PDU_HEADER_SEQ_NO(iob->data),
1783 QETH_SEQ_NO_LENGTH);
1784 qeth_release_buffer(channel,iob);
1785 }
1786
1787 static int
1788 qeth_send_control_data(struct qeth_card *card, int len,
1789 struct qeth_cmd_buffer *iob,
1790 int (*reply_cb)
1791 (struct qeth_card *, struct qeth_reply*, unsigned long),
1792 void *reply_param)
1793
1794 {
1795 int rc;
1796 unsigned long flags;
1797 struct qeth_reply *reply;
1798 struct timer_list timer;
1799
1800 QETH_DBF_TEXT(trace, 2, "sendctl");
1801
1802 qeth_setup_ccw(&card->write,iob->data,len);
1803
1804 memcpy(QETH_TRANSPORT_HEADER_SEQ_NO(iob->data),
1805 &card->seqno.trans_hdr, QETH_SEQ_NO_LENGTH);
1806 card->seqno.trans_hdr++;
1807
1808 memcpy(QETH_PDU_HEADER_SEQ_NO(iob->data),
1809 &card->seqno.pdu_hdr, QETH_SEQ_NO_LENGTH);
1810 card->seqno.pdu_hdr++;
1811 memcpy(QETH_PDU_HEADER_ACK_SEQ_NO(iob->data),
1812 &card->seqno.pdu_hdr_ack, QETH_SEQ_NO_LENGTH);
1813 iob->callback = qeth_release_buffer;
1814
1815 reply = qeth_alloc_reply(card);
1816 if (!reply) {
1817 PRINT_WARN("Could no alloc qeth_reply!\n");
1818 return -ENOMEM;
1819 }
1820 reply->callback = reply_cb;
1821 reply->param = reply_param;
1822 if (card->state == CARD_STATE_DOWN)
1823 reply->seqno = QETH_IDX_COMMAND_SEQNO;
1824 else
1825 reply->seqno = card->seqno.ipa++;
1826 init_timer(&timer);
1827 timer.function = qeth_cmd_timeout;
1828 timer.data = (unsigned long) reply;
1829 if (IS_IPA(iob->data))
1830 timer.expires = jiffies + QETH_IPA_TIMEOUT;
1831 else
1832 timer.expires = jiffies + QETH_TIMEOUT;
1833 init_waitqueue_head(&reply->wait_q);
1834 spin_lock_irqsave(&card->lock, flags);
1835 list_add_tail(&reply->list, &card->cmd_waiter_list);
1836 spin_unlock_irqrestore(&card->lock, flags);
1837 QETH_DBF_HEX(control, 2, iob->data, QETH_DBF_CONTROL_LEN);
1838 wait_event(card->wait_q,
1839 atomic_compare_and_swap(0,1,&card->write.irq_pending) == 0);
1840 QETH_DBF_TEXT(trace, 6, "noirqpnd");
1841 spin_lock_irqsave(get_ccwdev_lock(card->write.ccwdev), flags);
1842 rc = ccw_device_start(card->write.ccwdev, &card->write.ccw,
1843 (addr_t) iob, 0, 0);
1844 spin_unlock_irqrestore(get_ccwdev_lock(card->write.ccwdev), flags);
1845 if (rc){
1846 PRINT_WARN("qeth_send_control_data: "
1847 "ccw_device_start rc = %i\n", rc);
1848 QETH_DBF_TEXT_(trace, 2, " err%d", rc);
1849 spin_lock_irqsave(&card->lock, flags);
1850 list_del_init(&reply->list);
1851 qeth_put_reply(reply);
1852 spin_unlock_irqrestore(&card->lock, flags);
1853 qeth_release_buffer(iob->channel, iob);
1854 atomic_set(&card->write.irq_pending, 0);
1855 wake_up(&card->wait_q);
1856 return rc;
1857 }
1858 add_timer(&timer);
1859 wait_event(reply->wait_q, reply->received);
1860 del_timer_sync(&timer);
1861 rc = reply->rc;
1862 qeth_put_reply(reply);
1863 return rc;
1864 }
1865
1866 static int
1867 qeth_send_ipa_cmd(struct qeth_card *card, struct qeth_cmd_buffer *iob,
1868 int (*reply_cb)
1869 (struct qeth_card *,struct qeth_reply*, unsigned long),
1870 void *reply_param)
1871 {
1872 int rc;
1873 char prot_type;
1874
1875 QETH_DBF_TEXT(trace,4,"sendipa");
1876
1877 memcpy(iob->data, IPA_PDU_HEADER, IPA_PDU_HEADER_SIZE);
1878
1879 if (card->options.layer2)
1880 prot_type = QETH_PROT_LAYER2;
1881 else
1882 prot_type = QETH_PROT_TCPIP;
1883
1884 memcpy(QETH_IPA_CMD_PROT_TYPE(iob->data),&prot_type,1);
1885 memcpy(QETH_IPA_CMD_DEST_ADDR(iob->data),
1886 &card->token.ulp_connection_r, QETH_MPC_TOKEN_LENGTH);
1887
1888 rc = qeth_send_control_data(card, IPA_CMD_LENGTH, iob,
1889 reply_cb, reply_param);
1890 return rc;
1891 }
1892
1893
1894 static int
1895 qeth_cm_enable_cb(struct qeth_card *card, struct qeth_reply *reply,
1896 unsigned long data)
1897 {
1898 struct qeth_cmd_buffer *iob;
1899
1900 QETH_DBF_TEXT(setup, 2, "cmenblcb");
1901
1902 iob = (struct qeth_cmd_buffer *) data;
1903 memcpy(&card->token.cm_filter_r,
1904 QETH_CM_ENABLE_RESP_FILTER_TOKEN(iob->data),
1905 QETH_MPC_TOKEN_LENGTH);
1906 QETH_DBF_TEXT_(setup, 2, " rc%d", iob->rc);
1907 return 0;
1908 }
1909
1910 static int
1911 qeth_cm_enable(struct qeth_card *card)
1912 {
1913 int rc;
1914 struct qeth_cmd_buffer *iob;
1915
1916 QETH_DBF_TEXT(setup,2,"cmenable");
1917
1918 iob = qeth_wait_for_buffer(&card->write);
1919 memcpy(iob->data, CM_ENABLE, CM_ENABLE_SIZE);
1920 memcpy(QETH_CM_ENABLE_ISSUER_RM_TOKEN(iob->data),
1921 &card->token.issuer_rm_r, QETH_MPC_TOKEN_LENGTH);
1922 memcpy(QETH_CM_ENABLE_FILTER_TOKEN(iob->data),
1923 &card->token.cm_filter_w, QETH_MPC_TOKEN_LENGTH);
1924
1925 rc = qeth_send_control_data(card, CM_ENABLE_SIZE, iob,
1926 qeth_cm_enable_cb, NULL);
1927 return rc;
1928 }
1929
1930 static int
1931 qeth_cm_setup_cb(struct qeth_card *card, struct qeth_reply *reply,
1932 unsigned long data)
1933 {
1934
1935 struct qeth_cmd_buffer *iob;
1936
1937 QETH_DBF_TEXT(setup, 2, "cmsetpcb");
1938
1939 iob = (struct qeth_cmd_buffer *) data;
1940 memcpy(&card->token.cm_connection_r,
1941 QETH_CM_SETUP_RESP_DEST_ADDR(iob->data),
1942 QETH_MPC_TOKEN_LENGTH);
1943 QETH_DBF_TEXT_(setup, 2, " rc%d", iob->rc);
1944 return 0;
1945 }
1946
1947 static int
1948 qeth_cm_setup(struct qeth_card *card)
1949 {
1950 int rc;
1951 struct qeth_cmd_buffer *iob;
1952
1953 QETH_DBF_TEXT(setup,2,"cmsetup");
1954
1955 iob = qeth_wait_for_buffer(&card->write);
1956 memcpy(iob->data, CM_SETUP, CM_SETUP_SIZE);
1957 memcpy(QETH_CM_SETUP_DEST_ADDR(iob->data),
1958 &card->token.issuer_rm_r, QETH_MPC_TOKEN_LENGTH);
1959 memcpy(QETH_CM_SETUP_CONNECTION_TOKEN(iob->data),
1960 &card->token.cm_connection_w, QETH_MPC_TOKEN_LENGTH);
1961 memcpy(QETH_CM_SETUP_FILTER_TOKEN(iob->data),
1962 &card->token.cm_filter_r, QETH_MPC_TOKEN_LENGTH);
1963 rc = qeth_send_control_data(card, CM_SETUP_SIZE, iob,
1964 qeth_cm_setup_cb, NULL);
1965 return rc;
1966
1967 }
1968
1969 static int
1970 qeth_ulp_enable_cb(struct qeth_card *card, struct qeth_reply *reply,
1971 unsigned long data)
1972 {
1973
1974 __u16 mtu, framesize;
1975 __u16 len;
1976 __u8 link_type;
1977 struct qeth_cmd_buffer *iob;
1978
1979 QETH_DBF_TEXT(setup, 2, "ulpenacb");
1980
1981 iob = (struct qeth_cmd_buffer *) data;
1982 memcpy(&card->token.ulp_filter_r,
1983 QETH_ULP_ENABLE_RESP_FILTER_TOKEN(iob->data),
1984 QETH_MPC_TOKEN_LENGTH);
1985 if (qeth_get_mtu_out_of_mpc(card->info.type)) {
1986 memcpy(&framesize, QETH_ULP_ENABLE_RESP_MAX_MTU(iob->data), 2);
1987 mtu = qeth_get_mtu_outof_framesize(framesize);
1988 if (!mtu) {
1989 iob->rc = -EINVAL;
1990 QETH_DBF_TEXT_(setup, 2, " rc%d", iob->rc);
1991 return 0;
1992 }
1993 card->info.max_mtu = mtu;
1994 card->info.initial_mtu = mtu;
1995 card->qdio.in_buf_size = mtu + 2 * PAGE_SIZE;
1996 } else {
1997 card->info.initial_mtu = qeth_get_initial_mtu_for_card(card);
1998 card->info.max_mtu = qeth_get_max_mtu_for_card(card->info.type);
1999 card->qdio.in_buf_size = QETH_IN_BUF_SIZE_DEFAULT;
2000 }
2001
2002 memcpy(&len, QETH_ULP_ENABLE_RESP_DIFINFO_LEN(iob->data), 2);
2003 if (len >= QETH_MPC_DIFINFO_LEN_INDICATES_LINK_TYPE) {
2004 memcpy(&link_type,
2005 QETH_ULP_ENABLE_RESP_LINK_TYPE(iob->data), 1);
2006 card->info.link_type = link_type;
2007 } else
2008 card->info.link_type = 0;
2009 QETH_DBF_TEXT_(setup, 2, " rc%d", iob->rc);
2010 return 0;
2011 }
2012
2013 static int
2014 qeth_ulp_enable(struct qeth_card *card)
2015 {
2016 int rc;
2017 char prot_type;
2018 struct qeth_cmd_buffer *iob;
2019
2020 /*FIXME: trace view callbacks*/
2021 QETH_DBF_TEXT(setup,2,"ulpenabl");
2022
2023 iob = qeth_wait_for_buffer(&card->write);
2024 memcpy(iob->data, ULP_ENABLE, ULP_ENABLE_SIZE);
2025
2026 *(QETH_ULP_ENABLE_LINKNUM(iob->data)) =
2027 (__u8) card->info.portno;
2028 if (card->options.layer2)
2029 prot_type = QETH_PROT_LAYER2;
2030 else
2031 prot_type = QETH_PROT_TCPIP;
2032
2033 memcpy(QETH_ULP_ENABLE_PROT_TYPE(iob->data),&prot_type,1);
2034 memcpy(QETH_ULP_ENABLE_DEST_ADDR(iob->data),
2035 &card->token.cm_connection_r, QETH_MPC_TOKEN_LENGTH);
2036 memcpy(QETH_ULP_ENABLE_FILTER_TOKEN(iob->data),
2037 &card->token.ulp_filter_w, QETH_MPC_TOKEN_LENGTH);
2038 memcpy(QETH_ULP_ENABLE_PORTNAME_AND_LL(iob->data),
2039 card->info.portname, 9);
2040 rc = qeth_send_control_data(card, ULP_ENABLE_SIZE, iob,
2041 qeth_ulp_enable_cb, NULL);
2042 return rc;
2043
2044 }
2045
2046 static inline __u16
2047 __raw_devno_from_bus_id(char *id)
2048 {
2049 id += (strlen(id) - 4);
2050 return (__u16) simple_strtoul(id, &id, 16);
2051 }
2052
2053 static int
2054 qeth_ulp_setup_cb(struct qeth_card *card, struct qeth_reply *reply,
2055 unsigned long data)
2056 {
2057 struct qeth_cmd_buffer *iob;
2058
2059 QETH_DBF_TEXT(setup, 2, "ulpstpcb");
2060
2061 iob = (struct qeth_cmd_buffer *) data;
2062 memcpy(&card->token.ulp_connection_r,
2063 QETH_ULP_SETUP_RESP_CONNECTION_TOKEN(iob->data),
2064 QETH_MPC_TOKEN_LENGTH);
2065 QETH_DBF_TEXT_(setup, 2, " rc%d", iob->rc);
2066 return 0;
2067 }
2068
2069 static int
2070 qeth_ulp_setup(struct qeth_card *card)
2071 {
2072 int rc;
2073 __u16 temp;
2074 struct qeth_cmd_buffer *iob;
2075
2076 QETH_DBF_TEXT(setup,2,"ulpsetup");
2077
2078 iob = qeth_wait_for_buffer(&card->write);
2079 memcpy(iob->data, ULP_SETUP, ULP_SETUP_SIZE);
2080
2081 memcpy(QETH_ULP_SETUP_DEST_ADDR(iob->data),
2082 &card->token.cm_connection_r, QETH_MPC_TOKEN_LENGTH);
2083 memcpy(QETH_ULP_SETUP_CONNECTION_TOKEN(iob->data),
2084 &card->token.ulp_connection_w, QETH_MPC_TOKEN_LENGTH);
2085 memcpy(QETH_ULP_SETUP_FILTER_TOKEN(iob->data),
2086 &card->token.ulp_filter_r, QETH_MPC_TOKEN_LENGTH);
2087
2088 temp = __raw_devno_from_bus_id(CARD_DDEV_ID(card));
2089 memcpy(QETH_ULP_SETUP_CUA(iob->data), &temp, 2);
2090 temp = (card->info.cula << 8) + card->info.unit_addr2;
2091 memcpy(QETH_ULP_SETUP_REAL_DEVADDR(iob->data), &temp, 2);
2092 rc = qeth_send_control_data(card, ULP_SETUP_SIZE, iob,
2093 qeth_ulp_setup_cb, NULL);
2094 return rc;
2095 }
2096
2097 static inline int
2098 qeth_check_for_inbound_error(struct qeth_qdio_buffer *buf,
2099 unsigned int qdio_error,
2100 unsigned int siga_error)
2101 {
2102 int rc = 0;
2103
2104 if (qdio_error || siga_error) {
2105 QETH_DBF_TEXT(trace, 2, "qdinerr");
2106 QETH_DBF_TEXT(qerr, 2, "qdinerr");
2107 QETH_DBF_TEXT_(qerr, 2, " F15=%02X",
2108 buf->buffer->element[15].flags & 0xff);
2109 QETH_DBF_TEXT_(qerr, 2, " F14=%02X",
2110 buf->buffer->element[14].flags & 0xff);
2111 QETH_DBF_TEXT_(qerr, 2, " qerr=%X", qdio_error);
2112 QETH_DBF_TEXT_(qerr, 2, " serr=%X", siga_error);
2113 rc = 1;
2114 }
2115 return rc;
2116 }
2117
2118 static inline struct sk_buff *
2119 qeth_get_skb(unsigned int length)
2120 {
2121 struct sk_buff* skb;
2122 #ifdef CONFIG_QETH_VLAN
2123 if ((skb = dev_alloc_skb(length + VLAN_HLEN)))
2124 skb_reserve(skb, VLAN_HLEN);
2125 #else
2126 skb = dev_alloc_skb(length);
2127 #endif
2128 return skb;
2129 }
2130
2131 static inline struct sk_buff *
2132 qeth_get_next_skb(struct qeth_card *card, struct qdio_buffer *buffer,
2133 struct qdio_buffer_element **__element, int *__offset,
2134 struct qeth_hdr **hdr)
2135 {
2136 struct qdio_buffer_element *element = *__element;
2137 int offset = *__offset;
2138 struct sk_buff *skb = NULL;
2139 int skb_len;
2140 void *data_ptr;
2141 int data_len;
2142
2143 QETH_DBF_TEXT(trace,6,"nextskb");
2144 /* qeth_hdr must not cross element boundaries */
2145 if (element->length < offset + sizeof(struct qeth_hdr)){
2146 if (qeth_is_last_sbale(element))
2147 return NULL;
2148 element++;
2149 offset = 0;
2150 if (element->length < sizeof(struct qeth_hdr))
2151 return NULL;
2152 }
2153 *hdr = element->addr + offset;
2154
2155 offset += sizeof(struct qeth_hdr);
2156 if (card->options.layer2)
2157 skb_len = (*hdr)->hdr.l2.pkt_length;
2158 else
2159 skb_len = (*hdr)->hdr.l3.length;
2160
2161 if (!skb_len)
2162 return NULL;
2163 if (card->options.fake_ll){
2164 if(card->dev->type == ARPHRD_IEEE802_TR){
2165 if (!(skb = qeth_get_skb(skb_len+QETH_FAKE_LL_LEN_TR)))
2166 goto no_mem;
2167 skb_reserve(skb,QETH_FAKE_LL_LEN_TR);
2168 } else {
2169 if (!(skb = qeth_get_skb(skb_len+QETH_FAKE_LL_LEN_ETH)))
2170 goto no_mem;
2171 skb_reserve(skb,QETH_FAKE_LL_LEN_ETH);
2172 }
2173 } else if (!(skb = qeth_get_skb(skb_len)))
2174 goto no_mem;
2175 data_ptr = element->addr + offset;
2176 while (skb_len) {
2177 data_len = min(skb_len, (int)(element->length - offset));
2178 if (data_len)
2179 memcpy(skb_put(skb, data_len), data_ptr, data_len);
2180 skb_len -= data_len;
2181 if (skb_len){
2182 if (qeth_is_last_sbale(element)){
2183 QETH_DBF_TEXT(trace,4,"unexeob");
2184 QETH_DBF_TEXT_(trace,4,"%s",CARD_BUS_ID(card));
2185 QETH_DBF_TEXT(qerr,2,"unexeob");
2186 QETH_DBF_TEXT_(qerr,2,"%s",CARD_BUS_ID(card));
2187 QETH_DBF_HEX(misc,4,buffer,sizeof(*buffer));
2188 dev_kfree_skb_any(skb);
2189 card->stats.rx_errors++;
2190 return NULL;
2191 }
2192 element++;
2193 offset = 0;
2194 data_ptr = element->addr;
2195 } else {
2196 offset += data_len;
2197 }
2198 }
2199 *__element = element;
2200 *__offset = offset;
2201 return skb;
2202 no_mem:
2203 if (net_ratelimit()){
2204 PRINT_WARN("No memory for packet received on %s.\n",
2205 QETH_CARD_IFNAME(card));
2206 QETH_DBF_TEXT(trace,2,"noskbmem");
2207 QETH_DBF_TEXT_(trace,2,"%s",CARD_BUS_ID(card));
2208 }
2209 card->stats.rx_dropped++;
2210 return NULL;
2211 }
2212
2213 static inline __be16
2214 qeth_type_trans(struct sk_buff *skb, struct net_device *dev)
2215 {
2216 struct qeth_card *card;
2217 struct ethhdr *eth;
2218
2219 QETH_DBF_TEXT(trace,6,"typtrans");
2220
2221 card = (struct qeth_card *)dev->priv;
2222 #ifdef CONFIG_TR
2223 if ((card->info.link_type == QETH_LINK_TYPE_HSTR) ||
2224 (card->info.link_type == QETH_LINK_TYPE_LANE_TR))
2225 return tr_type_trans(skb,dev);
2226 #endif /* CONFIG_TR */
2227 skb->mac.raw = skb->data;
2228 skb_pull(skb, ETH_HLEN );
2229 eth = eth_hdr(skb);
2230
2231 if (*eth->h_dest & 1) {
2232 if (memcmp(eth->h_dest, dev->broadcast, ETH_ALEN) == 0)
2233 skb->pkt_type = PACKET_BROADCAST;
2234 else
2235 skb->pkt_type = PACKET_MULTICAST;
2236 } else if (memcmp(eth->h_dest, dev->dev_addr, ETH_ALEN))
2237 skb->pkt_type = PACKET_OTHERHOST;
2238
2239 if (ntohs(eth->h_proto) >= 1536)
2240 return eth->h_proto;
2241 if (*(unsigned short *) (skb->data) == 0xFFFF)
2242 return htons(ETH_P_802_3);
2243 return htons(ETH_P_802_2);
2244 }
2245
2246 static inline void
2247 qeth_rebuild_skb_fake_ll_tr(struct qeth_card *card, struct sk_buff *skb,
2248 struct qeth_hdr *hdr)
2249 {
2250 struct trh_hdr *fake_hdr;
2251 struct trllc *fake_llc;
2252 struct iphdr *ip_hdr;
2253
2254 QETH_DBF_TEXT(trace,5,"skbfktr");
2255 skb->mac.raw = skb->data - QETH_FAKE_LL_LEN_TR;
2256 /* this is a fake ethernet header */
2257 fake_hdr = (struct trh_hdr *) skb->mac.raw;
2258
2259 /* the destination MAC address */
2260 switch (skb->pkt_type){
2261 case PACKET_MULTICAST:
2262 switch (skb->protocol){
2263 #ifdef CONFIG_QETH_IPV6
2264 case __constant_htons(ETH_P_IPV6):
2265 ndisc_mc_map((struct in6_addr *)
2266 skb->data + QETH_FAKE_LL_V6_ADDR_POS,
2267 fake_hdr->daddr, card->dev, 0);
2268 break;
2269 #endif /* CONFIG_QETH_IPV6 */
2270 case __constant_htons(ETH_P_IP):
2271 ip_hdr = (struct iphdr *)skb->data;
2272 ip_tr_mc_map(ip_hdr->daddr, fake_hdr->daddr);
2273 break;
2274 default:
2275 memcpy(fake_hdr->daddr, card->dev->dev_addr, TR_ALEN);
2276 }
2277 break;
2278 case PACKET_BROADCAST:
2279 memset(fake_hdr->daddr, 0xff, TR_ALEN);
2280 break;
2281 default:
2282 memcpy(fake_hdr->daddr, card->dev->dev_addr, TR_ALEN);
2283 }
2284 /* the source MAC address */
2285 if (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_SRC_MAC_ADDR)
2286 memcpy(fake_hdr->saddr, &hdr->hdr.l3.dest_addr[2], TR_ALEN);
2287 else
2288 memset(fake_hdr->saddr, 0, TR_ALEN);
2289 fake_hdr->rcf=0;
2290 fake_llc = (struct trllc*)&(fake_hdr->rcf);
2291 fake_llc->dsap = EXTENDED_SAP;
2292 fake_llc->ssap = EXTENDED_SAP;
2293 fake_llc->llc = UI_CMD;
2294 fake_llc->protid[0] = 0;
2295 fake_llc->protid[1] = 0;
2296 fake_llc->protid[2] = 0;
2297 fake_llc->ethertype = ETH_P_IP;
2298 }
2299
2300 static inline void
2301 qeth_rebuild_skb_fake_ll_eth(struct qeth_card *card, struct sk_buff *skb,
2302 struct qeth_hdr *hdr)
2303 {
2304 struct ethhdr *fake_hdr;
2305 struct iphdr *ip_hdr;
2306
2307 QETH_DBF_TEXT(trace,5,"skbfketh");
2308 skb->mac.raw = skb->data - QETH_FAKE_LL_LEN_ETH;
2309 /* this is a fake ethernet header */
2310 fake_hdr = (struct ethhdr *) skb->mac.raw;
2311
2312 /* the destination MAC address */
2313 switch (skb->pkt_type){
2314 case PACKET_MULTICAST:
2315 switch (skb->protocol){
2316 #ifdef CONFIG_QETH_IPV6
2317 case __constant_htons(ETH_P_IPV6):
2318 ndisc_mc_map((struct in6_addr *)
2319 skb->data + QETH_FAKE_LL_V6_ADDR_POS,
2320 fake_hdr->h_dest, card->dev, 0);
2321 break;
2322 #endif /* CONFIG_QETH_IPV6 */
2323 case __constant_htons(ETH_P_IP):
2324 ip_hdr = (struct iphdr *)skb->data;
2325 ip_eth_mc_map(ip_hdr->daddr, fake_hdr->h_dest);
2326 break;
2327 default:
2328 memcpy(fake_hdr->h_dest, card->dev->dev_addr, ETH_ALEN);
2329 }
2330 break;
2331 case PACKET_BROADCAST:
2332 memset(fake_hdr->h_dest, 0xff, ETH_ALEN);
2333 break;
2334 default:
2335 memcpy(fake_hdr->h_dest, card->dev->dev_addr, ETH_ALEN);
2336 }
2337 /* the source MAC address */
2338 if (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_SRC_MAC_ADDR)
2339 memcpy(fake_hdr->h_source, &hdr->hdr.l3.dest_addr[2], ETH_ALEN);
2340 else
2341 memset(fake_hdr->h_source, 0, ETH_ALEN);
2342 /* the protocol */
2343 fake_hdr->h_proto = skb->protocol;
2344 }
2345
2346 static inline void
2347 qeth_rebuild_skb_fake_ll(struct qeth_card *card, struct sk_buff *skb,
2348 struct qeth_hdr *hdr)
2349 {
2350 if (card->dev->type == ARPHRD_IEEE802_TR)
2351 qeth_rebuild_skb_fake_ll_tr(card, skb, hdr);
2352 else
2353 qeth_rebuild_skb_fake_ll_eth(card, skb, hdr);
2354 }
2355
2356 static inline void
2357 qeth_rebuild_skb_vlan(struct qeth_card *card, struct sk_buff *skb,
2358 struct qeth_hdr *hdr)
2359 {
2360 #ifdef CONFIG_QETH_VLAN
2361 u16 *vlan_tag;
2362
2363 if (hdr->hdr.l3.ext_flags &
2364 (QETH_HDR_EXT_VLAN_FRAME | QETH_HDR_EXT_INCLUDE_VLAN_TAG)) {
2365 vlan_tag = (u16 *) skb_push(skb, VLAN_HLEN);
2366 *vlan_tag = (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_VLAN_FRAME)?
2367 hdr->hdr.l3.vlan_id : *((u16 *)&hdr->hdr.l3.dest_addr[12]);
2368 *(vlan_tag + 1) = skb->protocol;
2369 skb->protocol = __constant_htons(ETH_P_8021Q);
2370 }
2371 #endif /* CONFIG_QETH_VLAN */
2372 }
2373
2374 static inline __u16
2375 qeth_layer2_rebuild_skb(struct qeth_card *card, struct sk_buff *skb,
2376 struct qeth_hdr *hdr)
2377 {
2378 unsigned short vlan_id = 0;
2379 #ifdef CONFIG_QETH_VLAN
2380 struct vlan_hdr *vhdr;
2381 #endif
2382
2383 skb->pkt_type = PACKET_HOST;
2384 skb->protocol = qeth_type_trans(skb, skb->dev);
2385 if (card->options.checksum_type == NO_CHECKSUMMING)
2386 skb->ip_summed = CHECKSUM_UNNECESSARY;
2387 else
2388 skb->ip_summed = CHECKSUM_NONE;
2389 #ifdef CONFIG_QETH_VLAN
2390 if (hdr->hdr.l2.flags[2] & (QETH_LAYER2_FLAG_VLAN)) {
2391 vhdr = (struct vlan_hdr *) skb->data;
2392 skb->protocol =
2393 __constant_htons(vhdr->h_vlan_encapsulated_proto);
2394 vlan_id = hdr->hdr.l2.vlan_id;
2395 skb_pull(skb, VLAN_HLEN);
2396 }
2397 #endif
2398 return vlan_id;
2399 }
2400
2401 static inline void
2402 qeth_rebuild_skb(struct qeth_card *card, struct sk_buff *skb,
2403 struct qeth_hdr *hdr)
2404 {
2405 #ifdef CONFIG_QETH_IPV6
2406 if (hdr->hdr.l3.flags & QETH_HDR_PASSTHRU) {
2407 skb->pkt_type = PACKET_HOST;
2408 skb->protocol = qeth_type_trans(skb, card->dev);
2409 return;
2410 }
2411 #endif /* CONFIG_QETH_IPV6 */
2412 skb->protocol = htons((hdr->hdr.l3.flags & QETH_HDR_IPV6)? ETH_P_IPV6 :
2413 ETH_P_IP);
2414 switch (hdr->hdr.l3.flags & QETH_HDR_CAST_MASK){
2415 case QETH_CAST_UNICAST:
2416 skb->pkt_type = PACKET_HOST;
2417 break;
2418 case QETH_CAST_MULTICAST:
2419 skb->pkt_type = PACKET_MULTICAST;
2420 card->stats.multicast++;
2421 break;
2422 case QETH_CAST_BROADCAST:
2423 skb->pkt_type = PACKET_BROADCAST;
2424 card->stats.multicast++;
2425 break;
2426 case QETH_CAST_ANYCAST:
2427 case QETH_CAST_NOCAST:
2428 default:
2429 skb->pkt_type = PACKET_HOST;
2430 }
2431 qeth_rebuild_skb_vlan(card, skb, hdr);
2432 if (card->options.fake_ll)
2433 qeth_rebuild_skb_fake_ll(card, skb, hdr);
2434 else
2435 skb->mac.raw = skb->data;
2436 skb->ip_summed = card->options.checksum_type;
2437 if (card->options.checksum_type == HW_CHECKSUMMING){
2438 if ( (hdr->hdr.l3.ext_flags &
2439 (QETH_HDR_EXT_CSUM_HDR_REQ |
2440 QETH_HDR_EXT_CSUM_TRANSP_REQ)) ==
2441 (QETH_HDR_EXT_CSUM_HDR_REQ |
2442 QETH_HDR_EXT_CSUM_TRANSP_REQ) )
2443 skb->ip_summed = CHECKSUM_UNNECESSARY;
2444 else
2445 skb->ip_summed = SW_CHECKSUMMING;
2446 }
2447 }
2448
2449 static inline void
2450 qeth_process_inbound_buffer(struct qeth_card *card,
2451 struct qeth_qdio_buffer *buf, int index)
2452 {
2453 struct qdio_buffer_element *element;
2454 struct sk_buff *skb;
2455 struct qeth_hdr *hdr;
2456 int offset;
2457 int rxrc;
2458 __u16 vlan_tag = 0;
2459
2460 /* get first element of current buffer */
2461 element = (struct qdio_buffer_element *)&buf->buffer->element[0];
2462 offset = 0;
2463 #ifdef CONFIG_QETH_PERF_STATS
2464 card->perf_stats.bufs_rec++;
2465 #endif
2466 while((skb = qeth_get_next_skb(card, buf->buffer, &element,
2467 &offset, &hdr))) {
2468 skb->dev = card->dev;
2469 if (hdr->hdr.l2.id == QETH_HEADER_TYPE_LAYER2)
2470 vlan_tag = qeth_layer2_rebuild_skb(card, skb, hdr);
2471 else
2472 qeth_rebuild_skb(card, skb, hdr);
2473 /* is device UP ? */
2474 if (!(card->dev->flags & IFF_UP)){
2475 dev_kfree_skb_any(skb);
2476 continue;
2477 }
2478 #ifdef CONFIG_QETH_VLAN
2479 if (vlan_tag)
2480 vlan_hwaccel_rx(skb, card->vlangrp, vlan_tag);
2481 else
2482 #endif
2483 rxrc = netif_rx(skb);
2484 card->dev->last_rx = jiffies;
2485 card->stats.rx_packets++;
2486 card->stats.rx_bytes += skb->len;
2487 }
2488 }
2489
2490 static inline struct qeth_buffer_pool_entry *
2491 qeth_get_buffer_pool_entry(struct qeth_card *card)
2492 {
2493 struct qeth_buffer_pool_entry *entry;
2494
2495 QETH_DBF_TEXT(trace, 6, "gtbfplen");
2496 if (!list_empty(&card->qdio.in_buf_pool.entry_list)) {
2497 entry = list_entry(card->qdio.in_buf_pool.entry_list.next,
2498 struct qeth_buffer_pool_entry, list);
2499 list_del_init(&entry->list);
2500 return entry;
2501 }
2502 return NULL;
2503 }
2504
2505 static inline void
2506 qeth_init_input_buffer(struct qeth_card *card, struct qeth_qdio_buffer *buf)
2507 {
2508 struct qeth_buffer_pool_entry *pool_entry;
2509 int i;
2510
2511 pool_entry = qeth_get_buffer_pool_entry(card);
2512 /*
2513 * since the buffer is accessed only from the input_tasklet
2514 * there shouldn't be a need to synchronize; also, since we use
2515 * the QETH_IN_BUF_REQUEUE_THRESHOLD we should never run out off
2516 * buffers
2517 */
2518 BUG_ON(!pool_entry);
2519
2520 buf->pool_entry = pool_entry;
2521 for(i = 0; i < QETH_MAX_BUFFER_ELEMENTS(card); ++i){
2522 buf->buffer->element[i].length = PAGE_SIZE;
2523 buf->buffer->element[i].addr = pool_entry->elements[i];
2524 if (i == QETH_MAX_BUFFER_ELEMENTS(card) - 1)
2525 buf->buffer->element[i].flags = SBAL_FLAGS_LAST_ENTRY;
2526 else
2527 buf->buffer->element[i].flags = 0;
2528 }
2529 buf->state = QETH_QDIO_BUF_EMPTY;
2530 }
2531
2532 static inline void
2533 qeth_clear_output_buffer(struct qeth_qdio_out_q *queue,
2534 struct qeth_qdio_out_buffer *buf)
2535 {
2536 int i;
2537 struct sk_buff *skb;
2538
2539 /* is PCI flag set on buffer? */
2540 if (buf->buffer->element[0].flags & 0x40)
2541 atomic_dec(&queue->set_pci_flags_count);
2542
2543 while ((skb = skb_dequeue(&buf->skb_list))){
2544 atomic_dec(&skb->users);
2545 dev_kfree_skb_any(skb);
2546 }
2547 qeth_eddp_buf_release_contexts(buf);
2548 for(i = 0; i < QETH_MAX_BUFFER_ELEMENTS(queue->card); ++i){
2549 buf->buffer->element[i].length = 0;
2550 buf->buffer->element[i].addr = NULL;
2551 buf->buffer->element[i].flags = 0;
2552 }
2553 buf->next_element_to_fill = 0;
2554 atomic_set(&buf->state, QETH_QDIO_BUF_EMPTY);
2555 }
2556
2557 static inline void
2558 qeth_queue_input_buffer(struct qeth_card *card, int index)
2559 {
2560 struct qeth_qdio_q *queue = card->qdio.in_q;
2561 int count;
2562 int i;
2563 int rc;
2564
2565 QETH_DBF_TEXT(trace,6,"queinbuf");
2566 count = (index < queue->next_buf_to_init)?
2567 card->qdio.in_buf_pool.buf_count -
2568 (queue->next_buf_to_init - index) :
2569 card->qdio.in_buf_pool.buf_count -
2570 (queue->next_buf_to_init + QDIO_MAX_BUFFERS_PER_Q - index);
2571 /* only requeue at a certain threshold to avoid SIGAs */
2572 if (count >= QETH_IN_BUF_REQUEUE_THRESHOLD(card)){
2573 for (i = queue->next_buf_to_init;
2574 i < queue->next_buf_to_init + count; ++i)
2575 qeth_init_input_buffer(card,
2576 &queue->bufs[i % QDIO_MAX_BUFFERS_PER_Q]);
2577 /*
2578 * according to old code it should be avoided to requeue all
2579 * 128 buffers in order to benefit from PCI avoidance.
2580 * this function keeps at least one buffer (the buffer at
2581 * 'index') un-requeued -> this buffer is the first buffer that
2582 * will be requeued the next time
2583 */
2584 #ifdef CONFIG_QETH_PERF_STATS
2585 card->perf_stats.inbound_do_qdio_cnt++;
2586 card->perf_stats.inbound_do_qdio_start_time = qeth_get_micros();
2587 #endif
2588 rc = do_QDIO(CARD_DDEV(card),
2589 QDIO_FLAG_SYNC_INPUT | QDIO_FLAG_UNDER_INTERRUPT,
2590 0, queue->next_buf_to_init, count, NULL);
2591 #ifdef CONFIG_QETH_PERF_STATS
2592 card->perf_stats.inbound_do_qdio_time += qeth_get_micros() -
2593 card->perf_stats.inbound_do_qdio_start_time;
2594 #endif
2595 if (rc){
2596 PRINT_WARN("qeth_queue_input_buffer's do_QDIO "
2597 "return %i (device %s).\n",
2598 rc, CARD_DDEV_ID(card));
2599 QETH_DBF_TEXT(trace,2,"qinberr");
2600 QETH_DBF_TEXT_(trace,2,"%s",CARD_BUS_ID(card));
2601 }
2602 queue->next_buf_to_init = (queue->next_buf_to_init + count) %
2603 QDIO_MAX_BUFFERS_PER_Q;
2604 }
2605 }
2606
2607 static inline void
2608 qeth_put_buffer_pool_entry(struct qeth_card *card,
2609 struct qeth_buffer_pool_entry *entry)
2610 {
2611 QETH_DBF_TEXT(trace, 6, "ptbfplen");
2612 list_add_tail(&entry->list, &card->qdio.in_buf_pool.entry_list);
2613 }
2614
2615 static void
2616 qeth_qdio_input_handler(struct ccw_device * ccwdev, unsigned int status,
2617 unsigned int qdio_err, unsigned int siga_err,
2618 unsigned int queue, int first_element, int count,
2619 unsigned long card_ptr)
2620 {
2621 struct net_device *net_dev;
2622 struct qeth_card *card;
2623 struct qeth_qdio_buffer *buffer;
2624 int index;
2625 int i;
2626
2627 QETH_DBF_TEXT(trace, 6, "qdinput");
2628 card = (struct qeth_card *) card_ptr;
2629 net_dev = card->dev;
2630 #ifdef CONFIG_QETH_PERF_STATS
2631 card->perf_stats.inbound_cnt++;
2632 card->perf_stats.inbound_start_time = qeth_get_micros();
2633 #endif
2634 if (status & QDIO_STATUS_LOOK_FOR_ERROR) {
2635 if (status & QDIO_STATUS_ACTIVATE_CHECK_CONDITION){
2636 QETH_DBF_TEXT(trace, 1,"qdinchk");
2637 QETH_DBF_TEXT_(trace,1,"%s",CARD_BUS_ID(card));
2638 QETH_DBF_TEXT_(trace,1,"%04X%04X",first_element,count);
2639 QETH_DBF_TEXT_(trace,1,"%04X%04X", queue, status);
2640 qeth_schedule_recovery(card);
2641 return;
2642 }
2643 }
2644 for (i = first_element; i < (first_element + count); ++i) {
2645 index = i % QDIO_MAX_BUFFERS_PER_Q;
2646 buffer = &card->qdio.in_q->bufs[index];
2647 if (!((status == QDIO_STATUS_LOOK_FOR_ERROR) &&
2648 qeth_check_for_inbound_error(buffer, qdio_err, siga_err)))
2649 qeth_process_inbound_buffer(card, buffer, index);
2650 /* clear buffer and give back to hardware */
2651 qeth_put_buffer_pool_entry(card, buffer->pool_entry);
2652 qeth_queue_input_buffer(card, index);
2653 }
2654 #ifdef CONFIG_QETH_PERF_STATS
2655 card->perf_stats.inbound_time += qeth_get_micros() -
2656 card->perf_stats.inbound_start_time;
2657 #endif
2658 }
2659
2660 static inline int
2661 qeth_handle_send_error(struct qeth_card *card,
2662 struct qeth_qdio_out_buffer *buffer,
2663 int qdio_err, int siga_err)
2664 {
2665 int sbalf15 = buffer->buffer->element[15].flags & 0xff;
2666 int cc = siga_err & 3;
2667
2668 QETH_DBF_TEXT(trace, 6, "hdsnderr");
2669 switch (cc) {
2670 case 0:
2671 if (qdio_err){
2672 QETH_DBF_TEXT(trace, 1,"lnkfail");
2673 QETH_DBF_TEXT_(trace,1,"%s",CARD_BUS_ID(card));
2674 QETH_DBF_TEXT_(trace,1,"%04x %02x",
2675 (u16)qdio_err, (u8)sbalf15);
2676 return QETH_SEND_ERROR_LINK_FAILURE;
2677 }
2678 return QETH_SEND_ERROR_NONE;
2679 case 2:
2680 if (siga_err & QDIO_SIGA_ERROR_B_BIT_SET) {
2681 QETH_DBF_TEXT(trace, 1, "SIGAcc2B");
2682 QETH_DBF_TEXT_(trace,1,"%s",CARD_BUS_ID(card));
2683 return QETH_SEND_ERROR_KICK_IT;
2684 }
2685 if ((sbalf15 >= 15) && (sbalf15 <= 31))
2686 return QETH_SEND_ERROR_RETRY;
2687 return QETH_SEND_ERROR_LINK_FAILURE;
2688 /* look at qdio_error and sbalf 15 */
2689 case 1:
2690 QETH_DBF_TEXT(trace, 1, "SIGAcc1");
2691 QETH_DBF_TEXT_(trace,1,"%s",CARD_BUS_ID(card));
2692 return QETH_SEND_ERROR_LINK_FAILURE;
2693 case 3:
2694 QETH_DBF_TEXT(trace, 1, "SIGAcc3");
2695 QETH_DBF_TEXT_(trace,1,"%s",CARD_BUS_ID(card));
2696 return QETH_SEND_ERROR_KICK_IT;
2697 }
2698 return QETH_SEND_ERROR_LINK_FAILURE;
2699 }
2700
2701 void
2702 qeth_flush_buffers(struct qeth_qdio_out_q *queue, int under_int,
2703 int index, int count)
2704 {
2705 struct qeth_qdio_out_buffer *buf;
2706 int rc;
2707 int i;
2708
2709 QETH_DBF_TEXT(trace, 6, "flushbuf");
2710
2711 for (i = index; i < index + count; ++i) {
2712 buf = &queue->bufs[i % QDIO_MAX_BUFFERS_PER_Q];
2713 buf->buffer->element[buf->next_element_to_fill - 1].flags |=
2714 SBAL_FLAGS_LAST_ENTRY;
2715
2716 if (queue->card->info.type == QETH_CARD_TYPE_IQD)
2717 continue;
2718
2719 if (!queue->do_pack){
2720 if ((atomic_read(&queue->used_buffers) >=
2721 (QETH_HIGH_WATERMARK_PACK -
2722 QETH_WATERMARK_PACK_FUZZ)) &&
2723 !atomic_read(&queue->set_pci_flags_count)){
2724 /* it's likely that we'll go to packing
2725 * mode soon */
2726 atomic_inc(&queue->set_pci_flags_count);
2727 buf->buffer->element[0].flags |= 0x40;
2728 }
2729 } else {
2730 if (!atomic_read(&queue->set_pci_flags_count)){
2731 /*
2732 * there's no outstanding PCI any more, so we
2733 * have to request a PCI to be sure the the PCI
2734 * will wake at some time in the future then we
2735 * can flush packed buffers that might still be
2736 * hanging around, which can happen if no
2737 * further send was requested by the stack
2738 */
2739 atomic_inc(&queue->set_pci_flags_count);
2740 buf->buffer->element[0].flags |= 0x40;
2741 }
2742 }
2743 }
2744
2745 queue->card->dev->trans_start = jiffies;
2746 #ifdef CONFIG_QETH_PERF_STATS
2747 queue->card->perf_stats.outbound_do_qdio_cnt++;
2748 queue->card->perf_stats.outbound_do_qdio_start_time = qeth_get_micros();
2749 #endif
2750 if (under_int)
2751 rc = do_QDIO(CARD_DDEV(queue->card),
2752 QDIO_FLAG_SYNC_OUTPUT | QDIO_FLAG_UNDER_INTERRUPT,
2753 queue->queue_no, index, count, NULL);
2754 else
2755 rc = do_QDIO(CARD_DDEV(queue->card), QDIO_FLAG_SYNC_OUTPUT,
2756 queue->queue_no, index, count, NULL);
2757 #ifdef CONFIG_QETH_PERF_STATS
2758 queue->card->perf_stats.outbound_do_qdio_time += qeth_get_micros() -
2759 queue->card->perf_stats.outbound_do_qdio_start_time;
2760 #endif
2761 if (rc){
2762 QETH_DBF_SPRINTF(trace, 0, "qeth_flush_buffers: do_QDIO "
2763 "returned error (%i) on device %s.",
2764 rc, CARD_DDEV_ID(queue->card));
2765 QETH_DBF_TEXT(trace, 2, "flushbuf");
2766 QETH_DBF_TEXT_(trace, 2, " err%d", rc);
2767 queue->card->stats.tx_errors += count;
2768 /* this must not happen under normal circumstances. if it
2769 * happens something is really wrong -> recover */
2770 qeth_schedule_recovery(queue->card);
2771 return;
2772 }
2773 atomic_add(count, &queue->used_buffers);
2774 #ifdef CONFIG_QETH_PERF_STATS
2775 queue->card->perf_stats.bufs_sent += count;
2776 #endif
2777 }
2778
2779 /*
2780 * Switched to packing state if the number of used buffers on a queue
2781 * reaches a certain limit.
2782 */
2783 static inline void
2784 qeth_switch_to_packing_if_needed(struct qeth_qdio_out_q *queue)
2785 {
2786 if (!queue->do_pack) {
2787 if (atomic_read(&queue->used_buffers)
2788 >= QETH_HIGH_WATERMARK_PACK){
2789 /* switch non-PACKING -> PACKING */
2790 QETH_DBF_TEXT(trace, 6, "np->pack");
2791 #ifdef CONFIG_QETH_PERF_STATS
2792 queue->card->perf_stats.sc_dp_p++;
2793 #endif
2794 queue->do_pack = 1;
2795 }
2796 }
2797 }
2798
2799 /*
2800 * Switches from packing to non-packing mode. If there is a packing
2801 * buffer on the queue this buffer will be prepared to be flushed.
2802 * In that case 1 is returned to inform the caller. If no buffer
2803 * has to be flushed, zero is returned.
2804 */
2805 static inline int
2806 qeth_switch_to_nonpacking_if_needed(struct qeth_qdio_out_q *queue)
2807 {
2808 struct qeth_qdio_out_buffer *buffer;
2809 int flush_count = 0;
2810
2811 if (queue->do_pack) {
2812 if (atomic_read(&queue->used_buffers)
2813 <= QETH_LOW_WATERMARK_PACK) {
2814 /* switch PACKING -> non-PACKING */
2815 QETH_DBF_TEXT(trace, 6, "pack->np");
2816 #ifdef CONFIG_QETH_PERF_STATS
2817 queue->card->perf_stats.sc_p_dp++;
2818 #endif
2819 queue->do_pack = 0;
2820 /* flush packing buffers */
2821 buffer = &queue->bufs[queue->next_buf_to_fill];
2822 if ((atomic_read(&buffer->state) ==
2823 QETH_QDIO_BUF_EMPTY) &&
2824 (buffer->next_element_to_fill > 0)) {
2825 atomic_set(&buffer->state,QETH_QDIO_BUF_PRIMED);
2826 flush_count++;
2827 queue->next_buf_to_fill =
2828 (queue->next_buf_to_fill + 1) %
2829 QDIO_MAX_BUFFERS_PER_Q;
2830 }
2831 }
2832 }
2833 return flush_count;
2834 }
2835
2836 /*
2837 * Called to flush a packing buffer if no more pci flags are on the queue.
2838 * Checks if there is a packing buffer and prepares it to be flushed.
2839 * In that case returns 1, otherwise zero.
2840 */
2841 static inline int
2842 qeth_flush_buffers_on_no_pci(struct qeth_qdio_out_q *queue)
2843 {
2844 struct qeth_qdio_out_buffer *buffer;
2845
2846 buffer = &queue->bufs[queue->next_buf_to_fill];
2847 if((atomic_read(&buffer->state) == QETH_QDIO_BUF_EMPTY) &&
2848 (buffer->next_element_to_fill > 0)){
2849 /* it's a packing buffer */
2850 atomic_set(&buffer->state, QETH_QDIO_BUF_PRIMED);
2851 queue->next_buf_to_fill =
2852 (queue->next_buf_to_fill + 1) % QDIO_MAX_BUFFERS_PER_Q;
2853 return 1;
2854 }
2855 return 0;
2856 }
2857
2858 static inline void
2859 qeth_check_outbound_queue(struct qeth_qdio_out_q *queue)
2860 {
2861 int index;
2862 int flush_cnt = 0;
2863 int q_was_packing = 0;
2864
2865 /*
2866 * check if weed have to switch to non-packing mode or if
2867 * we have to get a pci flag out on the queue
2868 */
2869 if ((atomic_read(&queue->used_buffers) <= QETH_LOW_WATERMARK_PACK) ||
2870 !atomic_read(&queue->set_pci_flags_count)){
2871 if (atomic_swap(&queue->state, QETH_OUT_Q_LOCKED_FLUSH) ==
2872 QETH_OUT_Q_UNLOCKED) {
2873 /*
2874 * If we get in here, there was no action in
2875 * do_send_packet. So, we check if there is a
2876 * packing buffer to be flushed here.
2877 */
2878 netif_stop_queue(queue->card->dev);
2879 index = queue->next_buf_to_fill;
2880 q_was_packing = queue->do_pack;
2881 flush_cnt += qeth_switch_to_nonpacking_if_needed(queue);
2882 if (!flush_cnt &&
2883 !atomic_read(&queue->set_pci_flags_count))
2884 flush_cnt +=
2885 qeth_flush_buffers_on_no_pci(queue);
2886 #ifdef CONFIG_QETH_PERF_STATS
2887 if (q_was_packing)
2888 queue->card->perf_stats.bufs_sent_pack +=
2889 flush_cnt;
2890 #endif
2891 if (flush_cnt)
2892 qeth_flush_buffers(queue, 1, index, flush_cnt);
2893 atomic_set(&queue->state, QETH_OUT_Q_UNLOCKED);
2894 }
2895 }
2896 }
2897
2898 static void
2899 qeth_qdio_output_handler(struct ccw_device * ccwdev, unsigned int status,
2900 unsigned int qdio_error, unsigned int siga_error,
2901 unsigned int __queue, int first_element, int count,
2902 unsigned long card_ptr)
2903 {
2904 struct qeth_card *card = (struct qeth_card *) card_ptr;
2905 struct qeth_qdio_out_q *queue = card->qdio.out_qs[__queue];
2906 struct qeth_qdio_out_buffer *buffer;
2907 int i;
2908
2909 QETH_DBF_TEXT(trace, 6, "qdouhdl");
2910 if (status & QDIO_STATUS_LOOK_FOR_ERROR) {
2911 if (status & QDIO_STATUS_ACTIVATE_CHECK_CONDITION){
2912 QETH_DBF_SPRINTF(trace, 2, "On device %s: "
2913 "received active check "
2914 "condition (0x%08x).",
2915 CARD_BUS_ID(card), status);
2916 QETH_DBF_TEXT(trace, 2, "chkcond");
2917 QETH_DBF_TEXT_(trace, 2, "%08x", status);
2918 netif_stop_queue(card->dev);
2919 qeth_schedule_recovery(card);
2920 return;
2921 }
2922 }
2923 #ifdef CONFIG_QETH_PERF_STATS
2924 card->perf_stats.outbound_handler_cnt++;
2925 card->perf_stats.outbound_handler_start_time = qeth_get_micros();
2926 #endif
2927 for(i = first_element; i < (first_element + count); ++i){
2928 buffer = &queue->bufs[i % QDIO_MAX_BUFFERS_PER_Q];
2929 /*we only handle the KICK_IT error by doing a recovery */
2930 if (qeth_handle_send_error(card, buffer, qdio_error, siga_error)
2931 == QETH_SEND_ERROR_KICK_IT){
2932 netif_stop_queue(card->dev);
2933 qeth_schedule_recovery(card);
2934 return;
2935 }
2936 qeth_clear_output_buffer(queue, buffer);
2937 }
2938 atomic_sub(count, &queue->used_buffers);
2939 /* check if we need to do something on this outbound queue */
2940 if (card->info.type != QETH_CARD_TYPE_IQD)
2941 qeth_check_outbound_queue(queue);
2942
2943 netif_wake_queue(queue->card->dev);
2944 #ifdef CONFIG_QETH_PERF_STATS
2945 card->perf_stats.outbound_handler_time += qeth_get_micros() -
2946 card->perf_stats.outbound_handler_start_time;
2947 #endif
2948 }
2949
2950 static void
2951 qeth_create_qib_param_field(struct qeth_card *card, char *param_field)
2952 {
2953
2954 param_field[0] = _ascebc['P'];
2955 param_field[1] = _ascebc['C'];
2956 param_field[2] = _ascebc['I'];
2957 param_field[3] = _ascebc['T'];
2958 *((unsigned int *) (&param_field[4])) = QETH_PCI_THRESHOLD_A(card);
2959 *((unsigned int *) (&param_field[8])) = QETH_PCI_THRESHOLD_B(card);
2960 *((unsigned int *) (&param_field[12])) = QETH_PCI_TIMER_VALUE(card);
2961 }
2962
2963 static void
2964 qeth_create_qib_param_field_blkt(struct qeth_card *card, char *param_field)
2965 {
2966 param_field[16] = _ascebc['B'];
2967 param_field[17] = _ascebc['L'];
2968 param_field[18] = _ascebc['K'];
2969 param_field[19] = _ascebc['T'];
2970 *((unsigned int *) (&param_field[20])) = card->info.blkt.time_total;
2971 *((unsigned int *) (&param_field[24])) = card->info.blkt.inter_packet;
2972 *((unsigned int *) (&param_field[28])) = card->info.blkt.inter_packet_jumbo;
2973 }
2974
2975 static void
2976 qeth_initialize_working_pool_list(struct qeth_card *card)
2977 {
2978 struct qeth_buffer_pool_entry *entry;
2979
2980 QETH_DBF_TEXT(trace,5,"inwrklst");
2981
2982 list_for_each_entry(entry,
2983 &card->qdio.init_pool.entry_list, init_list) {
2984 qeth_put_buffer_pool_entry(card,entry);
2985 }
2986 }
2987
2988 static void
2989 qeth_clear_working_pool_list(struct qeth_card *card)
2990 {
2991 struct qeth_buffer_pool_entry *pool_entry, *tmp;
2992
2993 QETH_DBF_TEXT(trace,5,"clwrklst");
2994 list_for_each_entry_safe(pool_entry, tmp,
2995 &card->qdio.in_buf_pool.entry_list, list){
2996 list_del(&pool_entry->list);
2997 }
2998 }
2999
3000 static void
3001 qeth_free_buffer_pool(struct qeth_card *card)
3002 {
3003 struct qeth_buffer_pool_entry *pool_entry, *tmp;
3004 int i=0;
3005 QETH_DBF_TEXT(trace,5,"freepool");
3006 list_for_each_entry_safe(pool_entry, tmp,
3007 &card->qdio.init_pool.entry_list, init_list){
3008 for (i = 0; i < QETH_MAX_BUFFER_ELEMENTS(card); ++i)
3009 free_page((unsigned long)pool_entry->elements[i]);
3010 list_del(&pool_entry->init_list);
3011 kfree(pool_entry);
3012 }
3013 }
3014
3015 static int
3016 qeth_alloc_buffer_pool(struct qeth_card *card)
3017 {
3018 struct qeth_buffer_pool_entry *pool_entry;
3019 void *ptr;
3020 int i, j;
3021
3022 QETH_DBF_TEXT(trace,5,"alocpool");
3023 for (i = 0; i < card->qdio.init_pool.buf_count; ++i){
3024 pool_entry = kmalloc(sizeof(*pool_entry), GFP_KERNEL);
3025 if (!pool_entry){
3026 qeth_free_buffer_pool(card);
3027 return -ENOMEM;
3028 }
3029 for(j = 0; j < QETH_MAX_BUFFER_ELEMENTS(card); ++j){
3030 ptr = (void *) __get_free_page(GFP_KERNEL);
3031 if (!ptr) {
3032 while (j > 0)
3033 free_page((unsigned long)
3034 pool_entry->elements[--j]);
3035 kfree(pool_entry);
3036 qeth_free_buffer_pool(card);
3037 return -ENOMEM;
3038 }
3039 pool_entry->elements[j] = ptr;
3040 }
3041 list_add(&pool_entry->init_list,
3042 &card->qdio.init_pool.entry_list);
3043 }
3044 return 0;
3045 }
3046
3047 int
3048 qeth_realloc_buffer_pool(struct qeth_card *card, int bufcnt)
3049 {
3050 QETH_DBF_TEXT(trace, 2, "realcbp");
3051
3052 if ((card->state != CARD_STATE_DOWN) &&
3053 (card->state != CARD_STATE_RECOVER))
3054 return -EPERM;
3055
3056 /* TODO: steel/add buffers from/to a running card's buffer pool (?) */
3057 qeth_clear_working_pool_list(card);
3058 qeth_free_buffer_pool(card);
3059 card->qdio.in_buf_pool.buf_count = bufcnt;
3060 card->qdio.init_pool.buf_count = bufcnt;
3061 return qeth_alloc_buffer_pool(card);
3062 }
3063
3064 static int
3065 qeth_alloc_qdio_buffers(struct qeth_card *card)
3066 {
3067 int i, j;
3068
3069 QETH_DBF_TEXT(setup, 2, "allcqdbf");
3070
3071 if (card->qdio.state == QETH_QDIO_ALLOCATED)
3072 return 0;
3073
3074 card->qdio.in_q = kmalloc(sizeof(struct qeth_qdio_q), GFP_KERNEL);
3075 if (!card->qdio.in_q)
3076 return - ENOMEM;
3077 QETH_DBF_TEXT(setup, 2, "inq");
3078 QETH_DBF_HEX(setup, 2, &card->qdio.in_q, sizeof(void *));
3079 memset(card->qdio.in_q, 0, sizeof(struct qeth_qdio_q));
3080 /* give inbound qeth_qdio_buffers their qdio_buffers */
3081 for (i = 0; i < QDIO_MAX_BUFFERS_PER_Q; ++i)
3082 card->qdio.in_q->bufs[i].buffer =
3083 &card->qdio.in_q->qdio_bufs[i];
3084 /* inbound buffer pool */
3085 if (qeth_alloc_buffer_pool(card)){
3086 kfree(card->qdio.in_q);
3087 return -ENOMEM;
3088 }
3089 /* outbound */
3090 card->qdio.out_qs =
3091 kmalloc(card->qdio.no_out_queues *
3092 sizeof(struct qeth_qdio_out_q *), GFP_KERNEL);
3093 if (!card->qdio.out_qs){
3094 qeth_free_buffer_pool(card);
3095 return -ENOMEM;
3096 }
3097 for (i = 0; i < card->qdio.no_out_queues; ++i){
3098 card->qdio.out_qs[i] = kmalloc(sizeof(struct qeth_qdio_out_q),
3099 GFP_KERNEL);
3100 if (!card->qdio.out_qs[i]){
3101 while (i > 0)
3102 kfree(card->qdio.out_qs[--i]);
3103 kfree(card->qdio.out_qs);
3104 return -ENOMEM;
3105 }
3106 QETH_DBF_TEXT_(setup, 2, "outq %i", i);
3107 QETH_DBF_HEX(setup, 2, &card->qdio.out_qs[i], sizeof(void *));
3108 memset(card->qdio.out_qs[i], 0, sizeof(struct qeth_qdio_out_q));
3109 card->qdio.out_qs[i]->queue_no = i;
3110 /* give outbound qeth_qdio_buffers their qdio_buffers */
3111 for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j){
3112 card->qdio.out_qs[i]->bufs[j].buffer =
3113 &card->qdio.out_qs[i]->qdio_bufs[j];
3114 skb_queue_head_init(&card->qdio.out_qs[i]->bufs[j].
3115 skb_list);
3116 INIT_LIST_HEAD(&card->qdio.out_qs[i]->bufs[j].ctx_list);
3117 }
3118 }
3119 card->qdio.state = QETH_QDIO_ALLOCATED;
3120 return 0;
3121 }
3122
3123 static void
3124 qeth_free_qdio_buffers(struct qeth_card *card)
3125 {
3126 int i, j;
3127
3128 QETH_DBF_TEXT(trace, 2, "freeqdbf");
3129 if (card->qdio.state == QETH_QDIO_UNINITIALIZED)
3130 return;
3131 kfree(card->qdio.in_q);
3132 /* inbound buffer pool */
3133 qeth_free_buffer_pool(card);
3134 /* free outbound qdio_qs */
3135 for (i = 0; i < card->qdio.no_out_queues; ++i){
3136 for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j)
3137 qeth_clear_output_buffer(card->qdio.out_qs[i],
3138 &card->qdio.out_qs[i]->bufs[j]);
3139 kfree(card->qdio.out_qs[i]);
3140 }
3141 kfree(card->qdio.out_qs);
3142 card->qdio.state = QETH_QDIO_UNINITIALIZED;
3143 }
3144
3145 static void
3146 qeth_clear_qdio_buffers(struct qeth_card *card)
3147 {
3148 int i, j;
3149
3150 QETH_DBF_TEXT(trace, 2, "clearqdbf");
3151 /* clear outbound buffers to free skbs */
3152 for (i = 0; i < card->qdio.no_out_queues; ++i)
3153 if (card->qdio.out_qs[i]){
3154 for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j)
3155 qeth_clear_output_buffer(card->qdio.out_qs[i],
3156 &card->qdio.out_qs[i]->bufs[j]);
3157 }
3158 }
3159
3160 static void
3161 qeth_init_qdio_info(struct qeth_card *card)
3162 {
3163 QETH_DBF_TEXT(setup, 4, "intqdinf");
3164 card->qdio.state = QETH_QDIO_UNINITIALIZED;
3165 /* inbound */
3166 card->qdio.in_buf_size = QETH_IN_BUF_SIZE_DEFAULT;
3167 card->qdio.init_pool.buf_count = QETH_IN_BUF_COUNT_DEFAULT;
3168 card->qdio.in_buf_pool.buf_count = card->qdio.init_pool.buf_count;
3169 INIT_LIST_HEAD(&card->qdio.in_buf_pool.entry_list);
3170 INIT_LIST_HEAD(&card->qdio.init_pool.entry_list);
3171 /* outbound */
3172 card->qdio.do_prio_queueing = QETH_PRIOQ_DEFAULT;
3173 card->qdio.default_out_queue = QETH_DEFAULT_QUEUE;
3174 }
3175
3176 static int
3177 qeth_init_qdio_queues(struct qeth_card *card)
3178 {
3179 int i, j;
3180 int rc;
3181
3182 QETH_DBF_TEXT(setup, 2, "initqdqs");
3183
3184 /* inbound queue */
3185 memset(card->qdio.in_q->qdio_bufs, 0,
3186 QDIO_MAX_BUFFERS_PER_Q * sizeof(struct qdio_buffer));
3187 qeth_initialize_working_pool_list(card);
3188 /*give only as many buffers to hardware as we have buffer pool entries*/
3189 for (i = 0; i < card->qdio.in_buf_pool.buf_count - 1; ++i)
3190 qeth_init_input_buffer(card, &card->qdio.in_q->bufs[i]);
3191 card->qdio.in_q->next_buf_to_init = card->qdio.in_buf_pool.buf_count - 1;
3192 rc = do_QDIO(CARD_DDEV(card), QDIO_FLAG_SYNC_INPUT, 0, 0,
3193 card->qdio.in_buf_pool.buf_count - 1, NULL);
3194 if (rc) {
3195 QETH_DBF_TEXT_(setup, 2, "1err%d", rc);
3196 return rc;
3197 }
3198 rc = qdio_synchronize(CARD_DDEV(card), QDIO_FLAG_SYNC_INPUT, 0);
3199 if (rc) {
3200 QETH_DBF_TEXT_(setup, 2, "2err%d", rc);
3201 return rc;
3202 }
3203 /* outbound queue */
3204 for (i = 0; i < card->qdio.no_out_queues; ++i){
3205 memset(card->qdio.out_qs[i]->qdio_bufs, 0,
3206 QDIO_MAX_BUFFERS_PER_Q * sizeof(struct qdio_buffer));
3207 for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j){
3208 qeth_clear_output_buffer(card->qdio.out_qs[i],
3209 &card->qdio.out_qs[i]->bufs[j]);
3210 }
3211 card->qdio.out_qs[i]->card = card;
3212 card->qdio.out_qs[i]->next_buf_to_fill = 0;
3213 card->qdio.out_qs[i]->do_pack = 0;
3214 atomic_set(&card->qdio.out_qs[i]->used_buffers,0);
3215 atomic_set(&card->qdio.out_qs[i]->set_pci_flags_count, 0);
3216 atomic_set(&card->qdio.out_qs[i]->state,
3217 QETH_OUT_Q_UNLOCKED);
3218 }
3219 return 0;
3220 }
3221
3222 static int
3223 qeth_qdio_establish(struct qeth_card *card)
3224 {
3225 struct qdio_initialize init_data;
3226 char *qib_param_field;
3227 struct qdio_buffer **in_sbal_ptrs;
3228 struct qdio_buffer **out_sbal_ptrs;
3229 int i, j, k;
3230 int rc;
3231
3232 QETH_DBF_TEXT(setup, 2, "qdioest");
3233
3234 qib_param_field = kmalloc(QDIO_MAX_BUFFERS_PER_Q * sizeof(char),
3235 GFP_KERNEL);
3236 if (!qib_param_field)
3237 return -ENOMEM;
3238
3239 memset(qib_param_field, 0, QDIO_MAX_BUFFERS_PER_Q * sizeof(char));
3240
3241 qeth_create_qib_param_field(card, qib_param_field);
3242 qeth_create_qib_param_field_blkt(card, qib_param_field);
3243
3244 in_sbal_ptrs = kmalloc(QDIO_MAX_BUFFERS_PER_Q * sizeof(void *),
3245 GFP_KERNEL);
3246 if (!in_sbal_ptrs) {
3247 kfree(qib_param_field);
3248 return -ENOMEM;
3249 }
3250 for(i = 0; i < QDIO_MAX_BUFFERS_PER_Q; ++i)
3251 in_sbal_ptrs[i] = (struct qdio_buffer *)
3252 virt_to_phys(card->qdio.in_q->bufs[i].buffer);
3253
3254 out_sbal_ptrs =
3255 kmalloc(card->qdio.no_out_queues * QDIO_MAX_BUFFERS_PER_Q *
3256 sizeof(void *), GFP_KERNEL);
3257 if (!out_sbal_ptrs) {
3258 kfree(in_sbal_ptrs);
3259 kfree(qib_param_field);
3260 return -ENOMEM;
3261 }
3262 for(i = 0, k = 0; i < card->qdio.no_out_queues; ++i)
3263 for(j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j, ++k){
3264 out_sbal_ptrs[k] = (struct qdio_buffer *)
3265 virt_to_phys(card->qdio.out_qs[i]->
3266 bufs[j].buffer);
3267 }
3268
3269 memset(&init_data, 0, sizeof(struct qdio_initialize));
3270 init_data.cdev = CARD_DDEV(card);
3271 init_data.q_format = qeth_get_qdio_q_format(card);
3272 init_data.qib_param_field_format = 0;
3273 init_data.qib_param_field = qib_param_field;
3274 init_data.min_input_threshold = QETH_MIN_INPUT_THRESHOLD;
3275 init_data.max_input_threshold = QETH_MAX_INPUT_THRESHOLD;
3276 init_data.min_output_threshold = QETH_MIN_OUTPUT_THRESHOLD;
3277 init_data.max_output_threshold = QETH_MAX_OUTPUT_THRESHOLD;
3278 init_data.no_input_qs = 1;
3279 init_data.no_output_qs = card->qdio.no_out_queues;
3280 init_data.input_handler = (qdio_handler_t *)
3281 qeth_qdio_input_handler;
3282 init_data.output_handler = (qdio_handler_t *)
3283 qeth_qdio_output_handler;
3284 init_data.int_parm = (unsigned long) card;
3285 init_data.flags = QDIO_INBOUND_0COPY_SBALS |
3286 QDIO_OUTBOUND_0COPY_SBALS |
3287 QDIO_USE_OUTBOUND_PCIS;
3288 init_data.input_sbal_addr_array = (void **) in_sbal_ptrs;
3289 init_data.output_sbal_addr_array = (void **) out_sbal_ptrs;
3290
3291 if (!(rc = qdio_initialize(&init_data)))
3292 card->qdio.state = QETH_QDIO_ESTABLISHED;
3293
3294 kfree(out_sbal_ptrs);
3295 kfree(in_sbal_ptrs);
3296 kfree(qib_param_field);
3297 return rc;
3298 }
3299
3300 static int
3301 qeth_qdio_activate(struct qeth_card *card)
3302 {
3303 QETH_DBF_TEXT(setup,3,"qdioact");
3304 return qdio_activate(CARD_DDEV(card), 0);
3305 }
3306
3307 static int
3308 qeth_clear_channel(struct qeth_channel *channel)
3309 {
3310 unsigned long flags;
3311 struct qeth_card *card;
3312 int rc;
3313
3314 QETH_DBF_TEXT(trace,3,"clearch");
3315 card = CARD_FROM_CDEV(channel->ccwdev);
3316 spin_lock_irqsave(get_ccwdev_lock(channel->ccwdev), flags);
3317 rc = ccw_device_clear(channel->ccwdev, QETH_CLEAR_CHANNEL_PARM);
3318 spin_unlock_irqrestore(get_ccwdev_lock(channel->ccwdev), flags);
3319
3320 if (rc)
3321 return rc;
3322 rc = wait_event_interruptible_timeout(card->wait_q,
3323 channel->state==CH_STATE_STOPPED, QETH_TIMEOUT);
3324 if (rc == -ERESTARTSYS)
3325 return rc;
3326 if (channel->state != CH_STATE_STOPPED)
3327 return -ETIME;
3328 channel->state = CH_STATE_DOWN;
3329 return 0;
3330 }
3331
3332 static int
3333 qeth_halt_channel(struct qeth_channel *channel)
3334 {
3335 unsigned long flags;
3336 struct qeth_card *card;
3337 int rc;
3338
3339 QETH_DBF_TEXT(trace,3,"haltch");
3340 card = CARD_FROM_CDEV(channel->ccwdev);
3341 spin_lock_irqsave(get_ccwdev_lock(channel->ccwdev), flags);
3342 rc = ccw_device_halt(channel->ccwdev, QETH_HALT_CHANNEL_PARM);
3343 spin_unlock_irqrestore(get_ccwdev_lock(channel->ccwdev), flags);
3344
3345 if (rc)
3346 return rc;
3347 rc = wait_event_interruptible_timeout(card->wait_q,
3348 channel->state==CH_STATE_HALTED, QETH_TIMEOUT);
3349 if (rc == -ERESTARTSYS)
3350 return rc;
3351 if (channel->state != CH_STATE_HALTED)
3352 return -ETIME;
3353 return 0;
3354 }
3355
3356 static int
3357 qeth_halt_channels(struct qeth_card *card)
3358 {
3359 int rc = 0;
3360
3361 QETH_DBF_TEXT(trace,3,"haltchs");
3362 if ((rc = qeth_halt_channel(&card->read)))
3363 return rc;
3364 if ((rc = qeth_halt_channel(&card->write)))
3365 return rc;
3366 return qeth_halt_channel(&card->data);
3367 }
3368 static int
3369 qeth_clear_channels(struct qeth_card *card)
3370 {
3371 int rc = 0;
3372
3373 QETH_DBF_TEXT(trace,3,"clearchs");
3374 if ((rc = qeth_clear_channel(&card->read)))
3375 return rc;
3376 if ((rc = qeth_clear_channel(&card->write)))
3377 return rc;
3378 return qeth_clear_channel(&card->data);
3379 }
3380
3381 static int
3382 qeth_clear_halt_card(struct qeth_card *card, int halt)
3383 {
3384 int rc = 0;
3385
3386 QETH_DBF_TEXT(trace,3,"clhacrd");
3387 QETH_DBF_HEX(trace, 3, &card, sizeof(void *));
3388
3389 if (halt)
3390 rc = qeth_halt_channels(card);
3391 if (rc)
3392 return rc;
3393 return qeth_clear_channels(card);
3394 }
3395
3396 static int
3397 qeth_qdio_clear_card(struct qeth_card *card, int use_halt)
3398 {
3399 int rc = 0;
3400
3401 QETH_DBF_TEXT(trace,3,"qdioclr");
3402 if (card->qdio.state == QETH_QDIO_ESTABLISHED){
3403 if ((rc = qdio_cleanup(CARD_DDEV(card),
3404 (card->info.type == QETH_CARD_TYPE_IQD) ?
3405 QDIO_FLAG_CLEANUP_USING_HALT :
3406 QDIO_FLAG_CLEANUP_USING_CLEAR)))
3407 QETH_DBF_TEXT_(trace, 3, "1err%d", rc);
3408 card->qdio.state = QETH_QDIO_ALLOCATED;
3409 }
3410 if ((rc = qeth_clear_halt_card(card, use_halt)))
3411 QETH_DBF_TEXT_(trace, 3, "2err%d", rc);
3412 card->state = CARD_STATE_DOWN;
3413 return rc;
3414 }
3415
3416 static int
3417 qeth_dm_act(struct qeth_card *card)
3418 {
3419 int rc;
3420 struct qeth_cmd_buffer *iob;
3421
3422 QETH_DBF_TEXT(setup,2,"dmact");
3423
3424 iob = qeth_wait_for_buffer(&card->write);
3425 memcpy(iob->data, DM_ACT, DM_ACT_SIZE);
3426
3427 memcpy(QETH_DM_ACT_DEST_ADDR(iob->data),
3428 &card->token.cm_connection_r, QETH_MPC_TOKEN_LENGTH);
3429 memcpy(QETH_DM_ACT_CONNECTION_TOKEN(iob->data),
3430 &card->token.ulp_connection_r, QETH_MPC_TOKEN_LENGTH);
3431 rc = qeth_send_control_data(card, DM_ACT_SIZE, iob, NULL, NULL);
3432 return rc;
3433 }
3434
3435 static int
3436 qeth_mpc_initialize(struct qeth_card *card)
3437 {
3438 int rc;
3439
3440 QETH_DBF_TEXT(setup,2,"mpcinit");
3441
3442 if ((rc = qeth_issue_next_read(card))){
3443 QETH_DBF_TEXT_(setup, 2, "1err%d", rc);
3444 return rc;
3445 }
3446 if ((rc = qeth_cm_enable(card))){
3447 QETH_DBF_TEXT_(setup, 2, "2err%d", rc);
3448 return rc;
3449 }
3450 if ((rc = qeth_cm_setup(card))){
3451 QETH_DBF_TEXT_(setup, 2, "3err%d", rc);
3452 return rc;
3453 }
3454 if ((rc = qeth_ulp_enable(card))){
3455 QETH_DBF_TEXT_(setup, 2, "4err%d", rc);
3456 return rc;
3457 }
3458 if ((rc = qeth_ulp_setup(card))){
3459 QETH_DBF_TEXT_(setup, 2, "5err%d", rc);
3460 return rc;
3461 }
3462 if ((rc = qeth_alloc_qdio_buffers(card))){
3463 QETH_DBF_TEXT_(setup, 2, "5err%d", rc);
3464 return rc;
3465 }
3466 if ((rc = qeth_qdio_establish(card))){
3467 QETH_DBF_TEXT_(setup, 2, "6err%d", rc);
3468 qeth_free_qdio_buffers(card);
3469 goto out_qdio;
3470 }
3471 if ((rc = qeth_qdio_activate(card))){
3472 QETH_DBF_TEXT_(setup, 2, "7err%d", rc);
3473 goto out_qdio;
3474 }
3475 if ((rc = qeth_dm_act(card))){
3476 QETH_DBF_TEXT_(setup, 2, "8err%d", rc);
3477 goto out_qdio;
3478 }
3479
3480 return 0;
3481 out_qdio:
3482 qeth_qdio_clear_card(card, card->info.type==QETH_CARD_TYPE_OSAE);
3483 return rc;
3484 }
3485
3486 static struct net_device *
3487 qeth_get_netdevice(enum qeth_card_types type, enum qeth_link_types linktype)
3488 {
3489 struct net_device *dev = NULL;
3490
3491 switch (type) {
3492 case QETH_CARD_TYPE_OSAE:
3493 switch (linktype) {
3494 case QETH_LINK_TYPE_LANE_TR:
3495 case QETH_LINK_TYPE_HSTR:
3496 #ifdef CONFIG_TR
3497 dev = alloc_trdev(0);
3498 #endif /* CONFIG_TR */
3499 break;
3500 default:
3501 dev = alloc_etherdev(0);
3502 }
3503 break;
3504 case QETH_CARD_TYPE_IQD:
3505 dev = alloc_netdev(0, "hsi%d", ether_setup);
3506 break;
3507 default:
3508 dev = alloc_etherdev(0);
3509 }
3510 return dev;
3511 }
3512
3513 /*hard_header fake function; used in case fake_ll is set */
3514 static int
3515 qeth_fake_header(struct sk_buff *skb, struct net_device *dev,
3516 unsigned short type, void *daddr, void *saddr,
3517 unsigned len)
3518 {
3519 if(dev->type == ARPHRD_IEEE802_TR){
3520 struct trh_hdr *hdr;
3521 hdr = (struct trh_hdr *)skb_push(skb, QETH_FAKE_LL_LEN_TR);
3522 memcpy(hdr->saddr, dev->dev_addr, TR_ALEN);
3523 memcpy(hdr->daddr, "FAKELL", TR_ALEN);
3524 return QETH_FAKE_LL_LEN_TR;
3525
3526 } else {
3527 struct ethhdr *hdr;
3528 hdr = (struct ethhdr *)skb_push(skb, QETH_FAKE_LL_LEN_ETH);
3529 memcpy(hdr->h_source, dev->dev_addr, ETH_ALEN);
3530 memcpy(hdr->h_dest, "FAKELL", ETH_ALEN);
3531 if (type != ETH_P_802_3)
3532 hdr->h_proto = htons(type);
3533 else
3534 hdr->h_proto = htons(len);
3535 return QETH_FAKE_LL_LEN_ETH;
3536
3537 }
3538 }
3539
3540 static inline int
3541 qeth_send_packet(struct qeth_card *, struct sk_buff *);
3542
3543 static int
3544 qeth_hard_start_xmit(struct sk_buff *skb, struct net_device *dev)
3545 {
3546 int rc;
3547 struct qeth_card *card;
3548
3549 QETH_DBF_TEXT(trace, 6, "hrdstxmi");
3550 card = (struct qeth_card *)dev->priv;
3551 if (skb==NULL) {
3552 card->stats.tx_dropped++;
3553 card->stats.tx_errors++;
3554 /* return OK; otherwise ksoftirqd goes to 100% */
3555 return NETDEV_TX_OK;
3556 }
3557 if ((card->state != CARD_STATE_UP) || !card->lan_online) {
3558 card->stats.tx_dropped++;
3559 card->stats.tx_errors++;
3560 card->stats.tx_carrier_errors++;
3561 dev_kfree_skb_any(skb);
3562 /* return OK; otherwise ksoftirqd goes to 100% */
3563 return NETDEV_TX_OK;
3564 }
3565 #ifdef CONFIG_QETH_PERF_STATS
3566 card->perf_stats.outbound_cnt++;
3567 card->perf_stats.outbound_start_time = qeth_get_micros();
3568 #endif
3569 netif_stop_queue(dev);
3570 if ((rc = qeth_send_packet(card, skb))) {
3571 if (rc == -EBUSY) {
3572 return NETDEV_TX_BUSY;
3573 } else {
3574 card->stats.tx_errors++;
3575 card->stats.tx_dropped++;
3576 dev_kfree_skb_any(skb);
3577 /*set to OK; otherwise ksoftirqd goes to 100% */
3578 rc = NETDEV_TX_OK;
3579 }
3580 }
3581 netif_wake_queue(dev);
3582 #ifdef CONFIG_QETH_PERF_STATS
3583 card->perf_stats.outbound_time += qeth_get_micros() -
3584 card->perf_stats.outbound_start_time;
3585 #endif
3586 return rc;
3587 }
3588
3589 static int
3590 qeth_verify_vlan_dev(struct net_device *dev, struct qeth_card *card)
3591 {
3592 int rc = 0;
3593 #ifdef CONFIG_QETH_VLAN
3594 struct vlan_group *vg;
3595 int i;
3596
3597 if (!(vg = card->vlangrp))
3598 return rc;
3599
3600 for (i = 0; i < VLAN_GROUP_ARRAY_LEN; i++){
3601 if (vg->vlan_devices[i] == dev){
3602 rc = QETH_VLAN_CARD;
3603 break;
3604 }
3605 }
3606 #endif
3607 return rc;
3608 }
3609
3610 static int
3611 qeth_verify_dev(struct net_device *dev)
3612 {
3613 struct qeth_card *card;
3614 unsigned long flags;
3615 int rc = 0;
3616
3617 read_lock_irqsave(&qeth_card_list.rwlock, flags);
3618 list_for_each_entry(card, &qeth_card_list.list, list){
3619 if (card->dev == dev){
3620 rc = QETH_REAL_CARD;
3621 break;
3622 }
3623 rc = qeth_verify_vlan_dev(dev, card);
3624 if (rc)
3625 break;
3626 }
3627 read_unlock_irqrestore(&qeth_card_list.rwlock, flags);
3628
3629 return rc;
3630 }
3631
3632 static struct qeth_card *
3633 qeth_get_card_from_dev(struct net_device *dev)
3634 {
3635 struct qeth_card *card = NULL;
3636 int rc;
3637
3638 rc = qeth_verify_dev(dev);
3639 if (rc == QETH_REAL_CARD)
3640 card = (struct qeth_card *)dev->priv;
3641 else if (rc == QETH_VLAN_CARD)
3642 card = (struct qeth_card *)
3643 VLAN_DEV_INFO(dev)->real_dev->priv;
3644
3645 QETH_DBF_TEXT_(trace, 4, "%d", rc);
3646 return card ;
3647 }
3648
3649 static void
3650 qeth_tx_timeout(struct net_device *dev)
3651 {
3652 struct qeth_card *card;
3653
3654 card = (struct qeth_card *) dev->priv;
3655 card->stats.tx_errors++;
3656 qeth_schedule_recovery(card);
3657 }
3658
3659 static int
3660 qeth_open(struct net_device *dev)
3661 {
3662 struct qeth_card *card;
3663
3664 QETH_DBF_TEXT(trace, 4, "qethopen");
3665
3666 card = (struct qeth_card *) dev->priv;
3667
3668 if (card->state != CARD_STATE_SOFTSETUP)
3669 return -ENODEV;
3670
3671 if ( (card->options.layer2) &&
3672 (!card->info.layer2_mac_registered)) {
3673 QETH_DBF_TEXT(trace,4,"nomacadr");
3674 return -EPERM;
3675 }
3676 card->dev->flags |= IFF_UP;
3677 netif_start_queue(dev);
3678 card->data.state = CH_STATE_UP;
3679 card->state = CARD_STATE_UP;
3680
3681 if (!card->lan_online){
3682 if (netif_carrier_ok(dev))
3683 netif_carrier_off(dev);
3684 }
3685 return 0;
3686 }
3687
3688 static int
3689 qeth_stop(struct net_device *dev)
3690 {
3691 struct qeth_card *card;
3692
3693 QETH_DBF_TEXT(trace, 4, "qethstop");
3694
3695 card = (struct qeth_card *) dev->priv;
3696
3697 netif_stop_queue(dev);
3698 card->dev->flags &= ~IFF_UP;
3699 if (card->state == CARD_STATE_UP)
3700 card->state = CARD_STATE_SOFTSETUP;
3701 return 0;
3702 }
3703
3704 static inline int
3705 qeth_get_cast_type(struct qeth_card *card, struct sk_buff *skb)
3706 {
3707 int cast_type = RTN_UNSPEC;
3708
3709 if (skb->dst && skb->dst->neighbour){
3710 cast_type = skb->dst->neighbour->type;
3711 if ((cast_type == RTN_BROADCAST) ||
3712 (cast_type == RTN_MULTICAST) ||
3713 (cast_type == RTN_ANYCAST))
3714 return cast_type;
3715 else
3716 return RTN_UNSPEC;
3717 }
3718 /* try something else */
3719 if (skb->protocol == ETH_P_IPV6)
3720 return (skb->nh.raw[24] == 0xff) ? RTN_MULTICAST : 0;
3721 else if (skb->protocol == ETH_P_IP)
3722 return ((skb->nh.raw[16] & 0xf0) == 0xe0) ? RTN_MULTICAST : 0;
3723 /* ... */
3724 if (!memcmp(skb->data, skb->dev->broadcast, 6))
3725 return RTN_BROADCAST;
3726 else {
3727 u16 hdr_mac;
3728
3729 hdr_mac = *((u16 *)skb->data);
3730 /* tr multicast? */
3731 switch (card->info.link_type) {
3732 case QETH_LINK_TYPE_HSTR:
3733 case QETH_LINK_TYPE_LANE_TR:
3734 if ((hdr_mac == QETH_TR_MAC_NC) ||
3735 (hdr_mac == QETH_TR_MAC_C))
3736 return RTN_MULTICAST;
3737 /* eth or so multicast? */
3738 default:
3739 if ((hdr_mac == QETH_ETH_MAC_V4) ||
3740 (hdr_mac == QETH_ETH_MAC_V6))
3741 return RTN_MULTICAST;
3742 }
3743 }
3744 return cast_type;
3745 }
3746
3747 static inline int
3748 qeth_get_priority_queue(struct qeth_card *card, struct sk_buff *skb,
3749 int ipv, int cast_type)
3750 {
3751 if (!ipv && (card->info.type == QETH_CARD_TYPE_OSAE))
3752 return card->qdio.default_out_queue;
3753 switch (card->qdio.no_out_queues) {
3754 case 4:
3755 if (cast_type && card->info.is_multicast_different)
3756 return card->info.is_multicast_different &
3757 (card->qdio.no_out_queues - 1);
3758 if (card->qdio.do_prio_queueing && (ipv == 4)) {
3759 if (card->qdio.do_prio_queueing==QETH_PRIO_Q_ING_TOS){
3760 if (skb->nh.iph->tos & IP_TOS_NOTIMPORTANT)
3761 return 3;
3762 if (skb->nh.iph->tos & IP_TOS_HIGHRELIABILITY)
3763 return 2;
3764 if (skb->nh.iph->tos & IP_TOS_HIGHTHROUGHPUT)
3765 return 1;
3766 if (skb->nh.iph->tos & IP_TOS_LOWDELAY)
3767 return 0;
3768 }
3769 if (card->qdio.do_prio_queueing==QETH_PRIO_Q_ING_PREC)
3770 return 3 - (skb->nh.iph->tos >> 6);
3771 } else if (card->qdio.do_prio_queueing && (ipv == 6)) {
3772 /* TODO: IPv6!!! */
3773 }
3774 return card->qdio.default_out_queue;
3775 case 1: /* fallthrough for single-out-queue 1920-device */
3776 default:
3777 return card->qdio.default_out_queue;
3778 }
3779 }
3780
3781 static inline int
3782 qeth_get_ip_version(struct sk_buff *skb)
3783 {
3784 switch (skb->protocol) {
3785 case ETH_P_IPV6:
3786 return 6;
3787 case ETH_P_IP:
3788 return 4;
3789 default:
3790 return 0;
3791 }
3792 }
3793
3794 static inline int
3795 qeth_prepare_skb(struct qeth_card *card, struct sk_buff **skb,
3796 struct qeth_hdr **hdr, int ipv)
3797 {
3798 #ifdef CONFIG_QETH_VLAN
3799 u16 *tag;
3800 #endif
3801
3802 QETH_DBF_TEXT(trace, 6, "prepskb");
3803
3804 #ifdef CONFIG_QETH_VLAN
3805 if (card->vlangrp && vlan_tx_tag_present(*skb) &&
3806 ((ipv == 6) || card->options.layer2) ) {
3807 /*
3808 * Move the mac addresses (6 bytes src, 6 bytes dest)
3809 * to the beginning of the new header. We are using three
3810 * memcpys instead of one memmove to save cycles.
3811 */
3812 skb_push(*skb, VLAN_HLEN);
3813 memcpy((*skb)->data, (*skb)->data + 4, 4);
3814 memcpy((*skb)->data + 4, (*skb)->data + 8, 4);
3815 memcpy((*skb)->data + 8, (*skb)->data + 12, 4);
3816 tag = (u16 *)((*skb)->data + 12);
3817 /*
3818 * first two bytes = ETH_P_8021Q (0x8100)
3819 * second two bytes = VLANID
3820 */
3821 *tag = __constant_htons(ETH_P_8021Q);
3822 *(tag + 1) = htons(vlan_tx_tag_get(*skb));
3823 }
3824 #endif
3825 *hdr = (struct qeth_hdr *)
3826 qeth_push_skb(card, skb, sizeof(struct qeth_hdr));
3827 if (hdr == NULL)
3828 return -EINVAL;
3829 return 0;
3830 }
3831
3832 static inline u8
3833 qeth_get_qeth_hdr_flags4(int cast_type)
3834 {
3835 if (cast_type == RTN_MULTICAST)
3836 return QETH_CAST_MULTICAST;
3837 if (cast_type == RTN_BROADCAST)
3838 return QETH_CAST_BROADCAST;
3839 return QETH_CAST_UNICAST;
3840 }
3841
3842 static inline u8
3843 qeth_get_qeth_hdr_flags6(int cast_type)
3844 {
3845 u8 ct = QETH_HDR_PASSTHRU | QETH_HDR_IPV6;
3846 if (cast_type == RTN_MULTICAST)
3847 return ct | QETH_CAST_MULTICAST;
3848 if (cast_type == RTN_ANYCAST)
3849 return ct | QETH_CAST_ANYCAST;
3850 if (cast_type == RTN_BROADCAST)
3851 return ct | QETH_CAST_BROADCAST;
3852 return ct | QETH_CAST_UNICAST;
3853 }
3854
3855 static inline void
3856 qeth_layer2_get_packet_type(struct qeth_card *card, struct qeth_hdr *hdr,
3857 struct sk_buff *skb)
3858 {
3859 __u16 hdr_mac;
3860
3861 if (!memcmp(skb->data+QETH_HEADER_SIZE,
3862 skb->dev->broadcast,6)) { /* broadcast? */
3863 *(__u32 *)hdr->hdr.l2.flags |=
3864 QETH_LAYER2_FLAG_BROADCAST << 8;
3865 return;
3866 }
3867 hdr_mac=*((__u16*)skb->data);
3868 /* tr multicast? */
3869 switch (card->info.link_type) {
3870 case QETH_LINK_TYPE_HSTR:
3871 case QETH_LINK_TYPE_LANE_TR:
3872 if ((hdr_mac == QETH_TR_MAC_NC) ||
3873 (hdr_mac == QETH_TR_MAC_C) )
3874 *(__u32 *)hdr->hdr.l2.flags |=
3875 QETH_LAYER2_FLAG_MULTICAST << 8;
3876 else
3877 *(__u32 *)hdr->hdr.l2.flags |=
3878 QETH_LAYER2_FLAG_UNICAST << 8;
3879 break;
3880 /* eth or so multicast? */
3881 default:
3882 if ( (hdr_mac==QETH_ETH_MAC_V4) ||
3883 (hdr_mac==QETH_ETH_MAC_V6) )
3884 *(__u32 *)hdr->hdr.l2.flags |=
3885 QETH_LAYER2_FLAG_MULTICAST << 8;
3886 else
3887 *(__u32 *)hdr->hdr.l2.flags |=
3888 QETH_LAYER2_FLAG_UNICAST << 8;
3889 }
3890 }
3891
3892 static inline void
3893 qeth_layer2_fill_header(struct qeth_card *card, struct qeth_hdr *hdr,
3894 struct sk_buff *skb, int cast_type)
3895 {
3896 memset(hdr, 0, sizeof(struct qeth_hdr));
3897 hdr->hdr.l2.id = QETH_HEADER_TYPE_LAYER2;
3898
3899 /* set byte 0 to "0x02" and byte 3 to casting flags */
3900 if (cast_type==RTN_MULTICAST)
3901 *(__u32 *)hdr->hdr.l2.flags |= QETH_LAYER2_FLAG_MULTICAST << 8;
3902 else if (cast_type==RTN_BROADCAST)
3903 *(__u32 *)hdr->hdr.l2.flags |= QETH_LAYER2_FLAG_BROADCAST << 8;
3904 else
3905 qeth_layer2_get_packet_type(card, hdr, skb);
3906
3907 hdr->hdr.l2.pkt_length = skb->len-QETH_HEADER_SIZE;
3908 #ifdef CONFIG_QETH_VLAN
3909 /* VSWITCH relies on the VLAN
3910 * information to be present in
3911 * the QDIO header */
3912 if ((card->vlangrp != NULL) &&
3913 vlan_tx_tag_present(skb)) {
3914 *(__u32 *)hdr->hdr.l2.flags |= QETH_LAYER2_FLAG_VLAN << 8;
3915 hdr->hdr.l2.vlan_id = vlan_tx_tag_get(skb);
3916 }
3917 #endif
3918 }
3919
3920 void
3921 qeth_fill_header(struct qeth_card *card, struct qeth_hdr *hdr,
3922 struct sk_buff *skb, int ipv, int cast_type)
3923 {
3924 QETH_DBF_TEXT(trace, 6, "fillhdr");
3925
3926 memset(hdr, 0, sizeof(struct qeth_hdr));
3927 if (card->options.layer2) {
3928 qeth_layer2_fill_header(card, hdr, skb, cast_type);
3929 return;
3930 }
3931 hdr->hdr.l3.id = QETH_HEADER_TYPE_LAYER3;
3932 hdr->hdr.l3.ext_flags = 0;
3933 #ifdef CONFIG_QETH_VLAN
3934 /*
3935 * before we're going to overwrite this location with next hop ip.
3936 * v6 uses passthrough, v4 sets the tag in the QDIO header.
3937 */
3938 if (card->vlangrp && vlan_tx_tag_present(skb)) {
3939 hdr->hdr.l3.ext_flags = (ipv == 4) ?
3940 QETH_HDR_EXT_VLAN_FRAME :
3941 QETH_HDR_EXT_INCLUDE_VLAN_TAG;
3942 hdr->hdr.l3.vlan_id = vlan_tx_tag_get(skb);
3943 }
3944 #endif /* CONFIG_QETH_VLAN */
3945 hdr->hdr.l3.length = skb->len - sizeof(struct qeth_hdr);
3946 if (ipv == 4) { /* IPv4 */
3947 hdr->hdr.l3.flags = qeth_get_qeth_hdr_flags4(cast_type);
3948 memset(hdr->hdr.l3.dest_addr, 0, 12);
3949 if ((skb->dst) && (skb->dst->neighbour)) {
3950 *((u32 *) (&hdr->hdr.l3.dest_addr[12])) =
3951 *((u32 *) skb->dst->neighbour->primary_key);
3952 } else {
3953 /* fill in destination address used in ip header */
3954 *((u32 *) (&hdr->hdr.l3.dest_addr[12])) = skb->nh.iph->daddr;
3955 }
3956 } else if (ipv == 6) { /* IPv6 or passthru */
3957 hdr->hdr.l3.flags = qeth_get_qeth_hdr_flags6(cast_type);
3958 if ((skb->dst) && (skb->dst->neighbour)) {
3959 memcpy(hdr->hdr.l3.dest_addr,
3960 skb->dst->neighbour->primary_key, 16);
3961 } else {
3962 /* fill in destination address used in ip header */
3963 memcpy(hdr->hdr.l3.dest_addr, &skb->nh.ipv6h->daddr, 16);
3964 }
3965 } else { /* passthrough */
3966 if((skb->dev->type == ARPHRD_IEEE802_TR) &&
3967 !memcmp(skb->data + sizeof(struct qeth_hdr) +
3968 sizeof(__u16), skb->dev->broadcast, 6)) {
3969 hdr->hdr.l3.flags = QETH_CAST_BROADCAST |
3970 QETH_HDR_PASSTHRU;
3971 } else if (!memcmp(skb->data + sizeof(struct qeth_hdr),
3972 skb->dev->broadcast, 6)) { /* broadcast? */
3973 hdr->hdr.l3.flags = QETH_CAST_BROADCAST |
3974 QETH_HDR_PASSTHRU;
3975 } else {
3976 hdr->hdr.l3.flags = (cast_type == RTN_MULTICAST) ?
3977 QETH_CAST_MULTICAST | QETH_HDR_PASSTHRU :
3978 QETH_CAST_UNICAST | QETH_HDR_PASSTHRU;
3979 }
3980 }
3981 }
3982
3983 static inline void
3984 __qeth_fill_buffer(struct sk_buff *skb, struct qdio_buffer *buffer,
3985 int is_tso, int *next_element_to_fill)
3986 {
3987 int length = skb->len;
3988 int length_here;
3989 int element;
3990 char *data;
3991 int first_lap ;
3992
3993 element = *next_element_to_fill;
3994 data = skb->data;
3995 first_lap = (is_tso == 0 ? 1 : 0);
3996
3997 while (length > 0) {
3998 /* length_here is the remaining amount of data in this page */
3999 length_here = PAGE_SIZE - ((unsigned long) data % PAGE_SIZE);
4000 if (length < length_here)
4001 length_here = length;
4002
4003 buffer->element[element].addr = data;
4004 buffer->element[element].length = length_here;
4005 length -= length_here;
4006 if (!length) {
4007 if (first_lap)
4008 buffer->element[element].flags = 0;
4009 else
4010 buffer->element[element].flags =
4011 SBAL_FLAGS_LAST_FRAG;
4012 } else {
4013 if (first_lap)
4014 buffer->element[element].flags =
4015 SBAL_FLAGS_FIRST_FRAG;
4016 else
4017 buffer->element[element].flags =
4018 SBAL_FLAGS_MIDDLE_FRAG;
4019 }
4020 data += length_here;
4021 element++;
4022 first_lap = 0;
4023 }
4024 *next_element_to_fill = element;
4025 }
4026
4027 static inline int
4028 qeth_fill_buffer(struct qeth_qdio_out_q *queue,
4029 struct qeth_qdio_out_buffer *buf,
4030 struct sk_buff *skb)
4031 {
4032 struct qdio_buffer *buffer;
4033 struct qeth_hdr_tso *hdr;
4034 int flush_cnt = 0, hdr_len, large_send = 0;
4035
4036 QETH_DBF_TEXT(trace, 6, "qdfillbf");
4037
4038 buffer = buf->buffer;
4039 atomic_inc(&skb->users);
4040 skb_queue_tail(&buf->skb_list, skb);
4041
4042 hdr = (struct qeth_hdr_tso *) skb->data;
4043 /*check first on TSO ....*/
4044 if (hdr->hdr.hdr.l3.id == QETH_HEADER_TYPE_TSO) {
4045 int element = buf->next_element_to_fill;
4046
4047 hdr_len = sizeof(struct qeth_hdr_tso) + hdr->ext.dg_hdr_len;
4048 /*fill first buffer entry only with header information */
4049 buffer->element[element].addr = skb->data;
4050 buffer->element[element].length = hdr_len;
4051 buffer->element[element].flags = SBAL_FLAGS_FIRST_FRAG;
4052 buf->next_element_to_fill++;
4053 skb->data += hdr_len;
4054 skb->len -= hdr_len;
4055 large_send = 1;
4056 }
4057 if (skb_shinfo(skb)->nr_frags == 0)
4058 __qeth_fill_buffer(skb, buffer, large_send,
4059 (int *)&buf->next_element_to_fill);
4060 else
4061 __qeth_fill_buffer_frag(skb, buffer, large_send,
4062 (int *)&buf->next_element_to_fill);
4063
4064 if (!queue->do_pack) {
4065 QETH_DBF_TEXT(trace, 6, "fillbfnp");
4066 /* set state to PRIMED -> will be flushed */
4067 atomic_set(&buf->state, QETH_QDIO_BUF_PRIMED);
4068 flush_cnt = 1;
4069 } else {
4070 QETH_DBF_TEXT(trace, 6, "fillbfpa");
4071 #ifdef CONFIG_QETH_PERF_STATS
4072 queue->card->perf_stats.skbs_sent_pack++;
4073 #endif
4074 if (buf->next_element_to_fill >=
4075 QETH_MAX_BUFFER_ELEMENTS(queue->card)) {
4076 /*
4077 * packed buffer if full -> set state PRIMED
4078 * -> will be flushed
4079 */
4080 atomic_set(&buf->state, QETH_QDIO_BUF_PRIMED);
4081 flush_cnt = 1;
4082 }
4083 }
4084 return flush_cnt;
4085 }
4086
4087 static inline int
4088 qeth_do_send_packet_fast(struct qeth_card *card, struct qeth_qdio_out_q *queue,
4089 struct sk_buff *skb, struct qeth_hdr *hdr,
4090 int elements_needed,
4091 struct qeth_eddp_context *ctx)
4092 {
4093 struct qeth_qdio_out_buffer *buffer;
4094 int buffers_needed = 0;
4095 int flush_cnt = 0;
4096 int index;
4097
4098 QETH_DBF_TEXT(trace, 6, "dosndpfa");
4099
4100 /* spin until we get the queue ... */
4101 while (atomic_compare_and_swap(QETH_OUT_Q_UNLOCKED,
4102 QETH_OUT_Q_LOCKED,
4103 &queue->state));
4104 /* ... now we've got the queue */
4105 index = queue->next_buf_to_fill;
4106 buffer = &queue->bufs[queue->next_buf_to_fill];
4107 /*
4108 * check if buffer is empty to make sure that we do not 'overtake'
4109 * ourselves and try to fill a buffer that is already primed
4110 */
4111 if (atomic_read(&buffer->state) != QETH_QDIO_BUF_EMPTY) {
4112 card->stats.tx_dropped++;
4113 atomic_set(&queue->state, QETH_OUT_Q_UNLOCKED);
4114 return -EBUSY;
4115 }
4116 if (ctx == NULL)
4117 queue->next_buf_to_fill = (queue->next_buf_to_fill + 1) %
4118 QDIO_MAX_BUFFERS_PER_Q;
4119 else {
4120 buffers_needed = qeth_eddp_check_buffers_for_context(queue,ctx);
4121 if (buffers_needed < 0) {
4122 card->stats.tx_dropped++;
4123 atomic_set(&queue->state, QETH_OUT_Q_UNLOCKED);
4124 return -EBUSY;
4125 }
4126 queue->next_buf_to_fill =
4127 (queue->next_buf_to_fill + buffers_needed) %
4128 QDIO_MAX_BUFFERS_PER_Q;
4129 }
4130 atomic_set(&queue->state, QETH_OUT_Q_UNLOCKED);
4131 if (ctx == NULL) {
4132 qeth_fill_buffer(queue, buffer, skb);
4133 qeth_flush_buffers(queue, 0, index, 1);
4134 } else {
4135 flush_cnt = qeth_eddp_fill_buffer(queue, ctx, index);
4136 WARN_ON(buffers_needed != flush_cnt);
4137 qeth_flush_buffers(queue, 0, index, flush_cnt);
4138 }
4139 return 0;
4140 }
4141
4142 static inline int
4143 qeth_do_send_packet(struct qeth_card *card, struct qeth_qdio_out_q *queue,
4144 struct sk_buff *skb, struct qeth_hdr *hdr,
4145 int elements_needed, struct qeth_eddp_context *ctx)
4146 {
4147 struct qeth_qdio_out_buffer *buffer;
4148 int start_index;
4149 int flush_count = 0;
4150 int do_pack = 0;
4151 int tmp;
4152 int rc = 0;
4153
4154 QETH_DBF_TEXT(trace, 6, "dosndpkt");
4155
4156 /* spin until we get the queue ... */
4157 while (atomic_compare_and_swap(QETH_OUT_Q_UNLOCKED,
4158 QETH_OUT_Q_LOCKED,
4159 &queue->state));
4160 start_index = queue->next_buf_to_fill;
4161 buffer = &queue->bufs[queue->next_buf_to_fill];
4162 /*
4163 * check if buffer is empty to make sure that we do not 'overtake'
4164 * ourselves and try to fill a buffer that is already primed
4165 */
4166 if (atomic_read(&buffer->state) != QETH_QDIO_BUF_EMPTY){
4167 card->stats.tx_dropped++;
4168 atomic_set(&queue->state, QETH_OUT_Q_UNLOCKED);
4169 return -EBUSY;
4170 }
4171 /* check if we need to switch packing state of this queue */
4172 qeth_switch_to_packing_if_needed(queue);
4173 if (queue->do_pack){
4174 do_pack = 1;
4175 if (ctx == NULL) {
4176 /* does packet fit in current buffer? */
4177 if((QETH_MAX_BUFFER_ELEMENTS(card) -
4178 buffer->next_element_to_fill) < elements_needed){
4179 /* ... no -> set state PRIMED */
4180 atomic_set(&buffer->state,QETH_QDIO_BUF_PRIMED);
4181 flush_count++;
4182 queue->next_buf_to_fill =
4183 (queue->next_buf_to_fill + 1) %
4184 QDIO_MAX_BUFFERS_PER_Q;
4185 buffer = &queue->bufs[queue->next_buf_to_fill];
4186 /* we did a step forward, so check buffer state
4187 * again */
4188 if (atomic_read(&buffer->state) !=
4189 QETH_QDIO_BUF_EMPTY){
4190 card->stats.tx_dropped++;
4191 qeth_flush_buffers(queue, 0, start_index, flush_count);
4192 atomic_set(&queue->state, QETH_OUT_Q_UNLOCKED);
4193 return -EBUSY;
4194 }
4195 }
4196 } else {
4197 /* check if we have enough elements (including following
4198 * free buffers) to handle eddp context */
4199 if (qeth_eddp_check_buffers_for_context(queue,ctx) < 0){
4200 printk("eddp tx_dropped 1\n");
4201 card->stats.tx_dropped++;
4202 rc = -EBUSY;
4203 goto out;
4204 }
4205 }
4206 }
4207 if (ctx == NULL)
4208 tmp = qeth_fill_buffer(queue, buffer, skb);
4209 else {
4210 tmp = qeth_eddp_fill_buffer(queue,ctx,queue->next_buf_to_fill);
4211 if (tmp < 0) {
4212 printk("eddp tx_dropped 2\n");
4213 card->stats.tx_dropped++;
4214 rc = - EBUSY;
4215 goto out;
4216 }
4217 }
4218 queue->next_buf_to_fill = (queue->next_buf_to_fill + tmp) %
4219 QDIO_MAX_BUFFERS_PER_Q;
4220 flush_count += tmp;
4221 out:
4222 if (flush_count)
4223 qeth_flush_buffers(queue, 0, start_index, flush_count);
4224 /*
4225 * queue->state will go from LOCKED -> UNLOCKED or from
4226 * LOCKED_FLUSH -> LOCKED if output_handler wanted to 'notify' us
4227 * (switch packing state or flush buffer to get another pci flag out).
4228 * In that case we will enter this loop
4229 */
4230 while (atomic_dec_return(&queue->state)){
4231 flush_count = 0;
4232 start_index = queue->next_buf_to_fill;
4233 /* check if we can go back to non-packing state */
4234 flush_count += qeth_switch_to_nonpacking_if_needed(queue);
4235 /*
4236 * check if we need to flush a packing buffer to get a pci
4237 * flag out on the queue
4238 */
4239 if (!flush_count && !atomic_read(&queue->set_pci_flags_count))
4240 flush_count += qeth_flush_buffers_on_no_pci(queue);
4241 if (flush_count)
4242 qeth_flush_buffers(queue, 0, start_index, flush_count);
4243 }
4244 /* at this point the queue is UNLOCKED again */
4245 #ifdef CONFIG_QETH_PERF_STATS
4246 if (do_pack)
4247 queue->card->perf_stats.bufs_sent_pack += flush_count;
4248 #endif /* CONFIG_QETH_PERF_STATS */
4249
4250 return rc;
4251 }
4252
4253 static inline int
4254 qeth_get_elements_no(struct qeth_card *card, void *hdr, struct sk_buff *skb)
4255 {
4256 int elements_needed = 0;
4257
4258 if (skb_shinfo(skb)->nr_frags > 0) {
4259 elements_needed = (skb_shinfo(skb)->nr_frags + 1);
4260 }
4261 if (elements_needed == 0 )
4262 elements_needed = 1 + (((((unsigned long) hdr) % PAGE_SIZE)
4263 + skb->len) >> PAGE_SHIFT);
4264 if (elements_needed > QETH_MAX_BUFFER_ELEMENTS(card)){
4265 PRINT_ERR("qeth_do_send_packet: invalid size of "
4266 "IP packet. Discarded.");
4267 return 0;
4268 }
4269 return elements_needed;
4270 }
4271
4272 static inline int
4273 qeth_send_packet(struct qeth_card *card, struct sk_buff *skb)
4274 {
4275 int ipv = 0;
4276 int cast_type;
4277 struct qeth_qdio_out_q *queue;
4278 struct qeth_hdr *hdr;
4279 int elements_needed = 0;
4280 enum qeth_large_send_types large_send = QETH_LARGE_SEND_NO;
4281 struct qeth_eddp_context *ctx = NULL;
4282 int rc;
4283
4284 QETH_DBF_TEXT(trace, 6, "sendpkt");
4285
4286 if (!card->options.layer2) {
4287 ipv = qeth_get_ip_version(skb);
4288 if ((card->dev->hard_header == qeth_fake_header) && ipv) {
4289 if ((skb = qeth_pskb_unshare(skb,GFP_ATOMIC)) == NULL) {
4290 card->stats.tx_dropped++;
4291 dev_kfree_skb_irq(skb);
4292 return 0;
4293 }
4294 if(card->dev->type == ARPHRD_IEEE802_TR){
4295 skb_pull(skb, QETH_FAKE_LL_LEN_TR);
4296 } else {
4297 skb_pull(skb, QETH_FAKE_LL_LEN_ETH);
4298 }
4299 }
4300 }
4301 cast_type = qeth_get_cast_type(card, skb);
4302 if ((cast_type == RTN_BROADCAST) && (card->info.broadcast_capable == 0)){
4303 card->stats.tx_dropped++;
4304 card->stats.tx_errors++;
4305 dev_kfree_skb_any(skb);
4306 return NETDEV_TX_OK;
4307 }
4308 queue = card->qdio.out_qs
4309 [qeth_get_priority_queue(card, skb, ipv, cast_type)];
4310
4311 if (skb_shinfo(skb)->tso_size)
4312 large_send = card->options.large_send;
4313
4314 /*are we able to do TSO ? If so ,prepare and send it from here */
4315 if ((large_send == QETH_LARGE_SEND_TSO) &&
4316 (cast_type == RTN_UNSPEC)) {
4317 rc = qeth_tso_prepare_packet(card, skb, ipv, cast_type);
4318 if (rc) {
4319 card->stats.tx_dropped++;
4320 card->stats.tx_errors++;
4321 dev_kfree_skb_any(skb);
4322 return NETDEV_TX_OK;
4323 }
4324 elements_needed++;
4325 } else {
4326 if ((rc = qeth_prepare_skb(card, &skb, &hdr, ipv))) {
4327 QETH_DBF_TEXT_(trace, 4, "pskbe%d", rc);
4328 return rc;
4329 }
4330 qeth_fill_header(card, hdr, skb, ipv, cast_type);
4331 }
4332
4333 if (large_send == QETH_LARGE_SEND_EDDP) {
4334 ctx = qeth_eddp_create_context(card, skb, hdr);
4335 if (ctx == NULL) {
4336 PRINT_WARN("could not create eddp context\n");
4337 return -EINVAL;
4338 }
4339 } else {
4340 elements_needed += qeth_get_elements_no(card,(void*) hdr, skb);
4341 if (!elements_needed)
4342 return -EINVAL;
4343 }
4344
4345 if (card->info.type != QETH_CARD_TYPE_IQD)
4346 rc = qeth_do_send_packet(card, queue, skb, hdr,
4347 elements_needed, ctx);
4348 else
4349 rc = qeth_do_send_packet_fast(card, queue, skb, hdr,
4350 elements_needed, ctx);
4351 if (!rc){
4352 card->stats.tx_packets++;
4353 card->stats.tx_bytes += skb->len;
4354 #ifdef CONFIG_QETH_PERF_STATS
4355 if (skb_shinfo(skb)->tso_size &&
4356 !(large_send == QETH_LARGE_SEND_NO)) {
4357 card->perf_stats.large_send_bytes += skb->len;
4358 card->perf_stats.large_send_cnt++;
4359 }
4360 if (skb_shinfo(skb)->nr_frags > 0){
4361 card->perf_stats.sg_skbs_sent++;
4362 /* nr_frags + skb->data */
4363 card->perf_stats.sg_frags_sent +=
4364 skb_shinfo(skb)->nr_frags + 1;
4365 }
4366 #endif /* CONFIG_QETH_PERF_STATS */
4367 }
4368 if (ctx != NULL) {
4369 /* drop creator's reference */
4370 qeth_eddp_put_context(ctx);
4371 /* free skb; it's not referenced by a buffer */
4372 if (rc == 0)
4373 dev_kfree_skb_any(skb);
4374
4375 }
4376 return rc;
4377 }
4378
4379 static int
4380 qeth_mdio_read(struct net_device *dev, int phy_id, int regnum)
4381 {
4382 struct qeth_card *card = (struct qeth_card *) dev->priv;
4383 int rc = 0;
4384
4385 switch(regnum){
4386 case MII_BMCR: /* Basic mode control register */
4387 rc = BMCR_FULLDPLX;
4388 if ((card->info.link_type != QETH_LINK_TYPE_GBIT_ETH)&&
4389 (card->info.link_type != QETH_LINK_TYPE_10GBIT_ETH))
4390 rc |= BMCR_SPEED100;
4391 break;
4392 case MII_BMSR: /* Basic mode status register */
4393 rc = BMSR_ERCAP | BMSR_ANEGCOMPLETE | BMSR_LSTATUS |
4394 BMSR_10HALF | BMSR_10FULL | BMSR_100HALF | BMSR_100FULL |
4395 BMSR_100BASE4;
4396 break;
4397 case MII_PHYSID1: /* PHYS ID 1 */
4398 rc = (dev->dev_addr[0] << 16) | (dev->dev_addr[1] << 8) |
4399 dev->dev_addr[2];
4400 rc = (rc >> 5) & 0xFFFF;
4401 break;
4402 case MII_PHYSID2: /* PHYS ID 2 */
4403 rc = (dev->dev_addr[2] << 10) & 0xFFFF;
4404 break;
4405 case MII_ADVERTISE: /* Advertisement control reg */
4406 rc = ADVERTISE_ALL;
4407 break;
4408 case MII_LPA: /* Link partner ability reg */
4409 rc = LPA_10HALF | LPA_10FULL | LPA_100HALF | LPA_100FULL |
4410 LPA_100BASE4 | LPA_LPACK;
4411 break;
4412 case MII_EXPANSION: /* Expansion register */
4413 break;
4414 case MII_DCOUNTER: /* disconnect counter */
4415 break;
4416 case MII_FCSCOUNTER: /* false carrier counter */
4417 break;
4418 case MII_NWAYTEST: /* N-way auto-neg test register */
4419 break;
4420 case MII_RERRCOUNTER: /* rx error counter */
4421 rc = card->stats.rx_errors;
4422 break;
4423 case MII_SREVISION: /* silicon revision */
4424 break;
4425 case MII_RESV1: /* reserved 1 */
4426 break;
4427 case MII_LBRERROR: /* loopback, rx, bypass error */
4428 break;
4429 case MII_PHYADDR: /* physical address */
4430 break;
4431 case MII_RESV2: /* reserved 2 */
4432 break;
4433 case MII_TPISTATUS: /* TPI status for 10mbps */
4434 break;
4435 case MII_NCONFIG: /* network interface config */
4436 break;
4437 default:
4438 rc = 0;
4439 break;
4440 }
4441 return rc;
4442 }
4443
4444 static void
4445 qeth_mdio_write(struct net_device *dev, int phy_id, int regnum, int value)
4446 {
4447 switch(regnum){
4448 case MII_BMCR: /* Basic mode control register */
4449 case MII_BMSR: /* Basic mode status register */
4450 case MII_PHYSID1: /* PHYS ID 1 */
4451 case MII_PHYSID2: /* PHYS ID 2 */
4452 case MII_ADVERTISE: /* Advertisement control reg */
4453 case MII_LPA: /* Link partner ability reg */
4454 case MII_EXPANSION: /* Expansion register */
4455 case MII_DCOUNTER: /* disconnect counter */
4456 case MII_FCSCOUNTER: /* false carrier counter */
4457 case MII_NWAYTEST: /* N-way auto-neg test register */
4458 case MII_RERRCOUNTER: /* rx error counter */
4459 case MII_SREVISION: /* silicon revision */
4460 case MII_RESV1: /* reserved 1 */
4461 case MII_LBRERROR: /* loopback, rx, bypass error */
4462 case MII_PHYADDR: /* physical address */
4463 case MII_RESV2: /* reserved 2 */
4464 case MII_TPISTATUS: /* TPI status for 10mbps */
4465 case MII_NCONFIG: /* network interface config */
4466 default:
4467 break;
4468 }
4469 }
4470
4471 static inline const char *
4472 qeth_arp_get_error_cause(int *rc)
4473 {
4474 switch (*rc) {
4475 case QETH_IPA_ARP_RC_FAILED:
4476 *rc = -EIO;
4477 return "operation failed";
4478 case QETH_IPA_ARP_RC_NOTSUPP:
4479 *rc = -EOPNOTSUPP;
4480 return "operation not supported";
4481 case QETH_IPA_ARP_RC_OUT_OF_RANGE:
4482 *rc = -EINVAL;
4483 return "argument out of range";
4484 case QETH_IPA_ARP_RC_Q_NOTSUPP:
4485 *rc = -EOPNOTSUPP;
4486 return "query operation not supported";
4487 case QETH_IPA_ARP_RC_Q_NO_DATA:
4488 *rc = -ENOENT;
4489 return "no query data available";
4490 default:
4491 return "unknown error";
4492 }
4493 }
4494
4495 static int
4496 qeth_send_simple_setassparms(struct qeth_card *, enum qeth_ipa_funcs,
4497 __u16, long);
4498
4499 static int
4500 qeth_arp_set_no_entries(struct qeth_card *card, int no_entries)
4501 {
4502 int tmp;
4503 int rc;
4504
4505 QETH_DBF_TEXT(trace,3,"arpstnoe");
4506
4507 /* TODO: really not supported by GuestLAN? */
4508 if (card->info.guestlan)
4509 return -EOPNOTSUPP;
4510 if (!qeth_is_supported(card,IPA_ARP_PROCESSING)) {
4511 PRINT_WARN("ARP processing not supported "
4512 "on %s!\n", QETH_CARD_IFNAME(card));
4513 return -EOPNOTSUPP;
4514 }
4515 rc = qeth_send_simple_setassparms(card, IPA_ARP_PROCESSING,
4516 IPA_CMD_ASS_ARP_SET_NO_ENTRIES,
4517 no_entries);
4518 if (rc) {
4519 tmp = rc;
4520 PRINT_WARN("Could not set number of ARP entries on %s: "
4521 "%s (0x%x/%d)\n",
4522 QETH_CARD_IFNAME(card), qeth_arp_get_error_cause(&rc),
4523 tmp, tmp);
4524 }
4525 return rc;
4526 }
4527
4528 static inline void
4529 qeth_copy_arp_entries_stripped(struct qeth_arp_query_info *qinfo,
4530 struct qeth_arp_query_data *qdata,
4531 int entry_size, int uentry_size)
4532 {
4533 char *entry_ptr;
4534 char *uentry_ptr;
4535 int i;
4536
4537 entry_ptr = (char *)&qdata->data;
4538 uentry_ptr = (char *)(qinfo->udata + qinfo->udata_offset);
4539 for (i = 0; i < qdata->no_entries; ++i){
4540 /* strip off 32 bytes "media specific information" */
4541 memcpy(uentry_ptr, (entry_ptr + 32), entry_size - 32);
4542 entry_ptr += entry_size;
4543 uentry_ptr += uentry_size;
4544 }
4545 }
4546
4547 static int
4548 qeth_arp_query_cb(struct qeth_card *card, struct qeth_reply *reply,
4549 unsigned long data)
4550 {
4551 struct qeth_ipa_cmd *cmd;
4552 struct qeth_arp_query_data *qdata;
4553 struct qeth_arp_query_info *qinfo;
4554 int entry_size;
4555 int uentry_size;
4556 int i;
4557
4558 QETH_DBF_TEXT(trace,4,"arpquecb");
4559
4560 qinfo = (struct qeth_arp_query_info *) reply->param;
4561 cmd = (struct qeth_ipa_cmd *) data;
4562 if (cmd->hdr.return_code) {
4563 QETH_DBF_TEXT_(trace,4,"qaer1%i", cmd->hdr.return_code);
4564 return 0;
4565 }
4566 if (cmd->data.setassparms.hdr.return_code) {
4567 cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
4568 QETH_DBF_TEXT_(trace,4,"qaer2%i", cmd->hdr.return_code);
4569 return 0;
4570 }
4571 qdata = &cmd->data.setassparms.data.query_arp;
4572 switch(qdata->reply_bits){
4573 case 5:
4574 uentry_size = entry_size = sizeof(struct qeth_arp_qi_entry5);
4575 if (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES)
4576 uentry_size = sizeof(struct qeth_arp_qi_entry5_short);
4577 break;
4578 case 7:
4579 /* fall through to default */
4580 default:
4581 /* tr is the same as eth -> entry7 */
4582 uentry_size = entry_size = sizeof(struct qeth_arp_qi_entry7);
4583 if (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES)
4584 uentry_size = sizeof(struct qeth_arp_qi_entry7_short);
4585 break;
4586 }
4587 /* check if there is enough room in userspace */
4588 if ((qinfo->udata_len - qinfo->udata_offset) <
4589 qdata->no_entries * uentry_size){
4590 QETH_DBF_TEXT_(trace, 4, "qaer3%i", -ENOMEM);
4591 cmd->hdr.return_code = -ENOMEM;
4592 PRINT_WARN("query ARP user space buffer is too small for "
4593 "the returned number of ARP entries. "
4594 "Aborting query!\n");
4595 goto out_error;
4596 }
4597 QETH_DBF_TEXT_(trace, 4, "anore%i",
4598 cmd->data.setassparms.hdr.number_of_replies);
4599 QETH_DBF_TEXT_(trace, 4, "aseqn%i", cmd->data.setassparms.hdr.seq_no);
4600 QETH_DBF_TEXT_(trace, 4, "anoen%i", qdata->no_entries);
4601
4602 if (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES) {
4603 /* strip off "media specific information" */
4604 qeth_copy_arp_entries_stripped(qinfo, qdata, entry_size,
4605 uentry_size);
4606 } else
4607 /*copy entries to user buffer*/
4608 memcpy(qinfo->udata + qinfo->udata_offset,
4609 (char *)&qdata->data, qdata->no_entries*uentry_size);
4610
4611 qinfo->no_entries += qdata->no_entries;
4612 qinfo->udata_offset += (qdata->no_entries*uentry_size);
4613 /* check if all replies received ... */
4614 if (cmd->data.setassparms.hdr.seq_no <
4615 cmd->data.setassparms.hdr.number_of_replies)
4616 return 1;
4617 memcpy(qinfo->udata, &qinfo->no_entries, 4);
4618 /* keep STRIP_ENTRIES flag so the user program can distinguish
4619 * stripped entries from normal ones */
4620 if (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES)
4621 qdata->reply_bits |= QETH_QARP_STRIP_ENTRIES;
4622 memcpy(qinfo->udata + QETH_QARP_MASK_OFFSET,&qdata->reply_bits,2);
4623 return 0;
4624 out_error:
4625 i = 0;
4626 memcpy(qinfo->udata, &i, 4);
4627 return 0;
4628 }
4629
4630 static int
4631 qeth_send_ipa_arp_cmd(struct qeth_card *card, struct qeth_cmd_buffer *iob,
4632 int len, int (*reply_cb)(struct qeth_card *,
4633 struct qeth_reply *,
4634 unsigned long),
4635 void *reply_param)
4636 {
4637 QETH_DBF_TEXT(trace,4,"sendarp");
4638
4639 memcpy(iob->data, IPA_PDU_HEADER, IPA_PDU_HEADER_SIZE);
4640 memcpy(QETH_IPA_CMD_DEST_ADDR(iob->data),
4641 &card->token.ulp_connection_r, QETH_MPC_TOKEN_LENGTH);
4642 return qeth_send_control_data(card, IPA_PDU_HEADER_SIZE + len, iob,
4643 reply_cb, reply_param);
4644 }
4645
4646 static int
4647 qeth_send_ipa_snmp_cmd(struct qeth_card *card, struct qeth_cmd_buffer *iob,
4648 int len, int (*reply_cb)(struct qeth_card *,
4649 struct qeth_reply *,
4650 unsigned long),
4651 void *reply_param)
4652 {
4653 u16 s1, s2;
4654
4655 QETH_DBF_TEXT(trace,4,"sendsnmp");
4656
4657 memcpy(iob->data, IPA_PDU_HEADER, IPA_PDU_HEADER_SIZE);
4658 memcpy(QETH_IPA_CMD_DEST_ADDR(iob->data),
4659 &card->token.ulp_connection_r, QETH_MPC_TOKEN_LENGTH);
4660 /* adjust PDU length fields in IPA_PDU_HEADER */
4661 s1 = (u32) IPA_PDU_HEADER_SIZE + len;
4662 s2 = (u32) len;
4663 memcpy(QETH_IPA_PDU_LEN_TOTAL(iob->data), &s1, 2);
4664 memcpy(QETH_IPA_PDU_LEN_PDU1(iob->data), &s2, 2);
4665 memcpy(QETH_IPA_PDU_LEN_PDU2(iob->data), &s2, 2);
4666 memcpy(QETH_IPA_PDU_LEN_PDU3(iob->data), &s2, 2);
4667 return qeth_send_control_data(card, IPA_PDU_HEADER_SIZE + len, iob,
4668 reply_cb, reply_param);
4669 }
4670
4671 static struct qeth_cmd_buffer *
4672 qeth_get_setassparms_cmd(struct qeth_card *, enum qeth_ipa_funcs,
4673 __u16, __u16, enum qeth_prot_versions);
4674 static int
4675 qeth_arp_query(struct qeth_card *card, char *udata)
4676 {
4677 struct qeth_cmd_buffer *iob;
4678 struct qeth_arp_query_info qinfo = {0, };
4679 int tmp;
4680 int rc;
4681
4682 QETH_DBF_TEXT(trace,3,"arpquery");
4683
4684 /*
4685 * currently GuestLAN does only deliver all zeros on query arp,
4686 * even though arp processing is supported (according to IPA supp.
4687 * funcs flags); since all zeros is no valueable information,
4688 * we say EOPNOTSUPP for all ARP functions
4689 */
4690 /*if (card->info.guestlan)
4691 return -EOPNOTSUPP; */
4692 if (!qeth_is_supported(card,/*IPA_QUERY_ARP_ADDR_INFO*/
4693 IPA_ARP_PROCESSING)) {
4694 PRINT_WARN("ARP processing not supported "
4695 "on %s!\n", QETH_CARD_IFNAME(card));
4696 return -EOPNOTSUPP;
4697 }
4698 /* get size of userspace buffer and mask_bits -> 6 bytes */
4699 if (copy_from_user(&qinfo, udata, 6))
4700 return -EFAULT;
4701 if (!(qinfo.udata = kmalloc(qinfo.udata_len, GFP_KERNEL)))
4702 return -ENOMEM;
4703 memset(qinfo.udata, 0, qinfo.udata_len);
4704 qinfo.udata_offset = QETH_QARP_ENTRIES_OFFSET;
4705 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
4706 IPA_CMD_ASS_ARP_QUERY_INFO,
4707 sizeof(int),QETH_PROT_IPV4);
4708
4709 rc = qeth_send_ipa_arp_cmd(card, iob,
4710 QETH_SETASS_BASE_LEN+QETH_ARP_CMD_LEN,
4711 qeth_arp_query_cb, (void *)&qinfo);
4712 if (rc) {
4713 tmp = rc;
4714 PRINT_WARN("Error while querying ARP cache on %s: %s "
4715 "(0x%x/%d)\n",
4716 QETH_CARD_IFNAME(card), qeth_arp_get_error_cause(&rc),
4717 tmp, tmp);
4718 copy_to_user(udata, qinfo.udata, 4);
4719 } else {
4720 copy_to_user(udata, qinfo.udata, qinfo.udata_len);
4721 }
4722 kfree(qinfo.udata);
4723 return rc;
4724 }
4725
4726 /**
4727 * SNMP command callback
4728 */
4729 static int
4730 qeth_snmp_command_cb(struct qeth_card *card, struct qeth_reply *reply,
4731 unsigned long sdata)
4732 {
4733 struct qeth_ipa_cmd *cmd;
4734 struct qeth_arp_query_info *qinfo;
4735 struct qeth_snmp_cmd *snmp;
4736 unsigned char *data;
4737 __u16 data_len;
4738
4739 QETH_DBF_TEXT(trace,3,"snpcmdcb");
4740
4741 cmd = (struct qeth_ipa_cmd *) sdata;
4742 data = (unsigned char *)((char *)cmd - reply->offset);
4743 qinfo = (struct qeth_arp_query_info *) reply->param;
4744 snmp = &cmd->data.setadapterparms.data.snmp;
4745
4746 if (cmd->hdr.return_code) {
4747 QETH_DBF_TEXT_(trace,4,"scer1%i", cmd->hdr.return_code);
4748 return 0;
4749 }
4750 if (cmd->data.setadapterparms.hdr.return_code) {
4751 cmd->hdr.return_code = cmd->data.setadapterparms.hdr.return_code;
4752 QETH_DBF_TEXT_(trace,4,"scer2%i", cmd->hdr.return_code);
4753 return 0;
4754 }
4755 data_len = *((__u16*)QETH_IPA_PDU_LEN_PDU1(data));
4756 if (cmd->data.setadapterparms.hdr.seq_no == 1)
4757 data_len -= (__u16)((char *)&snmp->data - (char *)cmd);
4758 else
4759 data_len -= (__u16)((char*)&snmp->request - (char *)cmd);
4760
4761 /* check if there is enough room in userspace */
4762 if ((qinfo->udata_len - qinfo->udata_offset) < data_len) {
4763 QETH_DBF_TEXT_(trace, 4, "scer3%i", -ENOMEM);
4764 cmd->hdr.return_code = -ENOMEM;
4765 return 0;
4766 }
4767 QETH_DBF_TEXT_(trace, 4, "snore%i",
4768 cmd->data.setadapterparms.hdr.used_total);
4769 QETH_DBF_TEXT_(trace, 4, "sseqn%i", cmd->data.setadapterparms.hdr.seq_no);
4770 /*copy entries to user buffer*/
4771 if (cmd->data.setadapterparms.hdr.seq_no == 1) {
4772 memcpy(qinfo->udata + qinfo->udata_offset,
4773 (char *)snmp,
4774 data_len + offsetof(struct qeth_snmp_cmd,data));
4775 qinfo->udata_offset += offsetof(struct qeth_snmp_cmd, data);
4776 } else {
4777 memcpy(qinfo->udata + qinfo->udata_offset,
4778 (char *)&snmp->request, data_len);
4779 }
4780 qinfo->udata_offset += data_len;
4781 /* check if all replies received ... */
4782 QETH_DBF_TEXT_(trace, 4, "srtot%i",
4783 cmd->data.setadapterparms.hdr.used_total);
4784 QETH_DBF_TEXT_(trace, 4, "srseq%i",
4785 cmd->data.setadapterparms.hdr.seq_no);
4786 if (cmd->data.setadapterparms.hdr.seq_no <
4787 cmd->data.setadapterparms.hdr.used_total)
4788 return 1;
4789 return 0;
4790 }
4791
4792 static struct qeth_cmd_buffer *
4793 qeth_get_ipacmd_buffer(struct qeth_card *, enum qeth_ipa_cmds,
4794 enum qeth_prot_versions );
4795
4796 static struct qeth_cmd_buffer *
4797 qeth_get_adapter_cmd(struct qeth_card *card, __u32 command, __u32 cmdlen)
4798 {
4799 struct qeth_cmd_buffer *iob;
4800 struct qeth_ipa_cmd *cmd;
4801
4802 iob = qeth_get_ipacmd_buffer(card,IPA_CMD_SETADAPTERPARMS,
4803 QETH_PROT_IPV4);
4804 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
4805 cmd->data.setadapterparms.hdr.cmdlength = cmdlen;
4806 cmd->data.setadapterparms.hdr.command_code = command;
4807 cmd->data.setadapterparms.hdr.used_total = 1;
4808 cmd->data.setadapterparms.hdr.seq_no = 1;
4809
4810 return iob;
4811 }
4812
4813 /**
4814 * function to send SNMP commands to OSA-E card
4815 */
4816 static int
4817 qeth_snmp_command(struct qeth_card *card, char *udata)
4818 {
4819 struct qeth_cmd_buffer *iob;
4820 struct qeth_ipa_cmd *cmd;
4821 struct qeth_snmp_ureq *ureq;
4822 int req_len;
4823 struct qeth_arp_query_info qinfo = {0, };
4824 int rc = 0;
4825
4826 QETH_DBF_TEXT(trace,3,"snmpcmd");
4827
4828 if (card->info.guestlan)
4829 return -EOPNOTSUPP;
4830
4831 if ((!qeth_adp_supported(card,IPA_SETADP_SET_SNMP_CONTROL)) &&
4832 (!card->options.layer2) ) {
4833 PRINT_WARN("SNMP Query MIBS not supported "
4834 "on %s!\n", QETH_CARD_IFNAME(card));
4835 return -EOPNOTSUPP;
4836 }
4837 /* skip 4 bytes (data_len struct member) to get req_len */
4838 if (copy_from_user(&req_len, udata + sizeof(int), sizeof(int)))
4839 return -EFAULT;
4840 ureq = kmalloc(req_len+sizeof(struct qeth_snmp_ureq_hdr), GFP_KERNEL);
4841 if (!ureq) {
4842 QETH_DBF_TEXT(trace, 2, "snmpnome");
4843 return -ENOMEM;
4844 }
4845 if (copy_from_user(ureq, udata,
4846 req_len+sizeof(struct qeth_snmp_ureq_hdr))){
4847 kfree(ureq);
4848 return -EFAULT;
4849 }
4850 qinfo.udata_len = ureq->hdr.data_len;
4851 if (!(qinfo.udata = kmalloc(qinfo.udata_len, GFP_KERNEL))){
4852 kfree(ureq);
4853 return -ENOMEM;
4854 }
4855 memset(qinfo.udata, 0, qinfo.udata_len);
4856 qinfo.udata_offset = sizeof(struct qeth_snmp_ureq_hdr);
4857
4858 iob = qeth_get_adapter_cmd(card, IPA_SETADP_SET_SNMP_CONTROL,
4859 QETH_SNMP_SETADP_CMDLENGTH + req_len);
4860 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
4861 memcpy(&cmd->data.setadapterparms.data.snmp, &ureq->cmd, req_len);
4862 rc = qeth_send_ipa_snmp_cmd(card, iob, QETH_SETADP_BASE_LEN + req_len,
4863 qeth_snmp_command_cb, (void *)&qinfo);
4864 if (rc)
4865 PRINT_WARN("SNMP command failed on %s: (0x%x)\n",
4866 QETH_CARD_IFNAME(card), rc);
4867 else
4868 copy_to_user(udata, qinfo.udata, qinfo.udata_len);
4869
4870 kfree(ureq);
4871 kfree(qinfo.udata);
4872 return rc;
4873 }
4874
4875 static int
4876 qeth_default_setassparms_cb(struct qeth_card *, struct qeth_reply *,
4877 unsigned long);
4878
4879 static int
4880 qeth_send_setassparms(struct qeth_card *, struct qeth_cmd_buffer *,
4881 __u16, long,
4882 int (*reply_cb)
4883 (struct qeth_card *, struct qeth_reply *, unsigned long),
4884 void *reply_param);
4885
4886 static int
4887 qeth_arp_add_entry(struct qeth_card *card, struct qeth_arp_cache_entry *entry)
4888 {
4889 struct qeth_cmd_buffer *iob;
4890 char buf[16];
4891 int tmp;
4892 int rc;
4893
4894 QETH_DBF_TEXT(trace,3,"arpadent");
4895
4896 /*
4897 * currently GuestLAN does only deliver all zeros on query arp,
4898 * even though arp processing is supported (according to IPA supp.
4899 * funcs flags); since all zeros is no valueable information,
4900 * we say EOPNOTSUPP for all ARP functions
4901 */
4902 if (card->info.guestlan)
4903 return -EOPNOTSUPP;
4904 if (!qeth_is_supported(card,IPA_ARP_PROCESSING)) {
4905 PRINT_WARN("ARP processing not supported "
4906 "on %s!\n", QETH_CARD_IFNAME(card));
4907 return -EOPNOTSUPP;
4908 }
4909
4910 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
4911 IPA_CMD_ASS_ARP_ADD_ENTRY,
4912 sizeof(struct qeth_arp_cache_entry),
4913 QETH_PROT_IPV4);
4914 rc = qeth_send_setassparms(card, iob,
4915 sizeof(struct qeth_arp_cache_entry),
4916 (unsigned long) entry,
4917 qeth_default_setassparms_cb, NULL);
4918 if (rc) {
4919 tmp = rc;
4920 qeth_ipaddr4_to_string((u8 *)entry->ipaddr, buf);
4921 PRINT_WARN("Could not add ARP entry for address %s on %s: "
4922 "%s (0x%x/%d)\n",
4923 buf, QETH_CARD_IFNAME(card),
4924 qeth_arp_get_error_cause(&rc), tmp, tmp);
4925 }
4926 return rc;
4927 }
4928
4929 static int
4930 qeth_arp_remove_entry(struct qeth_card *card, struct qeth_arp_cache_entry *entry)
4931 {
4932 struct qeth_cmd_buffer *iob;
4933 char buf[16] = {0, };
4934 int tmp;
4935 int rc;
4936
4937 QETH_DBF_TEXT(trace,3,"arprment");
4938
4939 /*
4940 * currently GuestLAN does only deliver all zeros on query arp,
4941 * even though arp processing is supported (according to IPA supp.
4942 * funcs flags); since all zeros is no valueable information,
4943 * we say EOPNOTSUPP for all ARP functions
4944 */
4945 if (card->info.guestlan)
4946 return -EOPNOTSUPP;
4947 if (!qeth_is_supported(card,IPA_ARP_PROCESSING)) {
4948 PRINT_WARN("ARP processing not supported "
4949 "on %s!\n", QETH_CARD_IFNAME(card));
4950 return -EOPNOTSUPP;
4951 }
4952 memcpy(buf, entry, 12);
4953 iob = qeth_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
4954 IPA_CMD_ASS_ARP_REMOVE_ENTRY,
4955 12,
4956 QETH_PROT_IPV4);
4957 rc = qeth_send_setassparms(card, iob,
4958 12, (unsigned long)buf,
4959 qeth_default_setassparms_cb, NULL);
4960 if (rc) {
4961 tmp = rc;
4962 memset(buf, 0, 16);
4963 qeth_ipaddr4_to_string((u8 *)entry->ipaddr, buf);
4964 PRINT_WARN("Could not delete ARP entry for address %s on %s: "
4965 "%s (0x%x/%d)\n",
4966 buf, QETH_CARD_IFNAME(card),
4967 qeth_arp_get_error_cause(&rc), tmp, tmp);
4968 }
4969 return rc;
4970 }
4971
4972 static int
4973 qeth_arp_flush_cache(struct qeth_card *card)
4974 {
4975 int rc;
4976 int tmp;
4977
4978 QETH_DBF_TEXT(trace,3,"arpflush");
4979
4980 /*
4981 * currently GuestLAN does only deliver all zeros on query arp,
4982 * even though arp processing is supported (according to IPA supp.
4983 * funcs flags); since all zeros is no valueable information,
4984 * we say EOPNOTSUPP for all ARP functions
4985 */
4986 if (card->info.guestlan || (card->info.type == QETH_CARD_TYPE_IQD))
4987 return -EOPNOTSUPP;
4988 if (!qeth_is_supported(card,IPA_ARP_PROCESSING)) {
4989 PRINT_WARN("ARP processing not supported "
4990 "on %s!\n", QETH_CARD_IFNAME(card));
4991 return -EOPNOTSUPP;
4992 }
4993 rc = qeth_send_simple_setassparms(card, IPA_ARP_PROCESSING,
4994 IPA_CMD_ASS_ARP_FLUSH_CACHE, 0);
4995 if (rc){
4996 tmp = rc;
4997 PRINT_WARN("Could not flush ARP cache on %s: %s (0x%x/%d)\n",
4998 QETH_CARD_IFNAME(card), qeth_arp_get_error_cause(&rc),
4999 tmp, tmp);
5000 }
5001 return rc;
5002 }
5003
5004 static int
5005 qeth_do_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
5006 {
5007 struct qeth_card *card = (struct qeth_card *)dev->priv;
5008 struct qeth_arp_cache_entry arp_entry;
5009 struct mii_ioctl_data *mii_data;
5010 int rc = 0;
5011
5012 if (!card)
5013 return -ENODEV;
5014
5015 if ((card->state != CARD_STATE_UP) &&
5016 (card->state != CARD_STATE_SOFTSETUP))
5017 return -ENODEV;
5018
5019 switch (cmd){
5020 case SIOC_QETH_ARP_SET_NO_ENTRIES:
5021 if ( !capable(CAP_NET_ADMIN) ||
5022 (card->options.layer2) ) {
5023 rc = -EPERM;
5024 break;
5025 }
5026 rc = qeth_arp_set_no_entries(card, rq->ifr_ifru.ifru_ivalue);
5027 break;
5028 case SIOC_QETH_ARP_QUERY_INFO:
5029 if ( !capable(CAP_NET_ADMIN) ||
5030 (card->options.layer2) ) {
5031 rc = -EPERM;
5032 break;
5033 }
5034 rc = qeth_arp_query(card, rq->ifr_ifru.ifru_data);
5035 break;
5036 case SIOC_QETH_ARP_ADD_ENTRY:
5037 if ( !capable(CAP_NET_ADMIN) ||
5038 (card->options.layer2) ) {
5039 rc = -EPERM;
5040 break;
5041 }
5042 if (copy_from_user(&arp_entry, rq->ifr_ifru.ifru_data,
5043 sizeof(struct qeth_arp_cache_entry)))
5044 rc = -EFAULT;
5045 else
5046 rc = qeth_arp_add_entry(card, &arp_entry);
5047 break;
5048 case SIOC_QETH_ARP_REMOVE_ENTRY:
5049 if ( !capable(CAP_NET_ADMIN) ||
5050 (card->options.layer2) ) {
5051 rc = -EPERM;
5052 break;
5053 }
5054 if (copy_from_user(&arp_entry, rq->ifr_ifru.ifru_data,
5055 sizeof(struct qeth_arp_cache_entry)))
5056 rc = -EFAULT;
5057 else
5058 rc = qeth_arp_remove_entry(card, &arp_entry);
5059 break;
5060 case SIOC_QETH_ARP_FLUSH_CACHE:
5061 if ( !capable(CAP_NET_ADMIN) ||
5062 (card->options.layer2) ) {
5063 rc = -EPERM;
5064 break;
5065 }
5066 rc = qeth_arp_flush_cache(card);
5067 break;
5068 case SIOC_QETH_ADP_SET_SNMP_CONTROL:
5069 rc = qeth_snmp_command(card, rq->ifr_ifru.ifru_data);
5070 break;
5071 case SIOC_QETH_GET_CARD_TYPE:
5072 if ((card->info.type == QETH_CARD_TYPE_OSAE) &&
5073 !card->info.guestlan)
5074 return 1;
5075 return 0;
5076 break;
5077 case SIOCGMIIPHY:
5078 mii_data = if_mii(rq);
5079 mii_data->phy_id = 0;
5080 break;
5081 case SIOCGMIIREG:
5082 mii_data = if_mii(rq);
5083 if (mii_data->phy_id != 0)
5084 rc = -EINVAL;
5085 else
5086 mii_data->val_out = qeth_mdio_read(dev,mii_data->phy_id,
5087 mii_data->reg_num);
5088 break;
5089 case SIOCSMIIREG:
5090 rc = -EOPNOTSUPP;
5091 break;
5092 /* TODO: remove return if qeth_mdio_write does something */
5093 if (!capable(CAP_NET_ADMIN)){
5094 rc = -EPERM;
5095 break;
5096 }
5097 mii_data = if_mii(rq);
5098 if (mii_data->phy_id != 0)
5099 rc = -EINVAL;
5100 else
5101 qeth_mdio_write(dev, mii_data->phy_id, mii_data->reg_num,
5102 mii_data->val_in);
5103 break;
5104 default:
5105 rc = -EOPNOTSUPP;
5106 }
5107 if (rc)
5108 QETH_DBF_TEXT_(trace, 2, "ioce%d", rc);
5109 return rc;
5110 }
5111
5112 static struct net_device_stats *
5113 qeth_get_stats(struct net_device *dev)
5114 {
5115 struct qeth_card *card;
5116
5117 card = (struct qeth_card *) (dev->priv);
5118
5119 QETH_DBF_TEXT(trace,5,"getstat");
5120
5121 return &card->stats;
5122 }
5123
5124 static int
5125 qeth_change_mtu(struct net_device *dev, int new_mtu)
5126 {
5127 struct qeth_card *card;
5128 char dbf_text[15];
5129
5130 card = (struct qeth_card *) (dev->priv);
5131
5132 QETH_DBF_TEXT(trace,4,"chgmtu");
5133 sprintf(dbf_text, "%8x", new_mtu);
5134 QETH_DBF_TEXT(trace,4,dbf_text);
5135
5136 if (new_mtu < 64)
5137 return -EINVAL;
5138 if (new_mtu > 65535)
5139 return -EINVAL;
5140 if ((!qeth_is_supported(card,IPA_IP_FRAGMENTATION)) &&
5141 (!qeth_mtu_is_valid(card, new_mtu)))
5142 return -EINVAL;
5143 dev->mtu = new_mtu;
5144 return 0;
5145 }
5146
5147 #ifdef CONFIG_QETH_VLAN
5148 static void
5149 qeth_vlan_rx_register(struct net_device *dev, struct vlan_group *grp)
5150 {
5151 struct qeth_card *card;
5152 unsigned long flags;
5153
5154 QETH_DBF_TEXT(trace,4,"vlanreg");
5155
5156 card = (struct qeth_card *) dev->priv;
5157 spin_lock_irqsave(&card->vlanlock, flags);
5158 card->vlangrp = grp;
5159 spin_unlock_irqrestore(&card->vlanlock, flags);
5160 }
5161
5162 static inline void
5163 qeth_free_vlan_buffer(struct qeth_card *card, struct qeth_qdio_out_buffer *buf,
5164 unsigned short vid)
5165 {
5166 int i;
5167 struct sk_buff *skb;
5168 struct sk_buff_head tmp_list;
5169
5170 skb_queue_head_init(&tmp_list);
5171 for(i = 0; i < QETH_MAX_BUFFER_ELEMENTS(card); ++i){
5172 while ((skb = skb_dequeue(&buf->skb_list))){
5173 if (vlan_tx_tag_present(skb) &&
5174 (vlan_tx_tag_get(skb) == vid)) {
5175 atomic_dec(&skb->users);
5176 dev_kfree_skb(skb);
5177 } else
5178 skb_queue_tail(&tmp_list, skb);
5179 }
5180 }
5181 while ((skb = skb_dequeue(&tmp_list)))
5182 skb_queue_tail(&buf->skb_list, skb);
5183 }
5184
5185 static void
5186 qeth_free_vlan_skbs(struct qeth_card *card, unsigned short vid)
5187 {
5188 int i, j;
5189
5190 QETH_DBF_TEXT(trace, 4, "frvlskbs");
5191 for (i = 0; i < card->qdio.no_out_queues; ++i){
5192 for (j = 0; j < QDIO_MAX_BUFFERS_PER_Q; ++j)
5193 qeth_free_vlan_buffer(card, &card->qdio.
5194 out_qs[i]->bufs[j], vid);
5195 }
5196 }
5197
5198 static void
5199 qeth_free_vlan_addresses4(struct qeth_card *card, unsigned short vid)
5200 {
5201 struct in_device *in_dev;
5202 struct in_ifaddr *ifa;
5203 struct qeth_ipaddr *addr;
5204
5205 QETH_DBF_TEXT(trace, 4, "frvaddr4");
5206 if (!card->vlangrp)
5207 return;
5208 rcu_read_lock();
5209 in_dev = __in_dev_get(card->vlangrp->vlan_devices[vid]);
5210 if (!in_dev)
5211 goto out;
5212 for (ifa = in_dev->ifa_list; ifa; ifa = ifa->ifa_next) {
5213 addr = qeth_get_addr_buffer(QETH_PROT_IPV4);
5214 if (addr){
5215 addr->u.a4.addr = ifa->ifa_address;
5216 addr->u.a4.mask = ifa->ifa_mask;
5217 addr->type = QETH_IP_TYPE_NORMAL;
5218 if (!qeth_delete_ip(card, addr))
5219 kfree(addr);
5220 }
5221 }
5222 out:
5223 rcu_read_unlock();
5224 }
5225
5226 static void
5227 qeth_free_vlan_addresses6(struct qeth_card *card, unsigned short vid)
5228 {
5229 #ifdef CONFIG_QETH_IPV6
5230 struct inet6_dev *in6_dev;
5231 struct inet6_ifaddr *ifa;
5232 struct qeth_ipaddr *addr;
5233
5234 QETH_DBF_TEXT(trace, 4, "frvaddr6");
5235 if (!card->vlangrp)
5236 return;
5237 in6_dev = in6_dev_get(card->vlangrp->vlan_devices[vid]);
5238 if (!in6_dev)
5239 return;
5240 for (ifa = in6_dev->addr_list; ifa; ifa = ifa->lst_next){
5241 addr = qeth_get_addr_buffer(QETH_PROT_IPV6);
5242 if (addr){
5243 memcpy(&addr->u.a6.addr, &ifa->addr,
5244 sizeof(struct in6_addr));
5245 addr->u.a6.pfxlen = ifa->prefix_len;
5246 addr->type = QETH_IP_TYPE_NORMAL;
5247 if (!qeth_delete_ip(card, addr))
5248 kfree(addr);
5249 }
5250 }
5251 in6_dev_put(in6_dev);
5252 #endif /* CONFIG_QETH_IPV6 */
5253 }
5254
5255 static void
5256 qeth_layer2_send_setdelvlan(struct qeth_card *card, __u16 i,
5257 enum qeth_ipa_cmds ipacmd)
5258 {
5259 int rc;
5260 struct qeth_ipa_cmd *cmd;
5261 struct qeth_cmd_buffer *iob;
5262
5263 QETH_DBF_TEXT_(trace, 4, "L2sdv%x",ipacmd);
5264 iob = qeth_get_ipacmd_buffer(card, ipacmd, QETH_PROT_IPV4);
5265 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
5266 cmd->data.setdelvlan.vlan_id = i;
5267
5268 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
5269 if (rc) {
5270 PRINT_ERR("Error in processing VLAN %i on %s: 0x%x. "
5271 "Continuing\n",i, QETH_CARD_IFNAME(card), rc);
5272 QETH_DBF_TEXT_(trace, 2, "L2VL%4x", ipacmd);
5273 QETH_DBF_TEXT_(trace, 2, "L2%s", CARD_BUS_ID(card));
5274 QETH_DBF_TEXT_(trace, 2, "err%d", rc);
5275 }
5276 }
5277
5278 static void
5279 qeth_layer2_process_vlans(struct qeth_card *card, int clear)
5280 {
5281 unsigned short i;
5282
5283 QETH_DBF_TEXT(trace, 3, "L2prcvln");
5284
5285 if (!card->vlangrp)
5286 return;
5287 for (i = 0; i < VLAN_GROUP_ARRAY_LEN; i++) {
5288 if (card->vlangrp->vlan_devices[i] == NULL)
5289 continue;
5290 if (clear)
5291 qeth_layer2_send_setdelvlan(card, i, IPA_CMD_DELVLAN);
5292 else
5293 qeth_layer2_send_setdelvlan(card, i, IPA_CMD_SETVLAN);
5294 }
5295 }
5296
5297 /*add_vid is layer 2 used only ....*/
5298 static void
5299 qeth_vlan_rx_add_vid(struct net_device *dev, unsigned short vid)
5300 {
5301 struct qeth_card *card;
5302
5303 QETH_DBF_TEXT_(trace, 4, "aid:%d", vid);
5304
5305 card = (struct qeth_card *) dev->priv;
5306 if (!card->options.layer2)
5307 return;
5308 qeth_layer2_send_setdelvlan(card, vid, IPA_CMD_SETVLAN);
5309 }
5310
5311 /*... kill_vid used for both modes*/
5312 static void
5313 qeth_vlan_rx_kill_vid(struct net_device *dev, unsigned short vid)
5314 {
5315 struct qeth_card *card;
5316 unsigned long flags;
5317
5318 QETH_DBF_TEXT_(trace, 4, "kid:%d", vid);
5319
5320 card = (struct qeth_card *) dev->priv;
5321 /* free all skbs for the vlan device */
5322 qeth_free_vlan_skbs(card, vid);
5323 spin_lock_irqsave(&card->vlanlock, flags);
5324 /* unregister IP addresses of vlan device */
5325 qeth_free_vlan_addresses4(card, vid);
5326 qeth_free_vlan_addresses6(card, vid);
5327 if (card->vlangrp)
5328 card->vlangrp->vlan_devices[vid] = NULL;
5329 spin_unlock_irqrestore(&card->vlanlock, flags);
5330 if (card->options.layer2)
5331 qeth_layer2_send_setdelvlan(card, vid, IPA_CMD_DELVLAN);
5332 qeth_set_multicast_list(card->dev);
5333 }
5334 #endif
5335
5336 /**
5337 * set multicast address on card
5338 */
5339 static void
5340 qeth_set_multicast_list(struct net_device *dev)
5341 {
5342 struct qeth_card *card = (struct qeth_card *) dev->priv;
5343
5344 QETH_DBF_TEXT(trace,3,"setmulti");
5345 qeth_delete_mc_addresses(card);
5346 qeth_add_multicast_ipv4(card);
5347 #ifdef CONFIG_QETH_IPV6
5348 qeth_add_multicast_ipv6(card);
5349 #endif
5350 if (qeth_set_thread_start_bit(card, QETH_SET_IP_THREAD) == 0)
5351 schedule_work(&card->kernel_thread_starter);
5352 }
5353
5354 static int
5355 qeth_neigh_setup(struct net_device *dev, struct neigh_parms *np)
5356 {
5357 return 0;
5358 }
5359
5360 static void
5361 qeth_get_mac_for_ipm(__u32 ipm, char *mac, struct net_device *dev)
5362 {
5363 if (dev->type == ARPHRD_IEEE802_TR)
5364 ip_tr_mc_map(ipm, mac);
5365 else
5366 ip_eth_mc_map(ipm, mac);
5367 }
5368
5369 static struct qeth_ipaddr *
5370 qeth_get_addr_buffer(enum qeth_prot_versions prot)
5371 {
5372 struct qeth_ipaddr *addr;
5373
5374 addr = kmalloc(sizeof(struct qeth_ipaddr), GFP_ATOMIC);
5375 if (addr == NULL) {
5376 PRINT_WARN("Not enough memory to add address\n");
5377 return NULL;
5378 }
5379 memset(addr,0,sizeof(struct qeth_ipaddr));
5380 addr->type = QETH_IP_TYPE_NORMAL;
5381 addr->proto = prot;
5382 return addr;
5383 }
5384
5385 static void
5386 qeth_delete_mc_addresses(struct qeth_card *card)
5387 {
5388 struct qeth_ipaddr *iptodo;
5389 unsigned long flags;
5390
5391 QETH_DBF_TEXT(trace,4,"delmc");
5392 iptodo = qeth_get_addr_buffer(QETH_PROT_IPV4);
5393 if (!iptodo) {
5394 QETH_DBF_TEXT(trace, 2, "dmcnomem");
5395 return;
5396 }
5397 iptodo->type = QETH_IP_TYPE_DEL_ALL_MC;
5398 spin_lock_irqsave(&card->ip_lock, flags);
5399 if (!__qeth_insert_ip_todo(card, iptodo, 0))
5400 kfree(iptodo);
5401 spin_unlock_irqrestore(&card->ip_lock, flags);
5402 }
5403
5404 static inline void
5405 qeth_add_mc(struct qeth_card *card, struct in_device *in4_dev)
5406 {
5407 struct qeth_ipaddr *ipm;
5408 struct ip_mc_list *im4;
5409 char buf[MAX_ADDR_LEN];
5410
5411 QETH_DBF_TEXT(trace,4,"addmc");
5412 for (im4 = in4_dev->mc_list; im4; im4 = im4->next) {
5413 qeth_get_mac_for_ipm(im4->multiaddr, buf, in4_dev->dev);
5414 ipm = qeth_get_addr_buffer(QETH_PROT_IPV4);
5415 if (!ipm)
5416 continue;
5417 ipm->u.a4.addr = im4->multiaddr;
5418 memcpy(ipm->mac,buf,OSA_ADDR_LEN);
5419 ipm->is_multicast = 1;
5420 if (!qeth_add_ip(card,ipm))
5421 kfree(ipm);
5422 }
5423 }
5424
5425 static inline void
5426 qeth_add_vlan_mc(struct qeth_card *card)
5427 {
5428 #ifdef CONFIG_QETH_VLAN
5429 struct in_device *in_dev;
5430 struct vlan_group *vg;
5431 int i;
5432
5433 QETH_DBF_TEXT(trace,4,"addmcvl");
5434 if ( ((card->options.layer2 == 0) &&
5435 (!qeth_is_supported(card,IPA_FULL_VLAN))) ||
5436 (card->vlangrp == NULL) )
5437 return ;
5438
5439 vg = card->vlangrp;
5440 for (i = 0; i < VLAN_GROUP_ARRAY_LEN; i++) {
5441 if (vg->vlan_devices[i] == NULL ||
5442 !(vg->vlan_devices[i]->flags & IFF_UP))
5443 continue;
5444 in_dev = in_dev_get(vg->vlan_devices[i]);
5445 if (!in_dev)
5446 continue;
5447 read_lock(&in_dev->mc_list_lock);
5448 qeth_add_mc(card,in_dev);
5449 read_unlock(&in_dev->mc_list_lock);
5450 in_dev_put(in_dev);
5451 }
5452 #endif
5453 }
5454
5455 static void
5456 qeth_add_multicast_ipv4(struct qeth_card *card)
5457 {
5458 struct in_device *in4_dev;
5459
5460 QETH_DBF_TEXT(trace,4,"chkmcv4");
5461 in4_dev = in_dev_get(card->dev);
5462 if (in4_dev == NULL)
5463 return;
5464 read_lock(&in4_dev->mc_list_lock);
5465 qeth_add_mc(card, in4_dev);
5466 qeth_add_vlan_mc(card);
5467 read_unlock(&in4_dev->mc_list_lock);
5468 in_dev_put(in4_dev);
5469 }
5470
5471 #ifdef CONFIG_QETH_IPV6
5472 static inline void
5473 qeth_add_mc6(struct qeth_card *card, struct inet6_dev *in6_dev)
5474 {
5475 struct qeth_ipaddr *ipm;
5476 struct ifmcaddr6 *im6;
5477 char buf[MAX_ADDR_LEN];
5478
5479 QETH_DBF_TEXT(trace,4,"addmc6");
5480 for (im6 = in6_dev->mc_list; im6 != NULL; im6 = im6->next) {
5481 ndisc_mc_map(&im6->mca_addr, buf, in6_dev->dev, 0);
5482 ipm = qeth_get_addr_buffer(QETH_PROT_IPV6);
5483 if (!ipm)
5484 continue;
5485 ipm->is_multicast = 1;
5486 memcpy(ipm->mac,buf,OSA_ADDR_LEN);
5487 memcpy(&ipm->u.a6.addr,&im6->mca_addr.s6_addr,
5488 sizeof(struct in6_addr));
5489 if (!qeth_add_ip(card,ipm))
5490 kfree(ipm);
5491 }
5492 }
5493
5494 static inline void
5495 qeth_add_vlan_mc6(struct qeth_card *card)
5496 {
5497 #ifdef CONFIG_QETH_VLAN
5498 struct inet6_dev *in_dev;
5499 struct vlan_group *vg;
5500 int i;
5501
5502 QETH_DBF_TEXT(trace,4,"admc6vl");
5503 if ( ((card->options.layer2 == 0) &&
5504 (!qeth_is_supported(card,IPA_FULL_VLAN))) ||
5505 (card->vlangrp == NULL))
5506 return ;
5507
5508 vg = card->vlangrp;
5509 for (i = 0; i < VLAN_GROUP_ARRAY_LEN; i++) {
5510 if (vg->vlan_devices[i] == NULL ||
5511 !(vg->vlan_devices[i]->flags & IFF_UP))
5512 continue;
5513 in_dev = in6_dev_get(vg->vlan_devices[i]);
5514 if (!in_dev)
5515 continue;
5516 read_lock(&in_dev->lock);
5517 qeth_add_mc6(card,in_dev);
5518 read_unlock(&in_dev->lock);
5519 in6_dev_put(in_dev);
5520 }
5521 #endif /* CONFIG_QETH_VLAN */
5522 }
5523
5524 static void
5525 qeth_add_multicast_ipv6(struct qeth_card *card)
5526 {
5527 struct inet6_dev *in6_dev;
5528
5529 QETH_DBF_TEXT(trace,4,"chkmcv6");
5530 if ((card->options.layer2 == 0) &&
5531 (!qeth_is_supported(card, IPA_IPV6)) )
5532 return ;
5533
5534 in6_dev = in6_dev_get(card->dev);
5535 if (in6_dev == NULL)
5536 return;
5537 read_lock(&in6_dev->lock);
5538 qeth_add_mc6(card, in6_dev);
5539 qeth_add_vlan_mc6(card);
5540 read_unlock(&in6_dev->lock);
5541 in6_dev_put(in6_dev);
5542 }
5543 #endif /* CONFIG_QETH_IPV6 */
5544
5545 static int
5546 qeth_layer2_send_setdelmac(struct qeth_card *card, __u8 *mac,
5547 enum qeth_ipa_cmds ipacmd,
5548 int (*reply_cb) (struct qeth_card *,
5549 struct qeth_reply*,
5550 unsigned long))
5551 {
5552 struct qeth_ipa_cmd *cmd;
5553 struct qeth_cmd_buffer *iob;
5554
5555 QETH_DBF_TEXT(trace, 2, "L2sdmac");
5556 iob = qeth_get_ipacmd_buffer(card, ipacmd, QETH_PROT_IPV4);
5557 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
5558 cmd->data.setdelmac.mac_length = OSA_ADDR_LEN;
5559 memcpy(&cmd->data.setdelmac.mac, mac, OSA_ADDR_LEN);
5560 return qeth_send_ipa_cmd(card, iob, reply_cb, NULL);
5561 }
5562
5563 static int
5564 qeth_layer2_send_setgroupmac_cb(struct qeth_card *card,
5565 struct qeth_reply *reply,
5566 unsigned long data)
5567 {
5568 struct qeth_ipa_cmd *cmd;
5569 __u8 *mac;
5570
5571 QETH_DBF_TEXT(trace, 2, "L2Sgmacb");
5572 cmd = (struct qeth_ipa_cmd *) data;
5573 mac = &cmd->data.setdelmac.mac[0];
5574 /* MAC already registered, needed in couple/uncouple case */
5575 if (cmd->hdr.return_code == 0x2005) {
5576 PRINT_WARN("Group MAC %02x:%02x:%02x:%02x:%02x:%02x " \
5577 "already existing on %s \n",
5578 mac[0], mac[1], mac[2], mac[3], mac[4], mac[5],
5579 QETH_CARD_IFNAME(card));
5580 cmd->hdr.return_code = 0;
5581 }
5582 if (cmd->hdr.return_code)
5583 PRINT_ERR("Could not set group MAC " \
5584 "%02x:%02x:%02x:%02x:%02x:%02x on %s: %x\n",
5585 mac[0], mac[1], mac[2], mac[3], mac[4], mac[5],
5586 QETH_CARD_IFNAME(card),cmd->hdr.return_code);
5587 return 0;
5588 }
5589
5590 static int
5591 qeth_layer2_send_setgroupmac(struct qeth_card *card, __u8 *mac)
5592 {
5593 QETH_DBF_TEXT(trace, 2, "L2Sgmac");
5594 return qeth_layer2_send_setdelmac(card, mac, IPA_CMD_SETGMAC,
5595 qeth_layer2_send_setgroupmac_cb);
5596 }
5597
5598 static int
5599 qeth_layer2_send_delgroupmac_cb(struct qeth_card *card,
5600 struct qeth_reply *reply,
5601 unsigned long data)
5602 {
5603 struct qeth_ipa_cmd *cmd;
5604 __u8 *mac;
5605
5606 QETH_DBF_TEXT(trace, 2, "L2Dgmacb");
5607 cmd = (struct qeth_ipa_cmd *) data;
5608 mac = &cmd->data.setdelmac.mac[0];
5609 if (cmd->hdr.return_code)
5610 PRINT_ERR("Could not delete group MAC " \
5611 "%02x:%02x:%02x:%02x:%02x:%02x on %s: %x\n",
5612 mac[0], mac[1], mac[2], mac[3], mac[4], mac[5],
5613 QETH_CARD_IFNAME(card), cmd->hdr.return_code);
5614 return 0;
5615 }
5616
5617 static int
5618 qeth_layer2_send_delgroupmac(struct qeth_card *card, __u8 *mac)
5619 {
5620 QETH_DBF_TEXT(trace, 2, "L2Dgmac");
5621 return qeth_layer2_send_setdelmac(card, mac, IPA_CMD_DELGMAC,
5622 qeth_layer2_send_delgroupmac_cb);
5623 }
5624
5625 static int
5626 qeth_layer2_send_setmac_cb(struct qeth_card *card,
5627 struct qeth_reply *reply,
5628 unsigned long data)
5629 {
5630 struct qeth_ipa_cmd *cmd;
5631
5632 QETH_DBF_TEXT(trace, 2, "L2Smaccb");
5633 cmd = (struct qeth_ipa_cmd *) data;
5634 if (cmd->hdr.return_code) {
5635 QETH_DBF_TEXT_(trace, 2, "L2er%x", cmd->hdr.return_code);
5636 PRINT_WARN("Error in registering MAC address on " \
5637 "device %s: x%x\n", CARD_BUS_ID(card),
5638 cmd->hdr.return_code);
5639 card->info.layer2_mac_registered = 0;
5640 cmd->hdr.return_code = -EIO;
5641 } else {
5642 card->info.layer2_mac_registered = 1;
5643 memcpy(card->dev->dev_addr,cmd->data.setdelmac.mac,
5644 OSA_ADDR_LEN);
5645 PRINT_INFO("MAC address %2.2x:%2.2x:%2.2x:%2.2x:%2.2x:%2.2x "
5646 "successfully registered on device %s\n",
5647 card->dev->dev_addr[0], card->dev->dev_addr[1],
5648 card->dev->dev_addr[2], card->dev->dev_addr[3],
5649 card->dev->dev_addr[4], card->dev->dev_addr[5],
5650 card->dev->name);
5651 }
5652 return 0;
5653 }
5654
5655 static int
5656 qeth_layer2_send_setmac(struct qeth_card *card, __u8 *mac)
5657 {
5658 QETH_DBF_TEXT(trace, 2, "L2Setmac");
5659 return qeth_layer2_send_setdelmac(card, mac, IPA_CMD_SETVMAC,
5660 qeth_layer2_send_setmac_cb);
5661 }
5662
5663 static int
5664 qeth_layer2_send_delmac_cb(struct qeth_card *card,
5665 struct qeth_reply *reply,
5666 unsigned long data)
5667 {
5668 struct qeth_ipa_cmd *cmd;
5669
5670 QETH_DBF_TEXT(trace, 2, "L2Dmaccb");
5671 cmd = (struct qeth_ipa_cmd *) data;
5672 if (cmd->hdr.return_code) {
5673 PRINT_WARN("Error in deregistering MAC address on " \
5674 "device %s: x%x\n", CARD_BUS_ID(card),
5675 cmd->hdr.return_code);
5676 QETH_DBF_TEXT_(trace, 2, "err%d", cmd->hdr.return_code);
5677 cmd->hdr.return_code = -EIO;
5678 return 0;
5679 }
5680 card->info.layer2_mac_registered = 0;
5681
5682 return 0;
5683 }
5684 static int
5685 qeth_layer2_send_delmac(struct qeth_card *card, __u8 *mac)
5686 {
5687 QETH_DBF_TEXT(trace, 2, "L2Delmac");
5688 if (!card->info.layer2_mac_registered)
5689 return 0;
5690 return qeth_layer2_send_setdelmac(card, mac, IPA_CMD_DELVMAC,
5691 qeth_layer2_send_delmac_cb);
5692 }
5693
5694 static int
5695 qeth_layer2_set_mac_address(struct net_device *dev, void *p)
5696 {
5697 struct sockaddr *addr = p;
5698 struct qeth_card *card;
5699 int rc = 0;
5700
5701 QETH_DBF_TEXT(trace, 3, "setmac");
5702
5703 if (qeth_verify_dev(dev) != QETH_REAL_CARD) {
5704 QETH_DBF_TEXT(trace, 3, "setmcINV");
5705 return -EOPNOTSUPP;
5706 }
5707 card = (struct qeth_card *) dev->priv;
5708
5709 if (!card->options.layer2) {
5710 PRINT_WARN("Setting MAC address on %s is not supported"
5711 "in Layer 3 mode.\n", dev->name);
5712 QETH_DBF_TEXT(trace, 3, "setmcLY3");
5713 return -EOPNOTSUPP;
5714 }
5715 QETH_DBF_TEXT_(trace, 3, "%s", CARD_BUS_ID(card));
5716 QETH_DBF_HEX(trace, 3, addr->sa_data, OSA_ADDR_LEN);
5717 rc = qeth_layer2_send_delmac(card, &card->dev->dev_addr[0]);
5718 if (!rc)
5719 rc = qeth_layer2_send_setmac(card, addr->sa_data);
5720 return rc;
5721 }
5722
5723 static void
5724 qeth_fill_ipacmd_header(struct qeth_card *card, struct qeth_ipa_cmd *cmd,
5725 __u8 command, enum qeth_prot_versions prot)
5726 {
5727 memset(cmd, 0, sizeof (struct qeth_ipa_cmd));
5728 cmd->hdr.command = command;
5729 cmd->hdr.initiator = IPA_CMD_INITIATOR_HOST;
5730 cmd->hdr.seqno = card->seqno.ipa;
5731 cmd->hdr.adapter_type = qeth_get_ipa_adp_type(card->info.link_type);
5732 cmd->hdr.rel_adapter_no = (__u8) card->info.portno;
5733 if (card->options.layer2)
5734 cmd->hdr.prim_version_no = 2;
5735 else
5736 cmd->hdr.prim_version_no = 1;
5737 cmd->hdr.param_count = 1;
5738 cmd->hdr.prot_version = prot;
5739 cmd->hdr.ipa_supported = 0;
5740 cmd->hdr.ipa_enabled = 0;
5741 }
5742
5743 static struct qeth_cmd_buffer *
5744 qeth_get_ipacmd_buffer(struct qeth_card *card, enum qeth_ipa_cmds ipacmd,
5745 enum qeth_prot_versions prot)
5746 {
5747 struct qeth_cmd_buffer *iob;
5748 struct qeth_ipa_cmd *cmd;
5749
5750 iob = qeth_wait_for_buffer(&card->write);
5751 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
5752 qeth_fill_ipacmd_header(card, cmd, ipacmd, prot);
5753
5754 return iob;
5755 }
5756
5757 static int
5758 qeth_send_setdelmc(struct qeth_card *card, struct qeth_ipaddr *addr, int ipacmd)
5759 {
5760 int rc;
5761 struct qeth_cmd_buffer *iob;
5762 struct qeth_ipa_cmd *cmd;
5763
5764 QETH_DBF_TEXT(trace,4,"setdelmc");
5765
5766 iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
5767 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
5768 memcpy(&cmd->data.setdelipm.mac,addr->mac, OSA_ADDR_LEN);
5769 if (addr->proto == QETH_PROT_IPV6)
5770 memcpy(cmd->data.setdelipm.ip6, &addr->u.a6.addr,
5771 sizeof(struct in6_addr));
5772 else
5773 memcpy(&cmd->data.setdelipm.ip4, &addr->u.a4.addr,4);
5774
5775 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
5776
5777 return rc;
5778 }
5779 static inline void
5780 qeth_fill_netmask(u8 *netmask, unsigned int len)
5781 {
5782 int i,j;
5783 for (i=0;i<16;i++) {
5784 j=(len)-(i*8);
5785 if (j >= 8)
5786 netmask[i] = 0xff;
5787 else if (j > 0)
5788 netmask[i] = (u8)(0xFF00>>j);
5789 else
5790 netmask[i] = 0;
5791 }
5792 }
5793
5794 static int
5795 qeth_send_setdelip(struct qeth_card *card, struct qeth_ipaddr *addr,
5796 int ipacmd, unsigned int flags)
5797 {
5798 int rc;
5799 struct qeth_cmd_buffer *iob;
5800 struct qeth_ipa_cmd *cmd;
5801 __u8 netmask[16];
5802
5803 QETH_DBF_TEXT(trace,4,"setdelip");
5804 QETH_DBF_TEXT_(trace,4,"flags%02X", flags);
5805
5806 iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
5807 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
5808 if (addr->proto == QETH_PROT_IPV6) {
5809 memcpy(cmd->data.setdelip6.ip_addr, &addr->u.a6.addr,
5810 sizeof(struct in6_addr));
5811 qeth_fill_netmask(netmask,addr->u.a6.pfxlen);
5812 memcpy(cmd->data.setdelip6.mask, netmask,
5813 sizeof(struct in6_addr));
5814 cmd->data.setdelip6.flags = flags;
5815 } else {
5816 memcpy(cmd->data.setdelip4.ip_addr, &addr->u.a4.addr, 4);
5817 memcpy(cmd->data.setdelip4.mask, &addr->u.a4.mask, 4);
5818 cmd->data.setdelip4.flags = flags;
5819 }
5820
5821 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
5822
5823 return rc;
5824 }
5825
5826 static int
5827 qeth_layer2_register_addr_entry(struct qeth_card *card,
5828 struct qeth_ipaddr *addr)
5829 {
5830 if (!addr->is_multicast)
5831 return 0;
5832 QETH_DBF_TEXT(trace, 2, "setgmac");
5833 QETH_DBF_HEX(trace,3,&addr->mac[0],OSA_ADDR_LEN);
5834 return qeth_layer2_send_setgroupmac(card, &addr->mac[0]);
5835 }
5836
5837 static int
5838 qeth_layer2_deregister_addr_entry(struct qeth_card *card,
5839 struct qeth_ipaddr *addr)
5840 {
5841 if (!addr->is_multicast)
5842 return 0;
5843 QETH_DBF_TEXT(trace, 2, "delgmac");
5844 QETH_DBF_HEX(trace,3,&addr->mac[0],OSA_ADDR_LEN);
5845 return qeth_layer2_send_delgroupmac(card, &addr->mac[0]);
5846 }
5847
5848 static int
5849 qeth_layer3_register_addr_entry(struct qeth_card *card,
5850 struct qeth_ipaddr *addr)
5851 {
5852 char buf[50];
5853 int rc;
5854 int cnt = 3;
5855
5856 if (addr->proto == QETH_PROT_IPV4) {
5857 QETH_DBF_TEXT(trace, 2,"setaddr4");
5858 QETH_DBF_HEX(trace, 3, &addr->u.a4.addr, sizeof(int));
5859 } else if (addr->proto == QETH_PROT_IPV6) {
5860 QETH_DBF_TEXT(trace, 2, "setaddr6");
5861 QETH_DBF_HEX(trace,3,&addr->u.a6.addr,8);
5862 QETH_DBF_HEX(trace,3,((char *)&addr->u.a6.addr)+8,8);
5863 } else {
5864 QETH_DBF_TEXT(trace, 2, "setaddr?");
5865 QETH_DBF_HEX(trace, 3, addr, sizeof(struct qeth_ipaddr));
5866 }
5867 do {
5868 if (addr->is_multicast)
5869 rc = qeth_send_setdelmc(card, addr, IPA_CMD_SETIPM);
5870 else
5871 rc = qeth_send_setdelip(card, addr, IPA_CMD_SETIP,
5872 addr->set_flags);
5873 if (rc)
5874 QETH_DBF_TEXT(trace, 2, "failed");
5875 } while ((--cnt > 0) && rc);
5876 if (rc){
5877 QETH_DBF_TEXT(trace, 2, "FAILED");
5878 qeth_ipaddr_to_string(addr->proto, (u8 *)&addr->u, buf);
5879 PRINT_WARN("Could not register IP address %s (rc=0x%x/%d)\n",
5880 buf, rc, rc);
5881 }
5882 return rc;
5883 }
5884
5885 static int
5886 qeth_layer3_deregister_addr_entry(struct qeth_card *card,
5887 struct qeth_ipaddr *addr)
5888 {
5889 //char buf[50];
5890 int rc;
5891
5892 if (addr->proto == QETH_PROT_IPV4) {
5893 QETH_DBF_TEXT(trace, 2,"deladdr4");
5894 QETH_DBF_HEX(trace, 3, &addr->u.a4.addr, sizeof(int));
5895 } else if (addr->proto == QETH_PROT_IPV6) {
5896 QETH_DBF_TEXT(trace, 2, "deladdr6");
5897 QETH_DBF_HEX(trace,3,&addr->u.a6.addr,8);
5898 QETH_DBF_HEX(trace,3,((char *)&addr->u.a6.addr)+8,8);
5899 } else {
5900 QETH_DBF_TEXT(trace, 2, "deladdr?");
5901 QETH_DBF_HEX(trace, 3, addr, sizeof(struct qeth_ipaddr));
5902 }
5903 if (addr->is_multicast)
5904 rc = qeth_send_setdelmc(card, addr, IPA_CMD_DELIPM);
5905 else
5906 rc = qeth_send_setdelip(card, addr, IPA_CMD_DELIP,
5907 addr->del_flags);
5908 if (rc) {
5909 QETH_DBF_TEXT(trace, 2, "failed");
5910 /* TODO: re-activate this warning as soon as we have a
5911 * clean mirco code
5912 qeth_ipaddr_to_string(addr->proto, (u8 *)&addr->u, buf);
5913 PRINT_WARN("Could not deregister IP address %s (rc=%x)\n",
5914 buf, rc);
5915 */
5916 }
5917 return rc;
5918 }
5919
5920 static int
5921 qeth_register_addr_entry(struct qeth_card *card, struct qeth_ipaddr *addr)
5922 {
5923 if (card->options.layer2)
5924 return qeth_layer2_register_addr_entry(card, addr);
5925
5926 return qeth_layer3_register_addr_entry(card, addr);
5927 }
5928
5929 static int
5930 qeth_deregister_addr_entry(struct qeth_card *card, struct qeth_ipaddr *addr)
5931 {
5932 if (card->options.layer2)
5933 return qeth_layer2_deregister_addr_entry(card, addr);
5934
5935 return qeth_layer3_deregister_addr_entry(card, addr);
5936 }
5937
5938 static u32
5939 qeth_ethtool_get_tx_csum(struct net_device *dev)
5940 {
5941 /* We may need to say that we support tx csum offload if
5942 * we do EDDP or TSO. There are discussions going on to
5943 * enforce rules in the stack and in ethtool that make
5944 * SG and TSO depend on HW_CSUM. At the moment there are
5945 * no such rules....
5946 * If we say yes here, we have to checksum outbound packets
5947 * any time. */
5948 return 0;
5949 }
5950
5951 static int
5952 qeth_ethtool_set_tx_csum(struct net_device *dev, u32 data)
5953 {
5954 return -EINVAL;
5955 }
5956
5957 static u32
5958 qeth_ethtool_get_rx_csum(struct net_device *dev)
5959 {
5960 struct qeth_card *card = (struct qeth_card *)dev->priv;
5961
5962 return (card->options.checksum_type == HW_CHECKSUMMING);
5963 }
5964
5965 static int
5966 qeth_ethtool_set_rx_csum(struct net_device *dev, u32 data)
5967 {
5968 struct qeth_card *card = (struct qeth_card *)dev->priv;
5969
5970 if ((card->state != CARD_STATE_DOWN) &&
5971 (card->state != CARD_STATE_RECOVER))
5972 return -EPERM;
5973 if (data)
5974 card->options.checksum_type = HW_CHECKSUMMING;
5975 else
5976 card->options.checksum_type = SW_CHECKSUMMING;
5977 return 0;
5978 }
5979
5980 static u32
5981 qeth_ethtool_get_sg(struct net_device *dev)
5982 {
5983 struct qeth_card *card = (struct qeth_card *)dev->priv;
5984
5985 return ((card->options.large_send != QETH_LARGE_SEND_NO) &&
5986 (dev->features & NETIF_F_SG));
5987 }
5988
5989 static int
5990 qeth_ethtool_set_sg(struct net_device *dev, u32 data)
5991 {
5992 struct qeth_card *card = (struct qeth_card *)dev->priv;
5993
5994 if (data) {
5995 if (card->options.large_send != QETH_LARGE_SEND_NO)
5996 dev->features |= NETIF_F_SG;
5997 else {
5998 dev->features &= ~NETIF_F_SG;
5999 return -EINVAL;
6000 }
6001 } else
6002 dev->features &= ~NETIF_F_SG;
6003 return 0;
6004 }
6005
6006 static u32
6007 qeth_ethtool_get_tso(struct net_device *dev)
6008 {
6009 struct qeth_card *card = (struct qeth_card *)dev->priv;
6010
6011 return ((card->options.large_send != QETH_LARGE_SEND_NO) &&
6012 (dev->features & NETIF_F_TSO));
6013 }
6014
6015 static int
6016 qeth_ethtool_set_tso(struct net_device *dev, u32 data)
6017 {
6018 struct qeth_card *card = (struct qeth_card *)dev->priv;
6019
6020 if (data) {
6021 if (card->options.large_send != QETH_LARGE_SEND_NO)
6022 dev->features |= NETIF_F_TSO;
6023 else {
6024 dev->features &= ~NETIF_F_TSO;
6025 return -EINVAL;
6026 }
6027 } else
6028 dev->features &= ~NETIF_F_TSO;
6029 return 0;
6030 }
6031
6032 static struct ethtool_ops qeth_ethtool_ops = {
6033 .get_tx_csum = qeth_ethtool_get_tx_csum,
6034 .set_tx_csum = qeth_ethtool_set_tx_csum,
6035 .get_rx_csum = qeth_ethtool_get_rx_csum,
6036 .set_rx_csum = qeth_ethtool_set_rx_csum,
6037 .get_sg = qeth_ethtool_get_sg,
6038 .set_sg = qeth_ethtool_set_sg,
6039 .get_tso = qeth_ethtool_get_tso,
6040 .set_tso = qeth_ethtool_set_tso,
6041 };
6042
6043 static int
6044 qeth_netdev_init(struct net_device *dev)
6045 {
6046 struct qeth_card *card;
6047
6048 card = (struct qeth_card *) dev->priv;
6049
6050 QETH_DBF_TEXT(trace,3,"initdev");
6051
6052 dev->tx_timeout = &qeth_tx_timeout;
6053 dev->watchdog_timeo = QETH_TX_TIMEOUT;
6054 dev->open = qeth_open;
6055 dev->stop = qeth_stop;
6056 dev->hard_start_xmit = qeth_hard_start_xmit;
6057 dev->do_ioctl = qeth_do_ioctl;
6058 dev->get_stats = qeth_get_stats;
6059 dev->change_mtu = qeth_change_mtu;
6060 dev->neigh_setup = qeth_neigh_setup;
6061 dev->set_multicast_list = qeth_set_multicast_list;
6062 #ifdef CONFIG_QETH_VLAN
6063 dev->vlan_rx_register = qeth_vlan_rx_register;
6064 dev->vlan_rx_kill_vid = qeth_vlan_rx_kill_vid;
6065 dev->vlan_rx_add_vid = qeth_vlan_rx_add_vid;
6066 #endif
6067 dev->hard_header = card->orig_hard_header;
6068 if (qeth_get_netdev_flags(card) & IFF_NOARP) {
6069 dev->rebuild_header = NULL;
6070 dev->hard_header = NULL;
6071 if (card->options.fake_ll)
6072 dev->hard_header = qeth_fake_header;
6073 dev->header_cache_update = NULL;
6074 dev->hard_header_cache = NULL;
6075 }
6076 #ifdef CONFIG_QETH_IPV6
6077 /*IPv6 address autoconfiguration stuff*/
6078 if (!(card->info.unique_id & UNIQUE_ID_NOT_BY_CARD))
6079 card->dev->dev_id = card->info.unique_id & 0xffff;
6080 #endif
6081 dev->hard_header_parse = NULL;
6082 dev->set_mac_address = qeth_layer2_set_mac_address;
6083 dev->flags |= qeth_get_netdev_flags(card);
6084 if ((card->options.fake_broadcast) ||
6085 (card->info.broadcast_capable))
6086 dev->flags |= IFF_BROADCAST;
6087 dev->hard_header_len =
6088 qeth_get_hlen(card->info.link_type) + card->options.add_hhlen;
6089 dev->addr_len = OSA_ADDR_LEN;
6090 dev->mtu = card->info.initial_mtu;
6091
6092 SET_ETHTOOL_OPS(dev, &qeth_ethtool_ops);
6093
6094 SET_MODULE_OWNER(dev);
6095 return 0;
6096 }
6097
6098 static void
6099 qeth_init_func_level(struct qeth_card *card)
6100 {
6101 if (card->ipato.enabled) {
6102 if (card->info.type == QETH_CARD_TYPE_IQD)
6103 card->info.func_level =
6104 QETH_IDX_FUNC_LEVEL_IQD_ENA_IPAT;
6105 else
6106 card->info.func_level =
6107 QETH_IDX_FUNC_LEVEL_OSAE_ENA_IPAT;
6108 } else {
6109 if (card->info.type == QETH_CARD_TYPE_IQD)
6110 card->info.func_level =
6111 QETH_IDX_FUNC_LEVEL_IQD_DIS_IPAT;
6112 else
6113 card->info.func_level =
6114 QETH_IDX_FUNC_LEVEL_OSAE_DIS_IPAT;
6115 }
6116 }
6117
6118 /**
6119 * hardsetup card, initialize MPC and QDIO stuff
6120 */
6121 static int
6122 qeth_hardsetup_card(struct qeth_card *card)
6123 {
6124 int retries = 3;
6125 int rc;
6126
6127 QETH_DBF_TEXT(setup, 2, "hrdsetup");
6128
6129 retry:
6130 if (retries < 3){
6131 PRINT_WARN("Retrying to do IDX activates.\n");
6132 ccw_device_set_offline(CARD_DDEV(card));
6133 ccw_device_set_offline(CARD_WDEV(card));
6134 ccw_device_set_offline(CARD_RDEV(card));
6135 ccw_device_set_online(CARD_RDEV(card));
6136 ccw_device_set_online(CARD_WDEV(card));
6137 ccw_device_set_online(CARD_DDEV(card));
6138 }
6139 rc = qeth_qdio_clear_card(card,card->info.type==QETH_CARD_TYPE_OSAE);
6140 if (rc == -ERESTARTSYS) {
6141 QETH_DBF_TEXT(setup, 2, "break1");
6142 return rc;
6143 } else if (rc) {
6144 QETH_DBF_TEXT_(setup, 2, "1err%d", rc);
6145 if (--retries < 0)
6146 goto out;
6147 else
6148 goto retry;
6149 }
6150 if ((rc = qeth_get_unitaddr(card))){
6151 QETH_DBF_TEXT_(setup, 2, "2err%d", rc);
6152 return rc;
6153 }
6154 qeth_init_tokens(card);
6155 qeth_init_func_level(card);
6156 rc = qeth_idx_activate_channel(&card->read, qeth_idx_read_cb);
6157 if (rc == -ERESTARTSYS) {
6158 QETH_DBF_TEXT(setup, 2, "break2");
6159 return rc;
6160 } else if (rc) {
6161 QETH_DBF_TEXT_(setup, 2, "3err%d", rc);
6162 if (--retries < 0)
6163 goto out;
6164 else
6165 goto retry;
6166 }
6167 rc = qeth_idx_activate_channel(&card->write, qeth_idx_write_cb);
6168 if (rc == -ERESTARTSYS) {
6169 QETH_DBF_TEXT(setup, 2, "break3");
6170 return rc;
6171 } else if (rc) {
6172 QETH_DBF_TEXT_(setup, 2, "4err%d", rc);
6173 if (--retries < 0)
6174 goto out;
6175 else
6176 goto retry;
6177 }
6178 if ((rc = qeth_mpc_initialize(card))){
6179 QETH_DBF_TEXT_(setup, 2, "5err%d", rc);
6180 goto out;
6181 }
6182 /*network device will be recovered*/
6183 if (card->dev) {
6184 card->dev->hard_header = card->orig_hard_header;
6185 return 0;
6186 }
6187 /* at first set_online allocate netdev */
6188 card->dev = qeth_get_netdevice(card->info.type,
6189 card->info.link_type);
6190 if (!card->dev){
6191 qeth_qdio_clear_card(card, card->info.type ==
6192 QETH_CARD_TYPE_OSAE);
6193 rc = -ENODEV;
6194 QETH_DBF_TEXT_(setup, 2, "6err%d", rc);
6195 goto out;
6196 }
6197 card->dev->priv = card;
6198 card->orig_hard_header = card->dev->hard_header;
6199 card->dev->type = qeth_get_arphdr_type(card->info.type,
6200 card->info.link_type);
6201 card->dev->init = qeth_netdev_init;
6202 return 0;
6203 out:
6204 PRINT_ERR("Initialization in hardsetup failed! rc=%d\n", rc);
6205 return rc;
6206 }
6207
6208 static int
6209 qeth_default_setassparms_cb(struct qeth_card *card, struct qeth_reply *reply,
6210 unsigned long data)
6211 {
6212 struct qeth_ipa_cmd *cmd;
6213
6214 QETH_DBF_TEXT(trace,4,"defadpcb");
6215
6216 cmd = (struct qeth_ipa_cmd *) data;
6217 if (cmd->hdr.return_code == 0){
6218 cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
6219 if (cmd->hdr.prot_version == QETH_PROT_IPV4)
6220 card->options.ipa4.enabled_funcs = cmd->hdr.ipa_enabled;
6221 #ifdef CONFIG_QETH_IPV6
6222 if (cmd->hdr.prot_version == QETH_PROT_IPV6)
6223 card->options.ipa6.enabled_funcs = cmd->hdr.ipa_enabled;
6224 #endif
6225 }
6226 if (cmd->data.setassparms.hdr.assist_no == IPA_INBOUND_CHECKSUM &&
6227 cmd->data.setassparms.hdr.command_code == IPA_CMD_ASS_START) {
6228 card->info.csum_mask = cmd->data.setassparms.data.flags_32bit;
6229 QETH_DBF_TEXT_(trace, 3, "csum:%d", card->info.csum_mask);
6230 }
6231 return 0;
6232 }
6233
6234 static int
6235 qeth_default_setadapterparms_cb(struct qeth_card *card,
6236 struct qeth_reply *reply,
6237 unsigned long data)
6238 {
6239 struct qeth_ipa_cmd *cmd;
6240
6241 QETH_DBF_TEXT(trace,4,"defadpcb");
6242
6243 cmd = (struct qeth_ipa_cmd *) data;
6244 if (cmd->hdr.return_code == 0)
6245 cmd->hdr.return_code = cmd->data.setadapterparms.hdr.return_code;
6246 return 0;
6247 }
6248
6249 static int
6250 qeth_query_setadapterparms_cb(struct qeth_card *card, struct qeth_reply *reply,
6251 unsigned long data)
6252 {
6253 struct qeth_ipa_cmd *cmd;
6254
6255 QETH_DBF_TEXT(trace,3,"quyadpcb");
6256
6257 cmd = (struct qeth_ipa_cmd *) data;
6258 if (cmd->data.setadapterparms.data.query_cmds_supp.lan_type & 0x7f)
6259 card->info.link_type =
6260 cmd->data.setadapterparms.data.query_cmds_supp.lan_type;
6261 card->options.adp.supported_funcs =
6262 cmd->data.setadapterparms.data.query_cmds_supp.supported_cmds;
6263 return qeth_default_setadapterparms_cb(card, reply, (unsigned long)cmd);
6264 }
6265
6266 static int
6267 qeth_query_setadapterparms(struct qeth_card *card)
6268 {
6269 int rc;
6270 struct qeth_cmd_buffer *iob;
6271
6272 QETH_DBF_TEXT(trace,3,"queryadp");
6273 iob = qeth_get_adapter_cmd(card, IPA_SETADP_QUERY_COMMANDS_SUPPORTED,
6274 sizeof(struct qeth_ipacmd_setadpparms));
6275 rc = qeth_send_ipa_cmd(card, iob, qeth_query_setadapterparms_cb, NULL);
6276 return rc;
6277 }
6278
6279 static int
6280 qeth_setadpparms_change_macaddr_cb(struct qeth_card *card,
6281 struct qeth_reply *reply,
6282 unsigned long data)
6283 {
6284 struct qeth_ipa_cmd *cmd;
6285
6286 QETH_DBF_TEXT(trace,4,"chgmaccb");
6287
6288 cmd = (struct qeth_ipa_cmd *) data;
6289 memcpy(card->dev->dev_addr,
6290 &cmd->data.setadapterparms.data.change_addr.addr,OSA_ADDR_LEN);
6291 qeth_default_setadapterparms_cb(card, reply, (unsigned long) cmd);
6292 return 0;
6293 }
6294
6295 static int
6296 qeth_setadpparms_change_macaddr(struct qeth_card *card)
6297 {
6298 int rc;
6299 struct qeth_cmd_buffer *iob;
6300 struct qeth_ipa_cmd *cmd;
6301
6302 QETH_DBF_TEXT(trace,4,"chgmac");
6303
6304 iob = qeth_get_adapter_cmd(card,IPA_SETADP_ALTER_MAC_ADDRESS,
6305 sizeof(struct qeth_ipacmd_setadpparms));
6306 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
6307 cmd->data.setadapterparms.data.change_addr.cmd = CHANGE_ADDR_READ_MAC;
6308 cmd->data.setadapterparms.data.change_addr.addr_size = OSA_ADDR_LEN;
6309 memcpy(&cmd->data.setadapterparms.data.change_addr.addr,
6310 card->dev->dev_addr, OSA_ADDR_LEN);
6311 rc = qeth_send_ipa_cmd(card, iob, qeth_setadpparms_change_macaddr_cb,
6312 NULL);
6313 return rc;
6314 }
6315
6316 static int
6317 qeth_send_setadp_mode(struct qeth_card *card, __u32 command, __u32 mode)
6318 {
6319 int rc;
6320 struct qeth_cmd_buffer *iob;
6321 struct qeth_ipa_cmd *cmd;
6322
6323 QETH_DBF_TEXT(trace,4,"adpmode");
6324
6325 iob = qeth_get_adapter_cmd(card, command,
6326 sizeof(struct qeth_ipacmd_setadpparms));
6327 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
6328 cmd->data.setadapterparms.data.mode = mode;
6329 rc = qeth_send_ipa_cmd(card, iob, qeth_default_setadapterparms_cb,
6330 NULL);
6331 return rc;
6332 }
6333
6334 static inline int
6335 qeth_setadapter_hstr(struct qeth_card *card)
6336 {
6337 int rc;
6338
6339 QETH_DBF_TEXT(trace,4,"adphstr");
6340
6341 if (qeth_adp_supported(card,IPA_SETADP_SET_BROADCAST_MODE)) {
6342 rc = qeth_send_setadp_mode(card, IPA_SETADP_SET_BROADCAST_MODE,
6343 card->options.broadcast_mode);
6344 if (rc)
6345 PRINT_WARN("couldn't set broadcast mode on "
6346 "device %s: x%x\n",
6347 CARD_BUS_ID(card), rc);
6348 rc = qeth_send_setadp_mode(card, IPA_SETADP_ALTER_MAC_ADDRESS,
6349 card->options.macaddr_mode);
6350 if (rc)
6351 PRINT_WARN("couldn't set macaddr mode on "
6352 "device %s: x%x\n", CARD_BUS_ID(card), rc);
6353 return rc;
6354 }
6355 if (card->options.broadcast_mode == QETH_TR_BROADCAST_LOCAL)
6356 PRINT_WARN("set adapter parameters not available "
6357 "to set broadcast mode, using ALLRINGS "
6358 "on device %s:\n", CARD_BUS_ID(card));
6359 if (card->options.macaddr_mode == QETH_TR_MACADDR_CANONICAL)
6360 PRINT_WARN("set adapter parameters not available "
6361 "to set macaddr mode, using NONCANONICAL "
6362 "on device %s:\n", CARD_BUS_ID(card));
6363 return 0;
6364 }
6365
6366 static int
6367 qeth_setadapter_parms(struct qeth_card *card)
6368 {
6369 int rc;
6370
6371 QETH_DBF_TEXT(setup, 2, "setadprm");
6372
6373 if (!qeth_is_supported(card, IPA_SETADAPTERPARMS)){
6374 PRINT_WARN("set adapter parameters not supported "
6375 "on device %s.\n",
6376 CARD_BUS_ID(card));
6377 QETH_DBF_TEXT(setup, 2, " notsupp");
6378 return 0;
6379 }
6380 rc = qeth_query_setadapterparms(card);
6381 if (rc) {
6382 PRINT_WARN("couldn't set adapter parameters on device %s: "
6383 "x%x\n", CARD_BUS_ID(card), rc);
6384 return rc;
6385 }
6386 if (qeth_adp_supported(card,IPA_SETADP_ALTER_MAC_ADDRESS)) {
6387 rc = qeth_setadpparms_change_macaddr(card);
6388 if (rc)
6389 PRINT_WARN("couldn't get MAC address on "
6390 "device %s: x%x\n",
6391 CARD_BUS_ID(card), rc);
6392 }
6393
6394 if ((card->info.link_type == QETH_LINK_TYPE_HSTR) ||
6395 (card->info.link_type == QETH_LINK_TYPE_LANE_TR))
6396 rc = qeth_setadapter_hstr(card);
6397
6398 return rc;
6399 }
6400
6401 static int
6402 qeth_layer2_initialize(struct qeth_card *card)
6403 {
6404 int rc = 0;
6405
6406
6407 QETH_DBF_TEXT(setup, 2, "doL2init");
6408 QETH_DBF_TEXT_(setup, 2, "doL2%s", CARD_BUS_ID(card));
6409
6410 rc = qeth_setadpparms_change_macaddr(card);
6411 if (rc) {
6412 PRINT_WARN("couldn't get MAC address on "
6413 "device %s: x%x\n",
6414 CARD_BUS_ID(card), rc);
6415 QETH_DBF_TEXT_(setup, 2,"1err%d",rc);
6416 return rc;
6417 }
6418 QETH_DBF_HEX(setup,2, card->dev->dev_addr, OSA_ADDR_LEN);
6419
6420 rc = qeth_layer2_send_setmac(card, &card->dev->dev_addr[0]);
6421 if (rc)
6422 QETH_DBF_TEXT_(setup, 2,"2err%d",rc);
6423 return 0;
6424 }
6425
6426
6427 static int
6428 qeth_send_startstoplan(struct qeth_card *card, enum qeth_ipa_cmds ipacmd,
6429 enum qeth_prot_versions prot)
6430 {
6431 int rc;
6432 struct qeth_cmd_buffer *iob;
6433
6434 iob = qeth_get_ipacmd_buffer(card,ipacmd,prot);
6435 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
6436
6437 return rc;
6438 }
6439
6440 static int
6441 qeth_send_startlan(struct qeth_card *card, enum qeth_prot_versions prot)
6442 {
6443 int rc;
6444
6445 QETH_DBF_TEXT_(setup, 2, "strtlan%i", prot);
6446
6447 rc = qeth_send_startstoplan(card, IPA_CMD_STARTLAN, prot);
6448 return rc;
6449 }
6450
6451 static int
6452 qeth_send_stoplan(struct qeth_card *card)
6453 {
6454 int rc = 0;
6455
6456 /*
6457 * TODO: according to the IPA format document page 14,
6458 * TCP/IP (we!) never issue a STOPLAN
6459 * is this right ?!?
6460 */
6461 QETH_DBF_TEXT(trace, 2, "stoplan");
6462
6463 rc = qeth_send_startstoplan(card, IPA_CMD_STOPLAN, QETH_PROT_IPV4);
6464 return rc;
6465 }
6466
6467 static int
6468 qeth_query_ipassists_cb(struct qeth_card *card, struct qeth_reply *reply,
6469 unsigned long data)
6470 {
6471 struct qeth_ipa_cmd *cmd;
6472
6473 QETH_DBF_TEXT(setup, 2, "qipasscb");
6474
6475 cmd = (struct qeth_ipa_cmd *) data;
6476 if (cmd->hdr.prot_version == QETH_PROT_IPV4) {
6477 card->options.ipa4.supported_funcs = cmd->hdr.ipa_supported;
6478 card->options.ipa4.enabled_funcs = cmd->hdr.ipa_enabled;
6479 } else {
6480 #ifdef CONFIG_QETH_IPV6
6481 card->options.ipa6.supported_funcs = cmd->hdr.ipa_supported;
6482 card->options.ipa6.enabled_funcs = cmd->hdr.ipa_enabled;
6483 #endif
6484 }
6485 QETH_DBF_TEXT(setup, 2, "suppenbl");
6486 QETH_DBF_TEXT_(setup, 2, "%x",cmd->hdr.ipa_supported);
6487 QETH_DBF_TEXT_(setup, 2, "%x",cmd->hdr.ipa_enabled);
6488 return 0;
6489 }
6490
6491 static int
6492 qeth_query_ipassists(struct qeth_card *card, enum qeth_prot_versions prot)
6493 {
6494 int rc;
6495 struct qeth_cmd_buffer *iob;
6496
6497 QETH_DBF_TEXT_(setup, 2, "qipassi%i", prot);
6498 if (card->options.layer2) {
6499 QETH_DBF_TEXT(setup, 2, "noprmly2");
6500 return -EPERM;
6501 }
6502
6503 iob = qeth_get_ipacmd_buffer(card,IPA_CMD_QIPASSIST,prot);
6504 rc = qeth_send_ipa_cmd(card, iob, qeth_query_ipassists_cb, NULL);
6505 return rc;
6506 }
6507
6508 static struct qeth_cmd_buffer *
6509 qeth_get_setassparms_cmd(struct qeth_card *card, enum qeth_ipa_funcs ipa_func,
6510 __u16 cmd_code, __u16 len,
6511 enum qeth_prot_versions prot)
6512 {
6513 struct qeth_cmd_buffer *iob;
6514 struct qeth_ipa_cmd *cmd;
6515
6516 QETH_DBF_TEXT(trace,4,"getasscm");
6517 iob = qeth_get_ipacmd_buffer(card,IPA_CMD_SETASSPARMS,prot);
6518
6519 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
6520 cmd->data.setassparms.hdr.assist_no = ipa_func;
6521 cmd->data.setassparms.hdr.length = 8 + len;
6522 cmd->data.setassparms.hdr.command_code = cmd_code;
6523 cmd->data.setassparms.hdr.return_code = 0;
6524 cmd->data.setassparms.hdr.seq_no = 0;
6525
6526 return iob;
6527 }
6528
6529 static int
6530 qeth_send_setassparms(struct qeth_card *card, struct qeth_cmd_buffer *iob,
6531 __u16 len, long data,
6532 int (*reply_cb)
6533 (struct qeth_card *,struct qeth_reply *,unsigned long),
6534 void *reply_param)
6535 {
6536 int rc;
6537 struct qeth_ipa_cmd *cmd;
6538
6539 QETH_DBF_TEXT(trace,4,"sendassp");
6540
6541 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
6542 if (len <= sizeof(__u32))
6543 cmd->data.setassparms.data.flags_32bit = (__u32) data;
6544 else if (len > sizeof(__u32))
6545 memcpy(&cmd->data.setassparms.data, (void *) data, len);
6546
6547 rc = qeth_send_ipa_cmd(card, iob, reply_cb, reply_param);
6548 return rc;
6549 }
6550
6551 #ifdef CONFIG_QETH_IPV6
6552 static int
6553 qeth_send_simple_setassparms_ipv6(struct qeth_card *card,
6554 enum qeth_ipa_funcs ipa_func, __u16 cmd_code)
6555
6556 {
6557 int rc;
6558 struct qeth_cmd_buffer *iob;
6559
6560 QETH_DBF_TEXT(trace,4,"simassp6");
6561 iob = qeth_get_setassparms_cmd(card, ipa_func, cmd_code,
6562 0, QETH_PROT_IPV6);
6563 rc = qeth_send_setassparms(card, iob, 0, 0,
6564 qeth_default_setassparms_cb, NULL);
6565 return rc;
6566 }
6567 #endif
6568
6569 static int
6570 qeth_send_simple_setassparms(struct qeth_card *card,
6571 enum qeth_ipa_funcs ipa_func,
6572 __u16 cmd_code, long data)
6573 {
6574 int rc;
6575 int length = 0;
6576 struct qeth_cmd_buffer *iob;
6577
6578 QETH_DBF_TEXT(trace,4,"simassp4");
6579 if (data)
6580 length = sizeof(__u32);
6581 iob = qeth_get_setassparms_cmd(card, ipa_func, cmd_code,
6582 length, QETH_PROT_IPV4);
6583 rc = qeth_send_setassparms(card, iob, length, data,
6584 qeth_default_setassparms_cb, NULL);
6585 return rc;
6586 }
6587
6588 static inline int
6589 qeth_start_ipa_arp_processing(struct qeth_card *card)
6590 {
6591 int rc;
6592
6593 QETH_DBF_TEXT(trace,3,"ipaarp");
6594
6595 if (!qeth_is_supported(card,IPA_ARP_PROCESSING)) {
6596 PRINT_WARN("ARP processing not supported "
6597 "on %s!\n", QETH_CARD_IFNAME(card));
6598 return 0;
6599 }
6600 rc = qeth_send_simple_setassparms(card,IPA_ARP_PROCESSING,
6601 IPA_CMD_ASS_START, 0);
6602 if (rc) {
6603 PRINT_WARN("Could not start ARP processing "
6604 "assist on %s: 0x%x\n",
6605 QETH_CARD_IFNAME(card), rc);
6606 }
6607 return rc;
6608 }
6609
6610 static int
6611 qeth_start_ipa_ip_fragmentation(struct qeth_card *card)
6612 {
6613 int rc;
6614
6615 QETH_DBF_TEXT(trace,3,"ipaipfrg");
6616
6617 if (!qeth_is_supported(card, IPA_IP_FRAGMENTATION)) {
6618 PRINT_INFO("Hardware IP fragmentation not supported on %s\n",
6619 QETH_CARD_IFNAME(card));
6620 return -EOPNOTSUPP;
6621 }
6622
6623 rc = qeth_send_simple_setassparms(card, IPA_IP_FRAGMENTATION,
6624 IPA_CMD_ASS_START, 0);
6625 if (rc) {
6626 PRINT_WARN("Could not start Hardware IP fragmentation "
6627 "assist on %s: 0x%x\n",
6628 QETH_CARD_IFNAME(card), rc);
6629 } else
6630 PRINT_INFO("Hardware IP fragmentation enabled \n");
6631 return rc;
6632 }
6633
6634 static int
6635 qeth_start_ipa_source_mac(struct qeth_card *card)
6636 {
6637 int rc;
6638
6639 QETH_DBF_TEXT(trace,3,"stsrcmac");
6640
6641 if (!card->options.fake_ll)
6642 return -EOPNOTSUPP;
6643
6644 if (!qeth_is_supported(card, IPA_SOURCE_MAC)) {
6645 PRINT_INFO("Inbound source address not "
6646 "supported on %s\n", QETH_CARD_IFNAME(card));
6647 return -EOPNOTSUPP;
6648 }
6649
6650 rc = qeth_send_simple_setassparms(card, IPA_SOURCE_MAC,
6651 IPA_CMD_ASS_START, 0);
6652 if (rc)
6653 PRINT_WARN("Could not start inbound source "
6654 "assist on %s: 0x%x\n",
6655 QETH_CARD_IFNAME(card), rc);
6656 return rc;
6657 }
6658
6659 static int
6660 qeth_start_ipa_vlan(struct qeth_card *card)
6661 {
6662 int rc = 0;
6663
6664 QETH_DBF_TEXT(trace,3,"strtvlan");
6665
6666 #ifdef CONFIG_QETH_VLAN
6667 if (!qeth_is_supported(card, IPA_FULL_VLAN)) {
6668 PRINT_WARN("VLAN not supported on %s\n", QETH_CARD_IFNAME(card));
6669 return -EOPNOTSUPP;
6670 }
6671
6672 rc = qeth_send_simple_setassparms(card, IPA_VLAN_PRIO,
6673 IPA_CMD_ASS_START,0);
6674 if (rc) {
6675 PRINT_WARN("Could not start vlan "
6676 "assist on %s: 0x%x\n",
6677 QETH_CARD_IFNAME(card), rc);
6678 } else {
6679 PRINT_INFO("VLAN enabled \n");
6680 card->dev->features |=
6681 NETIF_F_HW_VLAN_FILTER |
6682 NETIF_F_HW_VLAN_TX |
6683 NETIF_F_HW_VLAN_RX;
6684 }
6685 #endif /* QETH_VLAN */
6686 return rc;
6687 }
6688
6689 static int
6690 qeth_start_ipa_multicast(struct qeth_card *card)
6691 {
6692 int rc;
6693
6694 QETH_DBF_TEXT(trace,3,"stmcast");
6695
6696 if (!qeth_is_supported(card, IPA_MULTICASTING)) {
6697 PRINT_WARN("Multicast not supported on %s\n",
6698 QETH_CARD_IFNAME(card));
6699 return -EOPNOTSUPP;
6700 }
6701
6702 rc = qeth_send_simple_setassparms(card, IPA_MULTICASTING,
6703 IPA_CMD_ASS_START,0);
6704 if (rc) {
6705 PRINT_WARN("Could not start multicast "
6706 "assist on %s: rc=%i\n",
6707 QETH_CARD_IFNAME(card), rc);
6708 } else {
6709 PRINT_INFO("Multicast enabled\n");
6710 card->dev->flags |= IFF_MULTICAST;
6711 }
6712 return rc;
6713 }
6714
6715 #ifdef CONFIG_QETH_IPV6
6716 static int
6717 qeth_softsetup_ipv6(struct qeth_card *card)
6718 {
6719 int rc;
6720
6721 QETH_DBF_TEXT(trace,3,"softipv6");
6722
6723 netif_stop_queue(card->dev);
6724 rc = qeth_send_startlan(card, QETH_PROT_IPV6);
6725 if (rc) {
6726 PRINT_ERR("IPv6 startlan failed on %s\n",
6727 QETH_CARD_IFNAME(card));
6728 return rc;
6729 }
6730 netif_wake_queue(card->dev);
6731 rc = qeth_query_ipassists(card,QETH_PROT_IPV6);
6732 if (rc) {
6733 PRINT_ERR("IPv6 query ipassist failed on %s\n",
6734 QETH_CARD_IFNAME(card));
6735 return rc;
6736 }
6737 rc = qeth_send_simple_setassparms(card, IPA_IPV6,
6738 IPA_CMD_ASS_START, 3);
6739 if (rc) {
6740 PRINT_WARN("IPv6 start assist (version 4) failed "
6741 "on %s: 0x%x\n",
6742 QETH_CARD_IFNAME(card), rc);
6743 return rc;
6744 }
6745 rc = qeth_send_simple_setassparms_ipv6(card, IPA_IPV6,
6746 IPA_CMD_ASS_START);
6747 if (rc) {
6748 PRINT_WARN("IPV6 start assist (version 6) failed "
6749 "on %s: 0x%x\n",
6750 QETH_CARD_IFNAME(card), rc);
6751 return rc;
6752 }
6753 rc = qeth_send_simple_setassparms_ipv6(card, IPA_PASSTHRU,
6754 IPA_CMD_ASS_START);
6755 if (rc) {
6756 PRINT_WARN("Could not enable passthrough "
6757 "on %s: 0x%x\n",
6758 QETH_CARD_IFNAME(card), rc);
6759 return rc;
6760 }
6761 PRINT_INFO("IPV6 enabled \n");
6762 return 0;
6763 }
6764
6765 #endif
6766
6767 static int
6768 qeth_start_ipa_ipv6(struct qeth_card *card)
6769 {
6770 int rc = 0;
6771 #ifdef CONFIG_QETH_IPV6
6772 QETH_DBF_TEXT(trace,3,"strtipv6");
6773
6774 if (!qeth_is_supported(card, IPA_IPV6)) {
6775 PRINT_WARN("IPv6 not supported on %s\n",
6776 QETH_CARD_IFNAME(card));
6777 return 0;
6778 }
6779 rc = qeth_softsetup_ipv6(card);
6780 #endif
6781 return rc ;
6782 }
6783
6784 static int
6785 qeth_start_ipa_broadcast(struct qeth_card *card)
6786 {
6787 int rc;
6788
6789 QETH_DBF_TEXT(trace,3,"stbrdcst");
6790 card->info.broadcast_capable = 0;
6791 if (!qeth_is_supported(card, IPA_FILTERING)) {
6792 PRINT_WARN("Broadcast not supported on %s\n",
6793 QETH_CARD_IFNAME(card));
6794 rc = -EOPNOTSUPP;
6795 goto out;
6796 }
6797 rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
6798 IPA_CMD_ASS_START, 0);
6799 if (rc) {
6800 PRINT_WARN("Could not enable broadcasting filtering "
6801 "on %s: 0x%x\n",
6802 QETH_CARD_IFNAME(card), rc);
6803 goto out;
6804 }
6805
6806 rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
6807 IPA_CMD_ASS_CONFIGURE, 1);
6808 if (rc) {
6809 PRINT_WARN("Could not set up broadcast filtering on %s: 0x%x\n",
6810 QETH_CARD_IFNAME(card), rc);
6811 goto out;
6812 }
6813 card->info.broadcast_capable = QETH_BROADCAST_WITH_ECHO;
6814 PRINT_INFO("Broadcast enabled \n");
6815 rc = qeth_send_simple_setassparms(card, IPA_FILTERING,
6816 IPA_CMD_ASS_ENABLE, 1);
6817 if (rc) {
6818 PRINT_WARN("Could not set up broadcast echo filtering on "
6819 "%s: 0x%x\n", QETH_CARD_IFNAME(card), rc);
6820 goto out;
6821 }
6822 card->info.broadcast_capable = QETH_BROADCAST_WITHOUT_ECHO;
6823 out:
6824 if (card->info.broadcast_capable)
6825 card->dev->flags |= IFF_BROADCAST;
6826 else
6827 card->dev->flags &= ~IFF_BROADCAST;
6828 return rc;
6829 }
6830
6831 static int
6832 qeth_send_checksum_command(struct qeth_card *card)
6833 {
6834 int rc;
6835
6836 rc = qeth_send_simple_setassparms(card, IPA_INBOUND_CHECKSUM,
6837 IPA_CMD_ASS_START, 0);
6838 if (rc) {
6839 PRINT_WARN("Starting Inbound HW Checksumming failed on %s: "
6840 "0x%x,\ncontinuing using Inbound SW Checksumming\n",
6841 QETH_CARD_IFNAME(card), rc);
6842 return rc;
6843 }
6844 rc = qeth_send_simple_setassparms(card, IPA_INBOUND_CHECKSUM,
6845 IPA_CMD_ASS_ENABLE,
6846 card->info.csum_mask);
6847 if (rc) {
6848 PRINT_WARN("Enabling Inbound HW Checksumming failed on %s: "
6849 "0x%x,\ncontinuing using Inbound SW Checksumming\n",
6850 QETH_CARD_IFNAME(card), rc);
6851 return rc;
6852 }
6853 return 0;
6854 }
6855
6856 static int
6857 qeth_start_ipa_checksum(struct qeth_card *card)
6858 {
6859 int rc = 0;
6860
6861 QETH_DBF_TEXT(trace,3,"strtcsum");
6862
6863 if (card->options.checksum_type == NO_CHECKSUMMING) {
6864 PRINT_WARN("Using no checksumming on %s.\n",
6865 QETH_CARD_IFNAME(card));
6866 return 0;
6867 }
6868 if (card->options.checksum_type == SW_CHECKSUMMING) {
6869 PRINT_WARN("Using SW checksumming on %s.\n",
6870 QETH_CARD_IFNAME(card));
6871 return 0;
6872 }
6873 if (!qeth_is_supported(card, IPA_INBOUND_CHECKSUM)) {
6874 PRINT_WARN("Inbound HW Checksumming not "
6875 "supported on %s,\ncontinuing "
6876 "using Inbound SW Checksumming\n",
6877 QETH_CARD_IFNAME(card));
6878 card->options.checksum_type = SW_CHECKSUMMING;
6879 return 0;
6880 }
6881 rc = qeth_send_checksum_command(card);
6882 if (!rc) {
6883 PRINT_INFO("HW Checksumming (inbound) enabled \n");
6884 }
6885 return rc;
6886 }
6887
6888 static int
6889 qeth_start_ipa_tso(struct qeth_card *card)
6890 {
6891 int rc;
6892
6893 QETH_DBF_TEXT(trace,3,"sttso");
6894
6895 if (!qeth_is_supported(card, IPA_OUTBOUND_TSO)) {
6896 PRINT_WARN("Outbound TSO not supported on %s\n",
6897 QETH_CARD_IFNAME(card));
6898 rc = -EOPNOTSUPP;
6899 } else {
6900 rc = qeth_send_simple_setassparms(card, IPA_OUTBOUND_TSO,
6901 IPA_CMD_ASS_START,0);
6902 if (rc)
6903 PRINT_WARN("Could not start outbound TSO "
6904 "assist on %s: rc=%i\n",
6905 QETH_CARD_IFNAME(card), rc);
6906 else
6907 PRINT_INFO("Outbound TSO enabled\n");
6908 }
6909 if (rc && (card->options.large_send == QETH_LARGE_SEND_TSO)){
6910 card->options.large_send = QETH_LARGE_SEND_NO;
6911 card->dev->features &= ~ (NETIF_F_TSO | NETIF_F_SG);
6912 }
6913 return rc;
6914 }
6915
6916 static int
6917 qeth_start_ipassists(struct qeth_card *card)
6918 {
6919 QETH_DBF_TEXT(trace,3,"strtipas");
6920 qeth_start_ipa_arp_processing(card); /* go on*/
6921 qeth_start_ipa_ip_fragmentation(card); /* go on*/
6922 qeth_start_ipa_source_mac(card); /* go on*/
6923 qeth_start_ipa_vlan(card); /* go on*/
6924 qeth_start_ipa_multicast(card); /* go on*/
6925 qeth_start_ipa_ipv6(card); /* go on*/
6926 qeth_start_ipa_broadcast(card); /* go on*/
6927 qeth_start_ipa_checksum(card); /* go on*/
6928 qeth_start_ipa_tso(card); /* go on*/
6929 return 0;
6930 }
6931
6932 static int
6933 qeth_send_setrouting(struct qeth_card *card, enum qeth_routing_types type,
6934 enum qeth_prot_versions prot)
6935 {
6936 int rc;
6937 struct qeth_ipa_cmd *cmd;
6938 struct qeth_cmd_buffer *iob;
6939
6940 QETH_DBF_TEXT(trace,4,"setroutg");
6941 iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SETRTG, prot);
6942 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
6943 cmd->data.setrtg.type = (type);
6944 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
6945
6946 return rc;
6947
6948 }
6949
6950 static void
6951 qeth_correct_routing_type(struct qeth_card *card, enum qeth_routing_types *type,
6952 enum qeth_prot_versions prot)
6953 {
6954 if (card->info.type == QETH_CARD_TYPE_IQD) {
6955 switch (*type) {
6956 case NO_ROUTER:
6957 case PRIMARY_CONNECTOR:
6958 case SECONDARY_CONNECTOR:
6959 case MULTICAST_ROUTER:
6960 return;
6961 default:
6962 goto out_inval;
6963 }
6964 } else {
6965 switch (*type) {
6966 case NO_ROUTER:
6967 case PRIMARY_ROUTER:
6968 case SECONDARY_ROUTER:
6969 return;
6970 case MULTICAST_ROUTER:
6971 if (qeth_is_ipafunc_supported(card, prot,
6972 IPA_OSA_MC_ROUTER))
6973 return;
6974 default:
6975 goto out_inval;
6976 }
6977 }
6978 out_inval:
6979 PRINT_WARN("Routing type '%s' not supported for interface %s.\n"
6980 "Router status set to 'no router'.\n",
6981 ((*type == PRIMARY_ROUTER)? "primary router" :
6982 (*type == SECONDARY_ROUTER)? "secondary router" :
6983 (*type == PRIMARY_CONNECTOR)? "primary connector" :
6984 (*type == SECONDARY_CONNECTOR)? "secondary connector" :
6985 (*type == MULTICAST_ROUTER)? "multicast router" :
6986 "unknown"),
6987 card->dev->name);
6988 *type = NO_ROUTER;
6989 }
6990
6991 int
6992 qeth_setrouting_v4(struct qeth_card *card)
6993 {
6994 int rc;
6995
6996 QETH_DBF_TEXT(trace,3,"setrtg4");
6997
6998 qeth_correct_routing_type(card, &card->options.route4.type,
6999 QETH_PROT_IPV4);
7000
7001 rc = qeth_send_setrouting(card, card->options.route4.type,
7002 QETH_PROT_IPV4);
7003 if (rc) {
7004 card->options.route4.type = NO_ROUTER;
7005 PRINT_WARN("Error (0x%04x) while setting routing type on %s. "
7006 "Type set to 'no router'.\n",
7007 rc, QETH_CARD_IFNAME(card));
7008 }
7009 return rc;
7010 }
7011
7012 int
7013 qeth_setrouting_v6(struct qeth_card *card)
7014 {
7015 int rc = 0;
7016
7017 QETH_DBF_TEXT(trace,3,"setrtg6");
7018 #ifdef CONFIG_QETH_IPV6
7019
7020 qeth_correct_routing_type(card, &card->options.route6.type,
7021 QETH_PROT_IPV6);
7022
7023 if ((card->options.route6.type == NO_ROUTER) ||
7024 ((card->info.type == QETH_CARD_TYPE_OSAE) &&
7025 (card->options.route6.type == MULTICAST_ROUTER) &&
7026 !qeth_is_supported6(card,IPA_OSA_MC_ROUTER)))
7027 return 0;
7028 rc = qeth_send_setrouting(card, card->options.route6.type,
7029 QETH_PROT_IPV6);
7030 if (rc) {
7031 card->options.route6.type = NO_ROUTER;
7032 PRINT_WARN("Error (0x%04x) while setting routing type on %s. "
7033 "Type set to 'no router'.\n",
7034 rc, QETH_CARD_IFNAME(card));
7035 }
7036 #endif
7037 return rc;
7038 }
7039
7040 int
7041 qeth_set_large_send(struct qeth_card *card)
7042 {
7043 int rc = 0;
7044
7045 if (card->dev == NULL)
7046 return 0;
7047
7048 netif_stop_queue(card->dev);
7049 switch (card->options.large_send) {
7050 case QETH_LARGE_SEND_EDDP:
7051 card->dev->features |= NETIF_F_TSO | NETIF_F_SG;
7052 break;
7053 case QETH_LARGE_SEND_TSO:
7054 if (qeth_is_supported(card, IPA_OUTBOUND_TSO)){
7055 card->dev->features |= NETIF_F_TSO | NETIF_F_SG;
7056 } else {
7057 PRINT_WARN("TSO not supported on %s. "
7058 "large_send set to 'no'.\n",
7059 card->dev->name);
7060 card->dev->features &= ~(NETIF_F_TSO | NETIF_F_SG);
7061 card->options.large_send = QETH_LARGE_SEND_NO;
7062 rc = -EOPNOTSUPP;
7063 }
7064 break;
7065 default: /* includes QETH_LARGE_SEND_NO */
7066 card->dev->features &= ~(NETIF_F_TSO | NETIF_F_SG);
7067 break;
7068 }
7069
7070 netif_wake_queue(card->dev);
7071 return rc;
7072 }
7073
7074 /*
7075 * softsetup card: init IPA stuff
7076 */
7077 static int
7078 qeth_softsetup_card(struct qeth_card *card)
7079 {
7080 int rc;
7081
7082 QETH_DBF_TEXT(setup, 2, "softsetp");
7083
7084 if ((rc = qeth_send_startlan(card, QETH_PROT_IPV4))){
7085 QETH_DBF_TEXT_(setup, 2, "1err%d", rc);
7086 if (rc == 0xe080){
7087 PRINT_WARN("LAN on card %s if offline! "
7088 "Continuing softsetup.\n",
7089 CARD_BUS_ID(card));
7090 card->lan_online = 0;
7091 } else
7092 return rc;
7093 } else
7094 card->lan_online = 1;
7095 if (card->options.layer2) {
7096 card->dev->features |=
7097 NETIF_F_HW_VLAN_FILTER |
7098 NETIF_F_HW_VLAN_TX |
7099 NETIF_F_HW_VLAN_RX;
7100 card->dev->flags|=IFF_MULTICAST|IFF_BROADCAST;
7101 card->info.broadcast_capable=1;
7102 if ((rc = qeth_layer2_initialize(card))) {
7103 QETH_DBF_TEXT_(setup, 2, "L2err%d", rc);
7104 return rc;
7105 }
7106 #ifdef CONFIG_QETH_VLAN
7107 qeth_layer2_process_vlans(card, 0);
7108 #endif
7109 goto out;
7110 }
7111 if ((card->options.large_send == QETH_LARGE_SEND_EDDP) ||
7112 (card->options.large_send == QETH_LARGE_SEND_TSO))
7113 card->dev->features |= NETIF_F_TSO | NETIF_F_SG;
7114 else
7115 card->dev->features &= ~(NETIF_F_TSO | NETIF_F_SG);
7116
7117 if ((rc = qeth_setadapter_parms(card)))
7118 QETH_DBF_TEXT_(setup, 2, "2err%d", rc);
7119 if ((rc = qeth_start_ipassists(card)))
7120 QETH_DBF_TEXT_(setup, 2, "3err%d", rc);
7121 if ((rc = qeth_setrouting_v4(card)))
7122 QETH_DBF_TEXT_(setup, 2, "4err%d", rc);
7123 if ((rc = qeth_setrouting_v6(card)))
7124 QETH_DBF_TEXT_(setup, 2, "5err%d", rc);
7125 out:
7126 netif_stop_queue(card->dev);
7127 return 0;
7128 }
7129
7130 #ifdef CONFIG_QETH_IPV6
7131 static int
7132 qeth_get_unique_id_cb(struct qeth_card *card, struct qeth_reply *reply,
7133 unsigned long data)
7134 {
7135 struct qeth_ipa_cmd *cmd;
7136
7137 cmd = (struct qeth_ipa_cmd *) data;
7138 if (cmd->hdr.return_code == 0)
7139 card->info.unique_id = *((__u16 *)
7140 &cmd->data.create_destroy_addr.unique_id[6]);
7141 else {
7142 card->info.unique_id = UNIQUE_ID_IF_CREATE_ADDR_FAILED |
7143 UNIQUE_ID_NOT_BY_CARD;
7144 PRINT_WARN("couldn't get a unique id from the card on device "
7145 "%s (result=x%x), using default id. ipv6 "
7146 "autoconfig on other lpars may lead to duplicate "
7147 "ip addresses. please use manually "
7148 "configured ones.\n",
7149 CARD_BUS_ID(card), cmd->hdr.return_code);
7150 }
7151 return 0;
7152 }
7153 #endif
7154
7155 static int
7156 qeth_put_unique_id(struct qeth_card *card)
7157 {
7158
7159 int rc = 0;
7160 #ifdef CONFIG_QETH_IPV6
7161 struct qeth_cmd_buffer *iob;
7162 struct qeth_ipa_cmd *cmd;
7163
7164 QETH_DBF_TEXT(trace,2,"puniqeid");
7165
7166 if ((card->info.unique_id & UNIQUE_ID_NOT_BY_CARD) ==
7167 UNIQUE_ID_NOT_BY_CARD)
7168 return -1;
7169 iob = qeth_get_ipacmd_buffer(card, IPA_CMD_DESTROY_ADDR,
7170 QETH_PROT_IPV6);
7171 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
7172 *((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
7173 card->info.unique_id;
7174 memcpy(&cmd->data.create_destroy_addr.unique_id[0],
7175 card->dev->dev_addr, OSA_ADDR_LEN);
7176 rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
7177 #else
7178 card->info.unique_id = UNIQUE_ID_IF_CREATE_ADDR_FAILED |
7179 UNIQUE_ID_NOT_BY_CARD;
7180 #endif
7181 return rc;
7182 }
7183
7184 /**
7185 * Clear IP List
7186 */
7187 static void
7188 qeth_clear_ip_list(struct qeth_card *card, int clean, int recover)
7189 {
7190 struct qeth_ipaddr *addr, *tmp;
7191 unsigned long flags;
7192
7193 QETH_DBF_TEXT(trace,4,"clearip");
7194 spin_lock_irqsave(&card->ip_lock, flags);
7195 /* clear todo list */
7196 list_for_each_entry_safe(addr, tmp, card->ip_tbd_list, entry){
7197 list_del(&addr->entry);
7198 kfree(addr);
7199 }
7200
7201 while (!list_empty(&card->ip_list)) {
7202 addr = list_entry(card->ip_list.next,
7203 struct qeth_ipaddr, entry);
7204 list_del_init(&addr->entry);
7205 if (clean) {
7206 spin_unlock_irqrestore(&card->ip_lock, flags);
7207 qeth_deregister_addr_entry(card, addr);
7208 spin_lock_irqsave(&card->ip_lock, flags);
7209 }
7210 if (!recover || addr->is_multicast) {
7211 kfree(addr);
7212 continue;
7213 }
7214 list_add_tail(&addr->entry, card->ip_tbd_list);
7215 }
7216 spin_unlock_irqrestore(&card->ip_lock, flags);
7217 }
7218
7219 static void
7220 qeth_set_allowed_threads(struct qeth_card *card, unsigned long threads,
7221 int clear_start_mask)
7222 {
7223 unsigned long flags;
7224
7225 spin_lock_irqsave(&card->thread_mask_lock, flags);
7226 card->thread_allowed_mask = threads;
7227 if (clear_start_mask)
7228 card->thread_start_mask &= threads;
7229 spin_unlock_irqrestore(&card->thread_mask_lock, flags);
7230 wake_up(&card->wait_q);
7231 }
7232
7233 static inline int
7234 qeth_threads_running(struct qeth_card *card, unsigned long threads)
7235 {
7236 unsigned long flags;
7237 int rc = 0;
7238
7239 spin_lock_irqsave(&card->thread_mask_lock, flags);
7240 rc = (card->thread_running_mask & threads);
7241 spin_unlock_irqrestore(&card->thread_mask_lock, flags);
7242 return rc;
7243 }
7244
7245 static int
7246 qeth_wait_for_threads(struct qeth_card *card, unsigned long threads)
7247 {
7248 return wait_event_interruptible(card->wait_q,
7249 qeth_threads_running(card, threads) == 0);
7250 }
7251
7252 static int
7253 qeth_stop_card(struct qeth_card *card, int recovery_mode)
7254 {
7255 int rc = 0;
7256
7257 QETH_DBF_TEXT(setup ,2,"stopcard");
7258 QETH_DBF_HEX(setup, 2, &card, sizeof(void *));
7259
7260 qeth_set_allowed_threads(card, 0, 1);
7261 if (qeth_wait_for_threads(card, ~QETH_RECOVER_THREAD))
7262 return -ERESTARTSYS;
7263 if (card->read.state == CH_STATE_UP &&
7264 card->write.state == CH_STATE_UP &&
7265 (card->state == CARD_STATE_UP)) {
7266 if(recovery_mode) {
7267 qeth_stop(card->dev);
7268 } else {
7269 rtnl_lock();
7270 dev_close(card->dev);
7271 rtnl_unlock();
7272 }
7273 if (!card->use_hard_stop) {
7274 __u8 *mac = &card->dev->dev_addr[0];
7275 rc = qeth_layer2_send_delmac(card, mac);
7276 QETH_DBF_TEXT_(setup, 2, "Lerr%d", rc);
7277 if ((rc = qeth_send_stoplan(card)))
7278 QETH_DBF_TEXT_(setup, 2, "1err%d", rc);
7279 }
7280 card->state = CARD_STATE_SOFTSETUP;
7281 }
7282 if (card->state == CARD_STATE_SOFTSETUP) {
7283 #ifdef CONFIG_QETH_VLAN
7284 if (card->options.layer2)
7285 qeth_layer2_process_vlans(card, 1);
7286 #endif
7287 qeth_clear_ip_list(card, !card->use_hard_stop, 1);
7288 qeth_clear_ipacmd_list(card);
7289 card->state = CARD_STATE_HARDSETUP;
7290 }
7291 if (card->state == CARD_STATE_HARDSETUP) {
7292 if ((!card->use_hard_stop) &&
7293 (!card->options.layer2))
7294 if ((rc = qeth_put_unique_id(card)))
7295 QETH_DBF_TEXT_(setup, 2, "2err%d", rc);
7296 qeth_qdio_clear_card(card, 0);
7297 qeth_clear_qdio_buffers(card);
7298 qeth_clear_working_pool_list(card);
7299 card->state = CARD_STATE_DOWN;
7300 }
7301 if (card->state == CARD_STATE_DOWN) {
7302 qeth_clear_cmd_buffers(&card->read);
7303 qeth_clear_cmd_buffers(&card->write);
7304 }
7305 card->use_hard_stop = 0;
7306 return rc;
7307 }
7308
7309
7310 static int
7311 qeth_get_unique_id(struct qeth_card *card)
7312 {
7313 int rc = 0;
7314 #ifdef CONFIG_QETH_IPV6
7315 struct qeth_cmd_buffer *iob;
7316 struct qeth_ipa_cmd *cmd;
7317
7318 QETH_DBF_TEXT(setup, 2, "guniqeid");
7319
7320 if (!qeth_is_supported(card,IPA_IPV6)) {
7321 card->info.unique_id = UNIQUE_ID_IF_CREATE_ADDR_FAILED |
7322 UNIQUE_ID_NOT_BY_CARD;
7323 return 0;
7324 }
7325
7326 iob = qeth_get_ipacmd_buffer(card, IPA_CMD_CREATE_ADDR,
7327 QETH_PROT_IPV6);
7328 cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
7329 *((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
7330 card->info.unique_id;
7331
7332 rc = qeth_send_ipa_cmd(card, iob, qeth_get_unique_id_cb, NULL);
7333 #else
7334 card->info.unique_id = UNIQUE_ID_IF_CREATE_ADDR_FAILED |
7335 UNIQUE_ID_NOT_BY_CARD;
7336 #endif
7337 return rc;
7338 }
7339 static void
7340 qeth_print_status_with_portname(struct qeth_card *card)
7341 {
7342 char dbf_text[15];
7343 int i;
7344
7345 sprintf(dbf_text, "%s", card->info.portname + 1);
7346 for (i = 0; i < 8; i++)
7347 dbf_text[i] =
7348 (char) _ebcasc[(__u8) dbf_text[i]];
7349 dbf_text[8] = 0;
7350 printk("qeth: Device %s/%s/%s is a%s card%s%s%s\n"
7351 "with link type %s (portname: %s)\n",
7352 CARD_RDEV_ID(card),
7353 CARD_WDEV_ID(card),
7354 CARD_DDEV_ID(card),
7355 qeth_get_cardname(card),
7356 (card->info.mcl_level[0]) ? " (level: " : "",
7357 (card->info.mcl_level[0]) ? card->info.mcl_level : "",
7358 (card->info.mcl_level[0]) ? ")" : "",
7359 qeth_get_cardname_short(card),
7360 dbf_text);
7361
7362 }
7363
7364 static void
7365 qeth_print_status_no_portname(struct qeth_card *card)
7366 {
7367 if (card->info.portname[0])
7368 printk("qeth: Device %s/%s/%s is a%s "
7369 "card%s%s%s\nwith link type %s "
7370 "(no portname needed by interface).\n",
7371 CARD_RDEV_ID(card),
7372 CARD_WDEV_ID(card),
7373 CARD_DDEV_ID(card),
7374 qeth_get_cardname(card),
7375 (card->info.mcl_level[0]) ? " (level: " : "",
7376 (card->info.mcl_level[0]) ? card->info.mcl_level : "",
7377 (card->info.mcl_level[0]) ? ")" : "",
7378 qeth_get_cardname_short(card));
7379 else
7380 printk("qeth: Device %s/%s/%s is a%s "
7381 "card%s%s%s\nwith link type %s.\n",
7382 CARD_RDEV_ID(card),
7383 CARD_WDEV_ID(card),
7384 CARD_DDEV_ID(card),
7385 qeth_get_cardname(card),
7386 (card->info.mcl_level[0]) ? " (level: " : "",
7387 (card->info.mcl_level[0]) ? card->info.mcl_level : "",
7388 (card->info.mcl_level[0]) ? ")" : "",
7389 qeth_get_cardname_short(card));
7390 }
7391
7392 static void
7393 qeth_print_status_message(struct qeth_card *card)
7394 {
7395 switch (card->info.type) {
7396 case QETH_CARD_TYPE_OSAE:
7397 /* VM will use a non-zero first character
7398 * to indicate a HiperSockets like reporting
7399 * of the level OSA sets the first character to zero
7400 * */
7401 if (!card->info.mcl_level[0]) {
7402 sprintf(card->info.mcl_level,"%02x%02x",
7403 card->info.mcl_level[2],
7404 card->info.mcl_level[3]);
7405
7406 card->info.mcl_level[QETH_MCL_LENGTH] = 0;
7407 break;
7408 }
7409 /* fallthrough */
7410 case QETH_CARD_TYPE_IQD:
7411 card->info.mcl_level[0] = (char) _ebcasc[(__u8)
7412 card->info.mcl_level[0]];
7413 card->info.mcl_level[1] = (char) _ebcasc[(__u8)
7414 card->info.mcl_level[1]];
7415 card->info.mcl_level[2] = (char) _ebcasc[(__u8)
7416 card->info.mcl_level[2]];
7417 card->info.mcl_level[3] = (char) _ebcasc[(__u8)
7418 card->info.mcl_level[3]];
7419 card->info.mcl_level[QETH_MCL_LENGTH] = 0;
7420 break;
7421 default:
7422 memset(&card->info.mcl_level[0], 0, QETH_MCL_LENGTH + 1);
7423 }
7424 if (card->info.portname_required)
7425 qeth_print_status_with_portname(card);
7426 else
7427 qeth_print_status_no_portname(card);
7428 }
7429
7430 static int
7431 qeth_register_netdev(struct qeth_card *card)
7432 {
7433 QETH_DBF_TEXT(setup, 3, "regnetd");
7434 if (card->dev->reg_state != NETREG_UNINITIALIZED) {
7435 qeth_netdev_init(card->dev);
7436 return 0;
7437 }
7438 /* sysfs magic */
7439 SET_NETDEV_DEV(card->dev, &card->gdev->dev);
7440 return register_netdev(card->dev);
7441 }
7442
7443 static void
7444 qeth_start_again(struct qeth_card *card, int recovery_mode)
7445 {
7446 QETH_DBF_TEXT(setup ,2, "startag");
7447
7448 if(recovery_mode) {
7449 qeth_open(card->dev);
7450 } else {
7451 rtnl_lock();
7452 dev_open(card->dev);
7453 rtnl_unlock();
7454 }
7455 /* this also sets saved unicast addresses */
7456 qeth_set_multicast_list(card->dev);
7457 }
7458
7459
7460 /* Layer 2 specific stuff */
7461 #define IGNORE_PARAM_EQ(option,value,reset_value,msg) \
7462 if (card->options.option == value) { \
7463 PRINT_ERR("%s not supported with layer 2 " \
7464 "functionality, ignoring option on read" \
7465 "channel device %s .\n",msg,CARD_RDEV_ID(card)); \
7466 card->options.option = reset_value; \
7467 }
7468 #define IGNORE_PARAM_NEQ(option,value,reset_value,msg) \
7469 if (card->options.option != value) { \
7470 PRINT_ERR("%s not supported with layer 2 " \
7471 "functionality, ignoring option on read" \
7472 "channel device %s .\n",msg,CARD_RDEV_ID(card)); \
7473 card->options.option = reset_value; \
7474 }
7475
7476
7477 static void qeth_make_parameters_consistent(struct qeth_card *card)
7478 {
7479
7480 if (card->options.layer2) {
7481 if (card->info.type == QETH_CARD_TYPE_IQD) {
7482 PRINT_ERR("Device %s does not support " \
7483 "layer 2 functionality. " \
7484 "Ignoring layer2 option.\n",CARD_BUS_ID(card));
7485 }
7486 IGNORE_PARAM_NEQ(route4.type, NO_ROUTER, NO_ROUTER,
7487 "Routing options are");
7488 #ifdef CONFIG_QETH_IPV6
7489 IGNORE_PARAM_NEQ(route6.type, NO_ROUTER, NO_ROUTER,
7490 "Routing options are");
7491 #endif
7492 IGNORE_PARAM_EQ(checksum_type, HW_CHECKSUMMING,
7493 QETH_CHECKSUM_DEFAULT,
7494 "Checksumming options are");
7495 IGNORE_PARAM_NEQ(broadcast_mode, QETH_TR_BROADCAST_ALLRINGS,
7496 QETH_TR_BROADCAST_ALLRINGS,
7497 "Broadcast mode options are");
7498 IGNORE_PARAM_NEQ(macaddr_mode, QETH_TR_MACADDR_NONCANONICAL,
7499 QETH_TR_MACADDR_NONCANONICAL,
7500 "Canonical MAC addr options are");
7501 IGNORE_PARAM_NEQ(fake_broadcast, 0, 0,
7502 "Broadcast faking options are");
7503 IGNORE_PARAM_NEQ(add_hhlen, DEFAULT_ADD_HHLEN,
7504 DEFAULT_ADD_HHLEN,"Option add_hhlen is");
7505 IGNORE_PARAM_NEQ(fake_ll, 0, 0,"Option fake_ll is");
7506 }
7507 }
7508
7509
7510 static int
7511 __qeth_set_online(struct ccwgroup_device *gdev, int recovery_mode)
7512 {
7513 struct qeth_card *card = gdev->dev.driver_data;
7514 int rc = 0;
7515 enum qeth_card_states recover_flag;
7516
7517 BUG_ON(!card);
7518 QETH_DBF_TEXT(setup ,2, "setonlin");
7519 QETH_DBF_HEX(setup, 2, &card, sizeof(void *));
7520
7521 qeth_set_allowed_threads(card, QETH_RECOVER_THREAD, 1);
7522 if (qeth_wait_for_threads(card, ~QETH_RECOVER_THREAD)){
7523 PRINT_WARN("set_online of card %s interrupted by user!\n",
7524 CARD_BUS_ID(card));
7525 return -ERESTARTSYS;
7526 }
7527
7528 recover_flag = card->state;
7529 if ((rc = ccw_device_set_online(CARD_RDEV(card))) ||
7530 (rc = ccw_device_set_online(CARD_WDEV(card))) ||
7531 (rc = ccw_device_set_online(CARD_DDEV(card)))){
7532 QETH_DBF_TEXT_(setup, 2, "1err%d", rc);
7533 return -EIO;
7534 }
7535
7536 if (card->options.layer2)
7537 qeth_make_parameters_consistent(card);
7538
7539 if ((rc = qeth_hardsetup_card(card))){
7540 QETH_DBF_TEXT_(setup, 2, "2err%d", rc);
7541 goto out_remove;
7542 }
7543 card->state = CARD_STATE_HARDSETUP;
7544
7545 if (!(rc = qeth_query_ipassists(card,QETH_PROT_IPV4)))
7546 rc = qeth_get_unique_id(card);
7547
7548 if (rc && card->options.layer2 == 0) {
7549 QETH_DBF_TEXT_(setup, 2, "3err%d", rc);
7550 goto out_remove;
7551 }
7552 qeth_print_status_message(card);
7553 if ((rc = qeth_register_netdev(card))){
7554 QETH_DBF_TEXT_(setup, 2, "4err%d", rc);
7555 goto out_remove;
7556 }
7557 if ((rc = qeth_softsetup_card(card))){
7558 QETH_DBF_TEXT_(setup, 2, "5err%d", rc);
7559 goto out_remove;
7560 }
7561 card->state = CARD_STATE_SOFTSETUP;
7562
7563 if ((rc = qeth_init_qdio_queues(card))){
7564 QETH_DBF_TEXT_(setup, 2, "6err%d", rc);
7565 goto out_remove;
7566 }
7567 /*maybe it was set offline without ifconfig down
7568 * we can also use this state for recovery purposes*/
7569 qeth_set_allowed_threads(card, 0xffffffff, 0);
7570 if (recover_flag == CARD_STATE_RECOVER)
7571 qeth_start_again(card, recovery_mode);
7572 qeth_notify_processes();
7573 return 0;
7574 out_remove:
7575 card->use_hard_stop = 1;
7576 qeth_stop_card(card, 0);
7577 ccw_device_set_offline(CARD_DDEV(card));
7578 ccw_device_set_offline(CARD_WDEV(card));
7579 ccw_device_set_offline(CARD_RDEV(card));
7580 if (recover_flag == CARD_STATE_RECOVER)
7581 card->state = CARD_STATE_RECOVER;
7582 else
7583 card->state = CARD_STATE_DOWN;
7584 return -ENODEV;
7585 }
7586
7587 static int
7588 qeth_set_online(struct ccwgroup_device *gdev)
7589 {
7590 return __qeth_set_online(gdev, 0);
7591 }
7592
7593 static struct ccw_device_id qeth_ids[] = {
7594 {CCW_DEVICE(0x1731, 0x01), driver_info:QETH_CARD_TYPE_OSAE},
7595 {CCW_DEVICE(0x1731, 0x05), driver_info:QETH_CARD_TYPE_IQD},
7596 {},
7597 };
7598 MODULE_DEVICE_TABLE(ccw, qeth_ids);
7599
7600 struct device *qeth_root_dev = NULL;
7601
7602 struct ccwgroup_driver qeth_ccwgroup_driver = {
7603 .owner = THIS_MODULE,
7604 .name = "qeth",
7605 .driver_id = 0xD8C5E3C8,
7606 .probe = qeth_probe_device,
7607 .remove = qeth_remove_device,
7608 .set_online = qeth_set_online,
7609 .set_offline = qeth_set_offline,
7610 };
7611
7612 struct ccw_driver qeth_ccw_driver = {
7613 .name = "qeth",
7614 .ids = qeth_ids,
7615 .probe = ccwgroup_probe_ccwdev,
7616 .remove = ccwgroup_remove_ccwdev,
7617 };
7618
7619
7620 static void
7621 qeth_unregister_dbf_views(void)
7622 {
7623 if (qeth_dbf_setup)
7624 debug_unregister(qeth_dbf_setup);
7625 if (qeth_dbf_qerr)
7626 debug_unregister(qeth_dbf_qerr);
7627 if (qeth_dbf_sense)
7628 debug_unregister(qeth_dbf_sense);
7629 if (qeth_dbf_misc)
7630 debug_unregister(qeth_dbf_misc);
7631 if (qeth_dbf_data)
7632 debug_unregister(qeth_dbf_data);
7633 if (qeth_dbf_control)
7634 debug_unregister(qeth_dbf_control);
7635 if (qeth_dbf_trace)
7636 debug_unregister(qeth_dbf_trace);
7637 }
7638 static int
7639 qeth_register_dbf_views(void)
7640 {
7641 qeth_dbf_setup = debug_register(QETH_DBF_SETUP_NAME,
7642 QETH_DBF_SETUP_PAGES,
7643 QETH_DBF_SETUP_NR_AREAS,
7644 QETH_DBF_SETUP_LEN);
7645 qeth_dbf_misc = debug_register(QETH_DBF_MISC_NAME,
7646 QETH_DBF_MISC_PAGES,
7647 QETH_DBF_MISC_NR_AREAS,
7648 QETH_DBF_MISC_LEN);
7649 qeth_dbf_data = debug_register(QETH_DBF_DATA_NAME,
7650 QETH_DBF_DATA_PAGES,
7651 QETH_DBF_DATA_NR_AREAS,
7652 QETH_DBF_DATA_LEN);
7653 qeth_dbf_control = debug_register(QETH_DBF_CONTROL_NAME,
7654 QETH_DBF_CONTROL_PAGES,
7655 QETH_DBF_CONTROL_NR_AREAS,
7656 QETH_DBF_CONTROL_LEN);
7657 qeth_dbf_sense = debug_register(QETH_DBF_SENSE_NAME,
7658 QETH_DBF_SENSE_PAGES,
7659 QETH_DBF_SENSE_NR_AREAS,
7660 QETH_DBF_SENSE_LEN);
7661 qeth_dbf_qerr = debug_register(QETH_DBF_QERR_NAME,
7662 QETH_DBF_QERR_PAGES,
7663 QETH_DBF_QERR_NR_AREAS,
7664 QETH_DBF_QERR_LEN);
7665 qeth_dbf_trace = debug_register(QETH_DBF_TRACE_NAME,
7666 QETH_DBF_TRACE_PAGES,
7667 QETH_DBF_TRACE_NR_AREAS,
7668 QETH_DBF_TRACE_LEN);
7669
7670 if ((qeth_dbf_setup == NULL) || (qeth_dbf_misc == NULL) ||
7671 (qeth_dbf_data == NULL) || (qeth_dbf_control == NULL) ||
7672 (qeth_dbf_sense == NULL) || (qeth_dbf_qerr == NULL) ||
7673 (qeth_dbf_trace == NULL)) {
7674 qeth_unregister_dbf_views();
7675 return -ENOMEM;
7676 }
7677 debug_register_view(qeth_dbf_setup, &debug_hex_ascii_view);
7678 debug_set_level(qeth_dbf_setup, QETH_DBF_SETUP_LEVEL);
7679
7680 debug_register_view(qeth_dbf_misc, &debug_hex_ascii_view);
7681 debug_set_level(qeth_dbf_misc, QETH_DBF_MISC_LEVEL);
7682
7683 debug_register_view(qeth_dbf_data, &debug_hex_ascii_view);
7684 debug_set_level(qeth_dbf_data, QETH_DBF_DATA_LEVEL);
7685
7686 debug_register_view(qeth_dbf_control, &debug_hex_ascii_view);
7687 debug_set_level(qeth_dbf_control, QETH_DBF_CONTROL_LEVEL);
7688
7689 debug_register_view(qeth_dbf_sense, &debug_hex_ascii_view);
7690 debug_set_level(qeth_dbf_sense, QETH_DBF_SENSE_LEVEL);
7691
7692 debug_register_view(qeth_dbf_qerr, &debug_hex_ascii_view);
7693 debug_set_level(qeth_dbf_qerr, QETH_DBF_QERR_LEVEL);
7694
7695 debug_register_view(qeth_dbf_trace, &debug_hex_ascii_view);
7696 debug_set_level(qeth_dbf_trace, QETH_DBF_TRACE_LEVEL);
7697
7698 return 0;
7699 }
7700
7701 #ifdef CONFIG_QETH_IPV6
7702 extern struct neigh_table arp_tbl;
7703 static struct neigh_ops *arp_direct_ops;
7704 static int (*qeth_old_arp_constructor) (struct neighbour *);
7705
7706 static struct neigh_ops arp_direct_ops_template = {
7707 .family = AF_INET,
7708 .destructor = NULL,
7709 .solicit = NULL,
7710 .error_report = NULL,
7711 .output = dev_queue_xmit,
7712 .connected_output = dev_queue_xmit,
7713 .hh_output = dev_queue_xmit,
7714 .queue_xmit = dev_queue_xmit
7715 };
7716
7717 static int
7718 qeth_arp_constructor(struct neighbour *neigh)
7719 {
7720 struct net_device *dev = neigh->dev;
7721 struct in_device *in_dev;
7722 struct neigh_parms *parms;
7723 struct qeth_card *card;
7724
7725 card = qeth_get_card_from_dev(dev);
7726 if (card == NULL)
7727 goto out;
7728 if((card->options.layer2) ||
7729 (card->dev->hard_header == qeth_fake_header))
7730 goto out;
7731
7732 rcu_read_lock();
7733 in_dev = rcu_dereference(__in_dev_get(dev));
7734 if (in_dev == NULL) {
7735 rcu_read_unlock();
7736 return -EINVAL;
7737 }
7738
7739 parms = in_dev->arp_parms;
7740 __neigh_parms_put(neigh->parms);
7741 neigh->parms = neigh_parms_clone(parms);
7742 rcu_read_unlock();
7743
7744 neigh->type = inet_addr_type(*(u32 *) neigh->primary_key);
7745 neigh->nud_state = NUD_NOARP;
7746 neigh->ops = arp_direct_ops;
7747 neigh->output = neigh->ops->queue_xmit;
7748 return 0;
7749 out:
7750 return qeth_old_arp_constructor(neigh);
7751 }
7752 #endif /*CONFIG_QETH_IPV6*/
7753
7754 /*
7755 * IP address takeover related functions
7756 */
7757 static void
7758 qeth_clear_ipato_list(struct qeth_card *card)
7759 {
7760 struct qeth_ipato_entry *ipatoe, *tmp;
7761 unsigned long flags;
7762
7763 spin_lock_irqsave(&card->ip_lock, flags);
7764 list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
7765 list_del(&ipatoe->entry);
7766 kfree(ipatoe);
7767 }
7768 spin_unlock_irqrestore(&card->ip_lock, flags);
7769 }
7770
7771 int
7772 qeth_add_ipato_entry(struct qeth_card *card, struct qeth_ipato_entry *new)
7773 {
7774 struct qeth_ipato_entry *ipatoe;
7775 unsigned long flags;
7776 int rc = 0;
7777
7778 QETH_DBF_TEXT(trace, 2, "addipato");
7779 spin_lock_irqsave(&card->ip_lock, flags);
7780 list_for_each_entry(ipatoe, &card->ipato.entries, entry){
7781 if (ipatoe->proto != new->proto)
7782 continue;
7783 if (!memcmp(ipatoe->addr, new->addr,
7784 (ipatoe->proto == QETH_PROT_IPV4)? 4:16) &&
7785 (ipatoe->mask_bits == new->mask_bits)){
7786 PRINT_WARN("ipato entry already exists!\n");
7787 rc = -EEXIST;
7788 break;
7789 }
7790 }
7791 if (!rc) {
7792 list_add_tail(&new->entry, &card->ipato.entries);
7793 }
7794 spin_unlock_irqrestore(&card->ip_lock, flags);
7795 return rc;
7796 }
7797
7798 void
7799 qeth_del_ipato_entry(struct qeth_card *card, enum qeth_prot_versions proto,
7800 u8 *addr, int mask_bits)
7801 {
7802 struct qeth_ipato_entry *ipatoe, *tmp;
7803 unsigned long flags;
7804
7805 QETH_DBF_TEXT(trace, 2, "delipato");
7806 spin_lock_irqsave(&card->ip_lock, flags);
7807 list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry){
7808 if (ipatoe->proto != proto)
7809 continue;
7810 if (!memcmp(ipatoe->addr, addr,
7811 (proto == QETH_PROT_IPV4)? 4:16) &&
7812 (ipatoe->mask_bits == mask_bits)){
7813 list_del(&ipatoe->entry);
7814 kfree(ipatoe);
7815 }
7816 }
7817 spin_unlock_irqrestore(&card->ip_lock, flags);
7818 }
7819
7820 static inline void
7821 qeth_convert_addr_to_bits(u8 *addr, u8 *bits, int len)
7822 {
7823 int i, j;
7824 u8 octet;
7825
7826 for (i = 0; i < len; ++i){
7827 octet = addr[i];
7828 for (j = 7; j >= 0; --j){
7829 bits[i*8 + j] = octet & 1;
7830 octet >>= 1;
7831 }
7832 }
7833 }
7834
7835 static int
7836 qeth_is_addr_covered_by_ipato(struct qeth_card *card, struct qeth_ipaddr *addr)
7837 {
7838 struct qeth_ipato_entry *ipatoe;
7839 u8 addr_bits[128] = {0, };
7840 u8 ipatoe_bits[128] = {0, };
7841 int rc = 0;
7842
7843 if (!card->ipato.enabled)
7844 return 0;
7845
7846 qeth_convert_addr_to_bits((u8 *) &addr->u, addr_bits,
7847 (addr->proto == QETH_PROT_IPV4)? 4:16);
7848 list_for_each_entry(ipatoe, &card->ipato.entries, entry){
7849 if (addr->proto != ipatoe->proto)
7850 continue;
7851 qeth_convert_addr_to_bits(ipatoe->addr, ipatoe_bits,
7852 (ipatoe->proto==QETH_PROT_IPV4) ?
7853 4:16);
7854 if (addr->proto == QETH_PROT_IPV4)
7855 rc = !memcmp(addr_bits, ipatoe_bits,
7856 min(32, ipatoe->mask_bits));
7857 else
7858 rc = !memcmp(addr_bits, ipatoe_bits,
7859 min(128, ipatoe->mask_bits));
7860 if (rc)
7861 break;
7862 }
7863 /* invert? */
7864 if ((addr->proto == QETH_PROT_IPV4) && card->ipato.invert4)
7865 rc = !rc;
7866 else if ((addr->proto == QETH_PROT_IPV6) && card->ipato.invert6)
7867 rc = !rc;
7868
7869 return rc;
7870 }
7871
7872 /*
7873 * VIPA related functions
7874 */
7875 int
7876 qeth_add_vipa(struct qeth_card *card, enum qeth_prot_versions proto,
7877 const u8 *addr)
7878 {
7879 struct qeth_ipaddr *ipaddr;
7880 unsigned long flags;
7881 int rc = 0;
7882
7883 ipaddr = qeth_get_addr_buffer(proto);
7884 if (ipaddr){
7885 if (proto == QETH_PROT_IPV4){
7886 QETH_DBF_TEXT(trace, 2, "addvipa4");
7887 memcpy(&ipaddr->u.a4.addr, addr, 4);
7888 ipaddr->u.a4.mask = 0;
7889 #ifdef CONFIG_QETH_IPV6
7890 } else if (proto == QETH_PROT_IPV6){
7891 QETH_DBF_TEXT(trace, 2, "addvipa6");
7892 memcpy(&ipaddr->u.a6.addr, addr, 16);
7893 ipaddr->u.a6.pfxlen = 0;
7894 #endif
7895 }
7896 ipaddr->type = QETH_IP_TYPE_VIPA;
7897 ipaddr->set_flags = QETH_IPA_SETIP_VIPA_FLAG;
7898 ipaddr->del_flags = QETH_IPA_DELIP_VIPA_FLAG;
7899 } else
7900 return -ENOMEM;
7901 spin_lock_irqsave(&card->ip_lock, flags);
7902 if (__qeth_address_exists_in_list(&card->ip_list, ipaddr, 0) ||
7903 __qeth_address_exists_in_list(card->ip_tbd_list, ipaddr, 0))
7904 rc = -EEXIST;
7905 spin_unlock_irqrestore(&card->ip_lock, flags);
7906 if (rc){
7907 PRINT_WARN("Cannot add VIPA. Address already exists!\n");
7908 return rc;
7909 }
7910 if (!qeth_add_ip(card, ipaddr))
7911 kfree(ipaddr);
7912 if (qeth_set_thread_start_bit(card, QETH_SET_IP_THREAD) == 0)
7913 schedule_work(&card->kernel_thread_starter);
7914 return rc;
7915 }
7916
7917 void
7918 qeth_del_vipa(struct qeth_card *card, enum qeth_prot_versions proto,
7919 const u8 *addr)
7920 {
7921 struct qeth_ipaddr *ipaddr;
7922
7923 ipaddr = qeth_get_addr_buffer(proto);
7924 if (ipaddr){
7925 if (proto == QETH_PROT_IPV4){
7926 QETH_DBF_TEXT(trace, 2, "delvipa4");
7927 memcpy(&ipaddr->u.a4.addr, addr, 4);
7928 ipaddr->u.a4.mask = 0;
7929 #ifdef CONFIG_QETH_IPV6
7930 } else if (proto == QETH_PROT_IPV6){
7931 QETH_DBF_TEXT(trace, 2, "delvipa6");
7932 memcpy(&ipaddr->u.a6.addr, addr, 16);
7933 ipaddr->u.a6.pfxlen = 0;
7934 #endif
7935 }
7936 ipaddr->type = QETH_IP_TYPE_VIPA;
7937 } else
7938 return;
7939 if (!qeth_delete_ip(card, ipaddr))
7940 kfree(ipaddr);
7941 if (qeth_set_thread_start_bit(card, QETH_SET_IP_THREAD) == 0)
7942 schedule_work(&card->kernel_thread_starter);
7943 }
7944
7945 /*
7946 * proxy ARP related functions
7947 */
7948 int
7949 qeth_add_rxip(struct qeth_card *card, enum qeth_prot_versions proto,
7950 const u8 *addr)
7951 {
7952 struct qeth_ipaddr *ipaddr;
7953 unsigned long flags;
7954 int rc = 0;
7955
7956 ipaddr = qeth_get_addr_buffer(proto);
7957 if (ipaddr){
7958 if (proto == QETH_PROT_IPV4){
7959 QETH_DBF_TEXT(trace, 2, "addrxip4");
7960 memcpy(&ipaddr->u.a4.addr, addr, 4);
7961 ipaddr->u.a4.mask = 0;
7962 #ifdef CONFIG_QETH_IPV6
7963 } else if (proto == QETH_PROT_IPV6){
7964 QETH_DBF_TEXT(trace, 2, "addrxip6");
7965 memcpy(&ipaddr->u.a6.addr, addr, 16);
7966 ipaddr->u.a6.pfxlen = 0;
7967 #endif
7968 }
7969 ipaddr->type = QETH_IP_TYPE_RXIP;
7970 ipaddr->set_flags = QETH_IPA_SETIP_TAKEOVER_FLAG;
7971 ipaddr->del_flags = 0;
7972 } else
7973 return -ENOMEM;
7974 spin_lock_irqsave(&card->ip_lock, flags);
7975 if (__qeth_address_exists_in_list(&card->ip_list, ipaddr, 0) ||
7976 __qeth_address_exists_in_list(card->ip_tbd_list, ipaddr, 0))
7977 rc = -EEXIST;
7978 spin_unlock_irqrestore(&card->ip_lock, flags);
7979 if (rc){
7980 PRINT_WARN("Cannot add RXIP. Address already exists!\n");
7981 return rc;
7982 }
7983 if (!qeth_add_ip(card, ipaddr))
7984 kfree(ipaddr);
7985 if (qeth_set_thread_start_bit(card, QETH_SET_IP_THREAD) == 0)
7986 schedule_work(&card->kernel_thread_starter);
7987 return 0;
7988 }
7989
7990 void
7991 qeth_del_rxip(struct qeth_card *card, enum qeth_prot_versions proto,
7992 const u8 *addr)
7993 {
7994 struct qeth_ipaddr *ipaddr;
7995
7996 ipaddr = qeth_get_addr_buffer(proto);
7997 if (ipaddr){
7998 if (proto == QETH_PROT_IPV4){
7999 QETH_DBF_TEXT(trace, 2, "addrxip4");
8000 memcpy(&ipaddr->u.a4.addr, addr, 4);
8001 ipaddr->u.a4.mask = 0;
8002 #ifdef CONFIG_QETH_IPV6
8003 } else if (proto == QETH_PROT_IPV6){
8004 QETH_DBF_TEXT(trace, 2, "addrxip6");
8005 memcpy(&ipaddr->u.a6.addr, addr, 16);
8006 ipaddr->u.a6.pfxlen = 0;
8007 #endif
8008 }
8009 ipaddr->type = QETH_IP_TYPE_RXIP;
8010 } else
8011 return;
8012 if (!qeth_delete_ip(card, ipaddr))
8013 kfree(ipaddr);
8014 if (qeth_set_thread_start_bit(card, QETH_SET_IP_THREAD) == 0)
8015 schedule_work(&card->kernel_thread_starter);
8016 }
8017
8018 /**
8019 * IP event handler
8020 */
8021 static int
8022 qeth_ip_event(struct notifier_block *this,
8023 unsigned long event,void *ptr)
8024 {
8025 struct in_ifaddr *ifa = (struct in_ifaddr *)ptr;
8026 struct net_device *dev =(struct net_device *) ifa->ifa_dev->dev;
8027 struct qeth_ipaddr *addr;
8028 struct qeth_card *card;
8029
8030 QETH_DBF_TEXT(trace,3,"ipevent");
8031 card = qeth_get_card_from_dev(dev);
8032 if (!card)
8033 return NOTIFY_DONE;
8034 if (card->options.layer2)
8035 return NOTIFY_DONE;
8036
8037 addr = qeth_get_addr_buffer(QETH_PROT_IPV4);
8038 if (addr != NULL) {
8039 addr->u.a4.addr = ifa->ifa_address;
8040 addr->u.a4.mask = ifa->ifa_mask;
8041 addr->type = QETH_IP_TYPE_NORMAL;
8042 } else
8043 goto out;
8044
8045 switch(event) {
8046 case NETDEV_UP:
8047 if (!qeth_add_ip(card, addr))
8048 kfree(addr);
8049 break;
8050 case NETDEV_DOWN:
8051 if (!qeth_delete_ip(card, addr))
8052 kfree(addr);
8053 break;
8054 default:
8055 break;
8056 }
8057 if (qeth_set_thread_start_bit(card, QETH_SET_IP_THREAD) == 0)
8058 schedule_work(&card->kernel_thread_starter);
8059 out:
8060 return NOTIFY_DONE;
8061 }
8062
8063 static struct notifier_block qeth_ip_notifier = {
8064 qeth_ip_event,
8065 0
8066 };
8067
8068 #ifdef CONFIG_QETH_IPV6
8069 /**
8070 * IPv6 event handler
8071 */
8072 static int
8073 qeth_ip6_event(struct notifier_block *this,
8074 unsigned long event,void *ptr)
8075 {
8076
8077 struct inet6_ifaddr *ifa = (struct inet6_ifaddr *)ptr;
8078 struct net_device *dev = (struct net_device *)ifa->idev->dev;
8079 struct qeth_ipaddr *addr;
8080 struct qeth_card *card;
8081
8082 QETH_DBF_TEXT(trace,3,"ip6event");
8083
8084 card = qeth_get_card_from_dev(dev);
8085 if (!card)
8086 return NOTIFY_DONE;
8087 if (!qeth_is_supported(card, IPA_IPV6))
8088 return NOTIFY_DONE;
8089
8090 addr = qeth_get_addr_buffer(QETH_PROT_IPV6);
8091 if (addr != NULL) {
8092 memcpy(&addr->u.a6.addr, &ifa->addr, sizeof(struct in6_addr));
8093 addr->u.a6.pfxlen = ifa->prefix_len;
8094 addr->type = QETH_IP_TYPE_NORMAL;
8095 } else
8096 goto out;
8097
8098 switch(event) {
8099 case NETDEV_UP:
8100 if (!qeth_add_ip(card, addr))
8101 kfree(addr);
8102 break;
8103 case NETDEV_DOWN:
8104 if (!qeth_delete_ip(card, addr))
8105 kfree(addr);
8106 break;
8107 default:
8108 break;
8109 }
8110 if (qeth_set_thread_start_bit(card, QETH_SET_IP_THREAD) == 0)
8111 schedule_work(&card->kernel_thread_starter);
8112 out:
8113 return NOTIFY_DONE;
8114 }
8115
8116 static struct notifier_block qeth_ip6_notifier = {
8117 qeth_ip6_event,
8118 0
8119 };
8120 #endif
8121
8122 static int
8123 __qeth_reboot_event_card(struct device *dev, void *data)
8124 {
8125 struct qeth_card *card;
8126
8127 card = (struct qeth_card *) dev->driver_data;
8128 qeth_clear_ip_list(card, 0, 0);
8129 qeth_qdio_clear_card(card, 0);
8130 return 0;
8131 }
8132
8133 static int
8134 qeth_reboot_event(struct notifier_block *this, unsigned long event, void *ptr)
8135 {
8136
8137 driver_for_each_device(&qeth_ccwgroup_driver.driver, NULL, NULL,
8138 __qeth_reboot_event_card);
8139 return NOTIFY_DONE;
8140 }
8141
8142
8143 static struct notifier_block qeth_reboot_notifier = {
8144 qeth_reboot_event,
8145 0
8146 };
8147
8148 static int
8149 qeth_register_notifiers(void)
8150 {
8151 int r;
8152
8153 QETH_DBF_TEXT(trace,5,"regnotif");
8154 if ((r = register_reboot_notifier(&qeth_reboot_notifier)))
8155 return r;
8156 if ((r = register_inetaddr_notifier(&qeth_ip_notifier)))
8157 goto out_reboot;
8158 #ifdef CONFIG_QETH_IPV6
8159 if ((r = register_inet6addr_notifier(&qeth_ip6_notifier)))
8160 goto out_ipv4;
8161 #endif
8162 return 0;
8163
8164 #ifdef CONFIG_QETH_IPV6
8165 out_ipv4:
8166 unregister_inetaddr_notifier(&qeth_ip_notifier);
8167 #endif
8168 out_reboot:
8169 unregister_reboot_notifier(&qeth_reboot_notifier);
8170 return r;
8171 }
8172
8173 /**
8174 * unregister all event notifiers
8175 */
8176 static void
8177 qeth_unregister_notifiers(void)
8178 {
8179
8180 QETH_DBF_TEXT(trace,5,"unregnot");
8181 BUG_ON(unregister_reboot_notifier(&qeth_reboot_notifier));
8182 BUG_ON(unregister_inetaddr_notifier(&qeth_ip_notifier));
8183 #ifdef CONFIG_QETH_IPV6
8184 BUG_ON(unregister_inet6addr_notifier(&qeth_ip6_notifier));
8185 #endif /* QETH_IPV6 */
8186
8187 }
8188
8189 #ifdef CONFIG_QETH_IPV6
8190 static int
8191 qeth_ipv6_init(void)
8192 {
8193 qeth_old_arp_constructor = arp_tbl.constructor;
8194 write_lock(&arp_tbl.lock);
8195 arp_tbl.constructor = qeth_arp_constructor;
8196 write_unlock(&arp_tbl.lock);
8197
8198 arp_direct_ops = (struct neigh_ops*)
8199 kmalloc(sizeof(struct neigh_ops), GFP_KERNEL);
8200 if (!arp_direct_ops)
8201 return -ENOMEM;
8202
8203 memcpy(arp_direct_ops, &arp_direct_ops_template,
8204 sizeof(struct neigh_ops));
8205
8206 return 0;
8207 }
8208
8209 static void
8210 qeth_ipv6_uninit(void)
8211 {
8212 write_lock(&arp_tbl.lock);
8213 arp_tbl.constructor = qeth_old_arp_constructor;
8214 write_unlock(&arp_tbl.lock);
8215 kfree(arp_direct_ops);
8216 }
8217 #endif /* CONFIG_QETH_IPV6 */
8218
8219 static void
8220 qeth_sysfs_unregister(void)
8221 {
8222 qeth_remove_driver_attributes();
8223 ccw_driver_unregister(&qeth_ccw_driver);
8224 ccwgroup_driver_unregister(&qeth_ccwgroup_driver);
8225 s390_root_dev_unregister(qeth_root_dev);
8226 }
8227 /**
8228 * register qeth at sysfs
8229 */
8230 static int
8231 qeth_sysfs_register(void)
8232 {
8233 int rc=0;
8234
8235 rc = ccwgroup_driver_register(&qeth_ccwgroup_driver);
8236 if (rc)
8237 return rc;
8238 rc = ccw_driver_register(&qeth_ccw_driver);
8239 if (rc)
8240 return rc;
8241 rc = qeth_create_driver_attributes();
8242 if (rc)
8243 return rc;
8244 qeth_root_dev = s390_root_dev_register("qeth");
8245 if (IS_ERR(qeth_root_dev)) {
8246 rc = PTR_ERR(qeth_root_dev);
8247 return rc;
8248 }
8249 return 0;
8250 }
8251
8252 /***
8253 * init function
8254 */
8255 static int __init
8256 qeth_init(void)
8257 {
8258 int rc=0;
8259
8260 qeth_eyecatcher();
8261 PRINT_INFO("loading %s (%s/%s/%s/%s/%s/%s/%s %s %s)\n",
8262 version, VERSION_QETH_C, VERSION_QETH_H,
8263 VERSION_QETH_MPC_H, VERSION_QETH_MPC_C,
8264 VERSION_QETH_FS_H, VERSION_QETH_PROC_C,
8265 VERSION_QETH_SYS_C, QETH_VERSION_IPV6,
8266 QETH_VERSION_VLAN);
8267
8268 INIT_LIST_HEAD(&qeth_card_list.list);
8269 INIT_LIST_HEAD(&qeth_notify_list);
8270 spin_lock_init(&qeth_notify_lock);
8271 rwlock_init(&qeth_card_list.rwlock);
8272
8273 if (qeth_register_dbf_views())
8274 goto out_err;
8275 if (qeth_sysfs_register())
8276 goto out_sysfs;
8277
8278 #ifdef CONFIG_QETH_IPV6
8279 if (qeth_ipv6_init()) {
8280 PRINT_ERR("Out of memory during ipv6 init.\n");
8281 goto out_sysfs;
8282 }
8283 #endif /* QETH_IPV6 */
8284 if (qeth_register_notifiers())
8285 goto out_ipv6;
8286 if (qeth_create_procfs_entries())
8287 goto out_notifiers;
8288
8289 return rc;
8290
8291 out_notifiers:
8292 qeth_unregister_notifiers();
8293 out_ipv6:
8294 #ifdef CONFIG_QETH_IPV6
8295 qeth_ipv6_uninit();
8296 #endif /* QETH_IPV6 */
8297 out_sysfs:
8298 qeth_sysfs_unregister();
8299 qeth_unregister_dbf_views();
8300 out_err:
8301 PRINT_ERR("Initialization failed");
8302 return rc;
8303 }
8304
8305 static void
8306 __exit qeth_exit(void)
8307 {
8308 struct qeth_card *card, *tmp;
8309 unsigned long flags;
8310
8311 QETH_DBF_TEXT(trace,1, "cleanup.");
8312
8313 /*
8314 * Weed would not need to clean up our devices here, because the
8315 * common device layer calls qeth_remove_device for each device
8316 * as soon as we unregister our driver (done in qeth_sysfs_unregister).
8317 * But we do cleanup here so we can do a "soft" shutdown of our cards.
8318 * qeth_remove_device called by the common device layer would otherwise
8319 * do a "hard" shutdown (card->use_hard_stop is set to one in
8320 * qeth_remove_device).
8321 */
8322 again:
8323 read_lock_irqsave(&qeth_card_list.rwlock, flags);
8324 list_for_each_entry_safe(card, tmp, &qeth_card_list.list, list){
8325 read_unlock_irqrestore(&qeth_card_list.rwlock, flags);
8326 qeth_set_offline(card->gdev);
8327 qeth_remove_device(card->gdev);
8328 goto again;
8329 }
8330 read_unlock_irqrestore(&qeth_card_list.rwlock, flags);
8331 #ifdef CONFIG_QETH_IPV6
8332 qeth_ipv6_uninit();
8333 #endif
8334 qeth_unregister_notifiers();
8335 qeth_remove_procfs_entries();
8336 qeth_sysfs_unregister();
8337 qeth_unregister_dbf_views();
8338 printk("qeth: removed\n");
8339 }
8340
8341 EXPORT_SYMBOL(qeth_eyecatcher);
8342 module_init(qeth_init);
8343 module_exit(qeth_exit);
8344 MODULE_AUTHOR("Frank Pavlic <pavlic@de.ibm.com>");
8345 MODULE_DESCRIPTION("Linux on zSeries OSA Express and HiperSockets support\n" \
8346 "Copyright 2000,2003 IBM Corporation\n");
8347
8348 MODULE_LICENSE("GPL");
Verdex Pro support