2 * Linux for S/390 Lan Channel Station Network Driver
4 * Copyright IBM Corp. 1999, 2009
5 * Author(s): Original Code written by
6 * DJ Barrow <djbarrow@de.ibm.com,barrow_dj@yahoo.com>
8 * Frank Pavlic <fpavlic@de.ibm.com> and
9 * Martin Schwidefsky <schwidefsky@de.ibm.com>
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published by
13 * the Free Software Foundation; either version 2, or (at your option)
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with this program; if not, write to the Free Software
23 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26 #define KMSG_COMPONENT "lcs"
27 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
29 #include <linux/module.h>
31 #include <linux/netdevice.h>
32 #include <linux/etherdevice.h>
33 #include <linux/trdevice.h>
34 #include <linux/fddidevice.h>
35 #include <linux/inetdevice.h>
37 #include <linux/igmp.h>
38 #include <linux/delay.h>
39 #include <linux/kthread.h>
40 #include <linux/slab.h>
44 #include <asm/debug.h>
45 #include <asm/idals.h>
46 #include <asm/timex.h>
47 #include <linux/device.h>
48 #include <asm/ccwgroup.h>
53 #if !defined(CONFIG_NET_ETHERNET) && !defined(CONFIG_TR) && !defined(CONFIG_FDDI)
54 #error Cannot compile lcs.c without some net devices switched on.
58 * initialization string for output
61 static char version
[] __initdata
= "LCS driver";
64 * the root device for lcs group devices
66 static struct device
*lcs_root_dev
;
71 static void lcs_tasklet(unsigned long);
72 static void lcs_start_kernel_thread(struct work_struct
*);
73 static void lcs_get_frames_cb(struct lcs_channel
*, struct lcs_buffer
*);
74 #ifdef CONFIG_IP_MULTICAST
75 static int lcs_send_delipm(struct lcs_card
*, struct lcs_ipm_list
*);
76 #endif /* CONFIG_IP_MULTICAST */
77 static int lcs_recovery(void *ptr
);
80 * Debug Facility Stuff
82 static char debug_buffer
[255];
83 static debug_info_t
*lcs_dbf_setup
;
84 static debug_info_t
*lcs_dbf_trace
;
87 * LCS Debug Facility functions
90 lcs_unregister_debug_facility(void)
93 debug_unregister(lcs_dbf_setup
);
95 debug_unregister(lcs_dbf_trace
);
99 lcs_register_debug_facility(void)
101 lcs_dbf_setup
= debug_register("lcs_setup", 2, 1, 8);
102 lcs_dbf_trace
= debug_register("lcs_trace", 4, 1, 8);
103 if (lcs_dbf_setup
== NULL
|| lcs_dbf_trace
== NULL
) {
104 pr_err("Not enough memory for debug facility.\n");
105 lcs_unregister_debug_facility();
108 debug_register_view(lcs_dbf_setup
, &debug_hex_ascii_view
);
109 debug_set_level(lcs_dbf_setup
, 2);
110 debug_register_view(lcs_dbf_trace
, &debug_hex_ascii_view
);
111 debug_set_level(lcs_dbf_trace
, 2);
116 * Allocate io buffers.
119 lcs_alloc_channel(struct lcs_channel
*channel
)
123 LCS_DBF_TEXT(2, setup
, "ichalloc");
124 for (cnt
= 0; cnt
< LCS_NUM_BUFFS
; cnt
++) {
125 /* alloc memory fo iobuffer */
126 channel
->iob
[cnt
].data
=
127 kzalloc(LCS_IOBUFFERSIZE
, GFP_DMA
| GFP_KERNEL
);
128 if (channel
->iob
[cnt
].data
== NULL
)
130 channel
->iob
[cnt
].state
= LCS_BUF_STATE_EMPTY
;
132 if (cnt
< LCS_NUM_BUFFS
) {
133 /* Not all io buffers could be allocated. */
134 LCS_DBF_TEXT(2, setup
, "echalloc");
136 kfree(channel
->iob
[cnt
].data
);
146 lcs_free_channel(struct lcs_channel
*channel
)
150 LCS_DBF_TEXT(2, setup
, "ichfree");
151 for (cnt
= 0; cnt
< LCS_NUM_BUFFS
; cnt
++) {
152 kfree(channel
->iob
[cnt
].data
);
153 channel
->iob
[cnt
].data
= NULL
;
161 lcs_cleanup_channel(struct lcs_channel
*channel
)
163 LCS_DBF_TEXT(3, setup
, "cleanch");
164 /* Kill write channel tasklets. */
165 tasklet_kill(&channel
->irq_tasklet
);
166 /* Free channel buffers. */
167 lcs_free_channel(channel
);
171 * LCS free memory for card and channels.
174 lcs_free_card(struct lcs_card
*card
)
176 LCS_DBF_TEXT(2, setup
, "remcard");
177 LCS_DBF_HEX(2, setup
, &card
, sizeof(void*));
182 * LCS alloc memory for card and channels
184 static struct lcs_card
*
187 struct lcs_card
*card
;
190 LCS_DBF_TEXT(2, setup
, "alloclcs");
192 card
= kzalloc(sizeof(struct lcs_card
), GFP_KERNEL
| GFP_DMA
);
195 card
->lan_type
= LCS_FRAME_TYPE_AUTO
;
197 card
->lancmd_timeout
= LCS_LANCMD_TIMEOUT_DEFAULT
;
198 /* Allocate io buffers for the read channel. */
199 rc
= lcs_alloc_channel(&card
->read
);
201 LCS_DBF_TEXT(2, setup
, "iccwerr");
205 /* Allocate io buffers for the write channel. */
206 rc
= lcs_alloc_channel(&card
->write
);
208 LCS_DBF_TEXT(2, setup
, "iccwerr");
209 lcs_cleanup_channel(&card
->read
);
214 #ifdef CONFIG_IP_MULTICAST
215 INIT_LIST_HEAD(&card
->ipm_list
);
217 LCS_DBF_HEX(2, setup
, &card
, sizeof(void*));
222 * Setup read channel.
225 lcs_setup_read_ccws(struct lcs_card
*card
)
229 LCS_DBF_TEXT(2, setup
, "ireadccw");
230 /* Setup read ccws. */
231 memset(card
->read
.ccws
, 0, sizeof (struct ccw1
) * (LCS_NUM_BUFFS
+ 1));
232 for (cnt
= 0; cnt
< LCS_NUM_BUFFS
; cnt
++) {
233 card
->read
.ccws
[cnt
].cmd_code
= LCS_CCW_READ
;
234 card
->read
.ccws
[cnt
].count
= LCS_IOBUFFERSIZE
;
235 card
->read
.ccws
[cnt
].flags
=
236 CCW_FLAG_CC
| CCW_FLAG_SLI
| CCW_FLAG_PCI
;
238 * Note: we have allocated the buffer with GFP_DMA, so
239 * we do not need to do set_normalized_cda.
241 card
->read
.ccws
[cnt
].cda
=
242 (__u32
) __pa(card
->read
.iob
[cnt
].data
);
243 ((struct lcs_header
*)
244 card
->read
.iob
[cnt
].data
)->offset
= LCS_ILLEGAL_OFFSET
;
245 card
->read
.iob
[cnt
].callback
= lcs_get_frames_cb
;
246 card
->read
.iob
[cnt
].state
= LCS_BUF_STATE_READY
;
247 card
->read
.iob
[cnt
].count
= LCS_IOBUFFERSIZE
;
249 card
->read
.ccws
[0].flags
&= ~CCW_FLAG_PCI
;
250 card
->read
.ccws
[LCS_NUM_BUFFS
- 1].flags
&= ~CCW_FLAG_PCI
;
251 card
->read
.ccws
[LCS_NUM_BUFFS
- 1].flags
|= CCW_FLAG_SUSPEND
;
252 /* Last ccw is a tic (transfer in channel). */
253 card
->read
.ccws
[LCS_NUM_BUFFS
].cmd_code
= LCS_CCW_TRANSFER
;
254 card
->read
.ccws
[LCS_NUM_BUFFS
].cda
=
255 (__u32
) __pa(card
->read
.ccws
);
256 /* Setg initial state of the read channel. */
257 card
->read
.state
= LCS_CH_STATE_INIT
;
259 card
->read
.io_idx
= 0;
260 card
->read
.buf_idx
= 0;
264 lcs_setup_read(struct lcs_card
*card
)
266 LCS_DBF_TEXT(3, setup
, "initread");
268 lcs_setup_read_ccws(card
);
269 /* Initialize read channel tasklet. */
270 card
->read
.irq_tasklet
.data
= (unsigned long) &card
->read
;
271 card
->read
.irq_tasklet
.func
= lcs_tasklet
;
272 /* Initialize waitqueue. */
273 init_waitqueue_head(&card
->read
.wait_q
);
277 * Setup write channel.
280 lcs_setup_write_ccws(struct lcs_card
*card
)
284 LCS_DBF_TEXT(3, setup
, "iwritccw");
285 /* Setup write ccws. */
286 memset(card
->write
.ccws
, 0, sizeof(struct ccw1
) * LCS_NUM_BUFFS
+ 1);
287 for (cnt
= 0; cnt
< LCS_NUM_BUFFS
; cnt
++) {
288 card
->write
.ccws
[cnt
].cmd_code
= LCS_CCW_WRITE
;
289 card
->write
.ccws
[cnt
].count
= 0;
290 card
->write
.ccws
[cnt
].flags
=
291 CCW_FLAG_SUSPEND
| CCW_FLAG_CC
| CCW_FLAG_SLI
;
293 * Note: we have allocated the buffer with GFP_DMA, so
294 * we do not need to do set_normalized_cda.
296 card
->write
.ccws
[cnt
].cda
=
297 (__u32
) __pa(card
->write
.iob
[cnt
].data
);
299 /* Last ccw is a tic (transfer in channel). */
300 card
->write
.ccws
[LCS_NUM_BUFFS
].cmd_code
= LCS_CCW_TRANSFER
;
301 card
->write
.ccws
[LCS_NUM_BUFFS
].cda
=
302 (__u32
) __pa(card
->write
.ccws
);
303 /* Set initial state of the write channel. */
304 card
->read
.state
= LCS_CH_STATE_INIT
;
306 card
->write
.io_idx
= 0;
307 card
->write
.buf_idx
= 0;
311 lcs_setup_write(struct lcs_card
*card
)
313 LCS_DBF_TEXT(3, setup
, "initwrit");
315 lcs_setup_write_ccws(card
);
316 /* Initialize write channel tasklet. */
317 card
->write
.irq_tasklet
.data
= (unsigned long) &card
->write
;
318 card
->write
.irq_tasklet
.func
= lcs_tasklet
;
319 /* Initialize waitqueue. */
320 init_waitqueue_head(&card
->write
.wait_q
);
324 lcs_set_allowed_threads(struct lcs_card
*card
, unsigned long threads
)
328 spin_lock_irqsave(&card
->mask_lock
, flags
);
329 card
->thread_allowed_mask
= threads
;
330 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
331 wake_up(&card
->wait_q
);
334 lcs_threads_running(struct lcs_card
*card
, unsigned long threads
)
339 spin_lock_irqsave(&card
->mask_lock
, flags
);
340 rc
= (card
->thread_running_mask
& threads
);
341 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
346 lcs_wait_for_threads(struct lcs_card
*card
, unsigned long threads
)
348 return wait_event_interruptible(card
->wait_q
,
349 lcs_threads_running(card
, threads
) == 0);
353 lcs_set_thread_start_bit(struct lcs_card
*card
, unsigned long thread
)
357 spin_lock_irqsave(&card
->mask_lock
, flags
);
358 if ( !(card
->thread_allowed_mask
& thread
) ||
359 (card
->thread_start_mask
& thread
) ) {
360 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
363 card
->thread_start_mask
|= thread
;
364 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
369 lcs_clear_thread_running_bit(struct lcs_card
*card
, unsigned long thread
)
373 spin_lock_irqsave(&card
->mask_lock
, flags
);
374 card
->thread_running_mask
&= ~thread
;
375 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
376 wake_up(&card
->wait_q
);
380 __lcs_do_run_thread(struct lcs_card
*card
, unsigned long thread
)
385 spin_lock_irqsave(&card
->mask_lock
, flags
);
386 if (card
->thread_start_mask
& thread
){
387 if ((card
->thread_allowed_mask
& thread
) &&
388 !(card
->thread_running_mask
& thread
)){
390 card
->thread_start_mask
&= ~thread
;
391 card
->thread_running_mask
|= thread
;
395 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
400 lcs_do_run_thread(struct lcs_card
*card
, unsigned long thread
)
403 wait_event(card
->wait_q
,
404 (rc
= __lcs_do_run_thread(card
, thread
)) >= 0);
409 lcs_do_start_thread(struct lcs_card
*card
, unsigned long thread
)
414 spin_lock_irqsave(&card
->mask_lock
, flags
);
415 LCS_DBF_TEXT_(4, trace
, " %02x%02x%02x",
416 (u8
) card
->thread_start_mask
,
417 (u8
) card
->thread_allowed_mask
,
418 (u8
) card
->thread_running_mask
);
419 rc
= (card
->thread_start_mask
& thread
);
420 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
425 * Initialize channels,card and state machines.
428 lcs_setup_card(struct lcs_card
*card
)
430 LCS_DBF_TEXT(2, setup
, "initcard");
431 LCS_DBF_HEX(2, setup
, &card
, sizeof(void*));
433 lcs_setup_read(card
);
434 lcs_setup_write(card
);
435 /* Set cards initial state. */
436 card
->state
= DEV_STATE_DOWN
;
437 card
->tx_buffer
= NULL
;
438 card
->tx_emitted
= 0;
440 init_waitqueue_head(&card
->wait_q
);
441 spin_lock_init(&card
->lock
);
442 spin_lock_init(&card
->ipm_lock
);
443 spin_lock_init(&card
->mask_lock
);
444 #ifdef CONFIG_IP_MULTICAST
445 INIT_LIST_HEAD(&card
->ipm_list
);
447 INIT_LIST_HEAD(&card
->lancmd_waiters
);
451 lcs_clear_multicast_list(struct lcs_card
*card
)
453 #ifdef CONFIG_IP_MULTICAST
454 struct lcs_ipm_list
*ipm
;
457 /* Free multicast list. */
458 LCS_DBF_TEXT(3, setup
, "clmclist");
459 spin_lock_irqsave(&card
->ipm_lock
, flags
);
460 while (!list_empty(&card
->ipm_list
)){
461 ipm
= list_entry(card
->ipm_list
.next
,
462 struct lcs_ipm_list
, list
);
463 list_del(&ipm
->list
);
464 if (ipm
->ipm_state
!= LCS_IPM_STATE_SET_REQUIRED
){
465 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
466 lcs_send_delipm(card
, ipm
);
467 spin_lock_irqsave(&card
->ipm_lock
, flags
);
471 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
475 * Cleanup channels,card and state machines.
478 lcs_cleanup_card(struct lcs_card
*card
)
481 LCS_DBF_TEXT(3, setup
, "cleancrd");
482 LCS_DBF_HEX(2,setup
,&card
,sizeof(void*));
484 if (card
->dev
!= NULL
)
485 free_netdev(card
->dev
);
486 /* Cleanup channels. */
487 lcs_cleanup_channel(&card
->write
);
488 lcs_cleanup_channel(&card
->read
);
495 lcs_start_channel(struct lcs_channel
*channel
)
500 LCS_DBF_TEXT_(4, trace
,"ssch%s", dev_name(&channel
->ccwdev
->dev
));
501 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
502 rc
= ccw_device_start(channel
->ccwdev
,
503 channel
->ccws
+ channel
->io_idx
, 0, 0,
504 DOIO_DENY_PREFETCH
| DOIO_ALLOW_SUSPEND
);
506 channel
->state
= LCS_CH_STATE_RUNNING
;
507 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
509 LCS_DBF_TEXT_(4,trace
,"essh%s",
510 dev_name(&channel
->ccwdev
->dev
));
511 dev_err(&channel
->ccwdev
->dev
,
512 "Starting an LCS device resulted in an error,"
519 lcs_clear_channel(struct lcs_channel
*channel
)
524 LCS_DBF_TEXT(4,trace
,"clearch");
525 LCS_DBF_TEXT_(4, trace
, "%s", dev_name(&channel
->ccwdev
->dev
));
526 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
527 rc
= ccw_device_clear(channel
->ccwdev
, (addr_t
) channel
);
528 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
530 LCS_DBF_TEXT_(4, trace
, "ecsc%s",
531 dev_name(&channel
->ccwdev
->dev
));
534 wait_event(channel
->wait_q
, (channel
->state
== LCS_CH_STATE_CLEARED
));
535 channel
->state
= LCS_CH_STATE_STOPPED
;
544 lcs_stop_channel(struct lcs_channel
*channel
)
549 if (channel
->state
== LCS_CH_STATE_STOPPED
)
551 LCS_DBF_TEXT(4,trace
,"haltsch");
552 LCS_DBF_TEXT_(4, trace
, "%s", dev_name(&channel
->ccwdev
->dev
));
553 channel
->state
= LCS_CH_STATE_INIT
;
554 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
555 rc
= ccw_device_halt(channel
->ccwdev
, (addr_t
) channel
);
556 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
558 LCS_DBF_TEXT_(4, trace
, "ehsc%s",
559 dev_name(&channel
->ccwdev
->dev
));
562 /* Asynchronous halt initialted. Wait for its completion. */
563 wait_event(channel
->wait_q
, (channel
->state
== LCS_CH_STATE_HALTED
));
564 lcs_clear_channel(channel
);
569 * start read and write channel
572 lcs_start_channels(struct lcs_card
*card
)
576 LCS_DBF_TEXT(2, trace
, "chstart");
577 /* start read channel */
578 rc
= lcs_start_channel(&card
->read
);
581 /* start write channel */
582 rc
= lcs_start_channel(&card
->write
);
584 lcs_stop_channel(&card
->read
);
589 * stop read and write channel
592 lcs_stop_channels(struct lcs_card
*card
)
594 LCS_DBF_TEXT(2, trace
, "chhalt");
595 lcs_stop_channel(&card
->read
);
596 lcs_stop_channel(&card
->write
);
603 static struct lcs_buffer
*
604 __lcs_get_buffer(struct lcs_channel
*channel
)
608 LCS_DBF_TEXT(5, trace
, "_getbuff");
609 index
= channel
->io_idx
;
611 if (channel
->iob
[index
].state
== LCS_BUF_STATE_EMPTY
) {
612 channel
->iob
[index
].state
= LCS_BUF_STATE_LOCKED
;
613 return channel
->iob
+ index
;
615 index
= (index
+ 1) & (LCS_NUM_BUFFS
- 1);
616 } while (index
!= channel
->io_idx
);
620 static struct lcs_buffer
*
621 lcs_get_buffer(struct lcs_channel
*channel
)
623 struct lcs_buffer
*buffer
;
626 LCS_DBF_TEXT(5, trace
, "getbuff");
627 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
628 buffer
= __lcs_get_buffer(channel
);
629 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
634 * Resume channel program if the channel is suspended.
637 __lcs_resume_channel(struct lcs_channel
*channel
)
641 if (channel
->state
!= LCS_CH_STATE_SUSPENDED
)
643 if (channel
->ccws
[channel
->io_idx
].flags
& CCW_FLAG_SUSPEND
)
645 LCS_DBF_TEXT_(5, trace
, "rsch%s", dev_name(&channel
->ccwdev
->dev
));
646 rc
= ccw_device_resume(channel
->ccwdev
);
648 LCS_DBF_TEXT_(4, trace
, "ersc%s",
649 dev_name(&channel
->ccwdev
->dev
));
650 dev_err(&channel
->ccwdev
->dev
,
651 "Sending data from the LCS device to the LAN failed"
654 channel
->state
= LCS_CH_STATE_RUNNING
;
660 * Make a buffer ready for processing.
663 __lcs_ready_buffer_bits(struct lcs_channel
*channel
, int index
)
667 LCS_DBF_TEXT(5, trace
, "rdybits");
668 prev
= (index
- 1) & (LCS_NUM_BUFFS
- 1);
669 next
= (index
+ 1) & (LCS_NUM_BUFFS
- 1);
670 /* Check if we may clear the suspend bit of this buffer. */
671 if (channel
->ccws
[next
].flags
& CCW_FLAG_SUSPEND
) {
672 /* Check if we have to set the PCI bit. */
673 if (!(channel
->ccws
[prev
].flags
& CCW_FLAG_SUSPEND
))
674 /* Suspend bit of the previous buffer is not set. */
675 channel
->ccws
[index
].flags
|= CCW_FLAG_PCI
;
676 /* Suspend bit of the next buffer is set. */
677 channel
->ccws
[index
].flags
&= ~CCW_FLAG_SUSPEND
;
682 lcs_ready_buffer(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
687 LCS_DBF_TEXT(5, trace
, "rdybuff");
688 BUG_ON(buffer
->state
!= LCS_BUF_STATE_LOCKED
&&
689 buffer
->state
!= LCS_BUF_STATE_PROCESSED
);
690 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
691 buffer
->state
= LCS_BUF_STATE_READY
;
692 index
= buffer
- channel
->iob
;
694 channel
->ccws
[index
].count
= buffer
->count
;
695 /* Check relevant PCI/suspend bits. */
696 __lcs_ready_buffer_bits(channel
, index
);
697 rc
= __lcs_resume_channel(channel
);
698 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
703 * Mark the buffer as processed. Take care of the suspend bit
704 * of the previous buffer. This function is called from
705 * interrupt context, so the lock must not be taken.
708 __lcs_processed_buffer(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
710 int index
, prev
, next
;
712 LCS_DBF_TEXT(5, trace
, "prcsbuff");
713 BUG_ON(buffer
->state
!= LCS_BUF_STATE_READY
);
714 buffer
->state
= LCS_BUF_STATE_PROCESSED
;
715 index
= buffer
- channel
->iob
;
716 prev
= (index
- 1) & (LCS_NUM_BUFFS
- 1);
717 next
= (index
+ 1) & (LCS_NUM_BUFFS
- 1);
718 /* Set the suspend bit and clear the PCI bit of this buffer. */
719 channel
->ccws
[index
].flags
|= CCW_FLAG_SUSPEND
;
720 channel
->ccws
[index
].flags
&= ~CCW_FLAG_PCI
;
721 /* Check the suspend bit of the previous buffer. */
722 if (channel
->iob
[prev
].state
== LCS_BUF_STATE_READY
) {
724 * Previous buffer is in state ready. It might have
725 * happened in lcs_ready_buffer that the suspend bit
726 * has not been cleared to avoid an endless loop.
729 __lcs_ready_buffer_bits(channel
, prev
);
731 /* Clear PCI bit of next buffer. */
732 channel
->ccws
[next
].flags
&= ~CCW_FLAG_PCI
;
733 return __lcs_resume_channel(channel
);
737 * Put a processed buffer back to state empty.
740 lcs_release_buffer(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
744 LCS_DBF_TEXT(5, trace
, "relbuff");
745 BUG_ON(buffer
->state
!= LCS_BUF_STATE_LOCKED
&&
746 buffer
->state
!= LCS_BUF_STATE_PROCESSED
);
747 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
748 buffer
->state
= LCS_BUF_STATE_EMPTY
;
749 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
753 * Get buffer for a lan command.
755 static struct lcs_buffer
*
756 lcs_get_lancmd(struct lcs_card
*card
, int count
)
758 struct lcs_buffer
*buffer
;
761 LCS_DBF_TEXT(4, trace
, "getlncmd");
762 /* Get buffer and wait if none is available. */
763 wait_event(card
->write
.wait_q
,
764 ((buffer
= lcs_get_buffer(&card
->write
)) != NULL
));
765 count
+= sizeof(struct lcs_header
);
766 *(__u16
*)(buffer
->data
+ count
) = 0;
767 buffer
->count
= count
+ sizeof(__u16
);
768 buffer
->callback
= lcs_release_buffer
;
769 cmd
= (struct lcs_cmd
*) buffer
->data
;
771 cmd
->type
= LCS_FRAME_TYPE_CONTROL
;
778 lcs_get_reply(struct lcs_reply
*reply
)
780 WARN_ON(atomic_read(&reply
->refcnt
) <= 0);
781 atomic_inc(&reply
->refcnt
);
785 lcs_put_reply(struct lcs_reply
*reply
)
787 WARN_ON(atomic_read(&reply
->refcnt
) <= 0);
788 if (atomic_dec_and_test(&reply
->refcnt
)) {
794 static struct lcs_reply
*
795 lcs_alloc_reply(struct lcs_cmd
*cmd
)
797 struct lcs_reply
*reply
;
799 LCS_DBF_TEXT(4, trace
, "getreply");
801 reply
= kzalloc(sizeof(struct lcs_reply
), GFP_ATOMIC
);
804 atomic_set(&reply
->refcnt
,1);
805 reply
->sequence_no
= cmd
->sequence_no
;
808 init_waitqueue_head(&reply
->wait_q
);
814 * Notifier function for lancmd replies. Called from read irq.
817 lcs_notify_lancmd_waiters(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
819 struct list_head
*l
, *n
;
820 struct lcs_reply
*reply
;
822 LCS_DBF_TEXT(4, trace
, "notiwait");
823 spin_lock(&card
->lock
);
824 list_for_each_safe(l
, n
, &card
->lancmd_waiters
) {
825 reply
= list_entry(l
, struct lcs_reply
, list
);
826 if (reply
->sequence_no
== cmd
->sequence_no
) {
827 lcs_get_reply(reply
);
828 list_del_init(&reply
->list
);
829 if (reply
->callback
!= NULL
)
830 reply
->callback(card
, cmd
);
832 reply
->rc
= cmd
->return_code
;
833 wake_up(&reply
->wait_q
);
834 lcs_put_reply(reply
);
838 spin_unlock(&card
->lock
);
842 * Emit buffer of a lan comand.
845 lcs_lancmd_timeout(unsigned long data
)
847 struct lcs_reply
*reply
, *list_reply
, *r
;
850 LCS_DBF_TEXT(4, trace
, "timeout");
851 reply
= (struct lcs_reply
*) data
;
852 spin_lock_irqsave(&reply
->card
->lock
, flags
);
853 list_for_each_entry_safe(list_reply
, r
,
854 &reply
->card
->lancmd_waiters
,list
) {
855 if (reply
== list_reply
) {
856 lcs_get_reply(reply
);
857 list_del_init(&reply
->list
);
858 spin_unlock_irqrestore(&reply
->card
->lock
, flags
);
861 wake_up(&reply
->wait_q
);
862 lcs_put_reply(reply
);
866 spin_unlock_irqrestore(&reply
->card
->lock
, flags
);
870 lcs_send_lancmd(struct lcs_card
*card
, struct lcs_buffer
*buffer
,
871 void (*reply_callback
)(struct lcs_card
*, struct lcs_cmd
*))
873 struct lcs_reply
*reply
;
875 struct timer_list timer
;
879 LCS_DBF_TEXT(4, trace
, "sendcmd");
880 cmd
= (struct lcs_cmd
*) buffer
->data
;
881 cmd
->return_code
= 0;
882 cmd
->sequence_no
= card
->sequence_no
++;
883 reply
= lcs_alloc_reply(cmd
);
886 reply
->callback
= reply_callback
;
888 spin_lock_irqsave(&card
->lock
, flags
);
889 list_add_tail(&reply
->list
, &card
->lancmd_waiters
);
890 spin_unlock_irqrestore(&card
->lock
, flags
);
892 buffer
->callback
= lcs_release_buffer
;
893 rc
= lcs_ready_buffer(&card
->write
, buffer
);
896 init_timer_on_stack(&timer
);
897 timer
.function
= lcs_lancmd_timeout
;
898 timer
.data
= (unsigned long) reply
;
899 timer
.expires
= jiffies
+ HZ
*card
->lancmd_timeout
;
901 wait_event(reply
->wait_q
, reply
->received
);
902 del_timer_sync(&timer
);
903 LCS_DBF_TEXT_(4, trace
, "rc:%d",reply
->rc
);
905 lcs_put_reply(reply
);
906 return rc
? -EIO
: 0;
910 * LCS startup command
913 lcs_send_startup(struct lcs_card
*card
, __u8 initiator
)
915 struct lcs_buffer
*buffer
;
918 LCS_DBF_TEXT(2, trace
, "startup");
919 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
920 cmd
= (struct lcs_cmd
*) buffer
->data
;
921 cmd
->cmd_code
= LCS_CMD_STARTUP
;
922 cmd
->initiator
= initiator
;
923 cmd
->cmd
.lcs_startup
.buff_size
= LCS_IOBUFFERSIZE
;
924 return lcs_send_lancmd(card
, buffer
, NULL
);
928 * LCS shutdown command
931 lcs_send_shutdown(struct lcs_card
*card
)
933 struct lcs_buffer
*buffer
;
936 LCS_DBF_TEXT(2, trace
, "shutdown");
937 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
938 cmd
= (struct lcs_cmd
*) buffer
->data
;
939 cmd
->cmd_code
= LCS_CMD_SHUTDOWN
;
940 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
941 return lcs_send_lancmd(card
, buffer
, NULL
);
945 * LCS lanstat command
948 __lcs_lanstat_cb(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
950 LCS_DBF_TEXT(2, trace
, "statcb");
951 memcpy(card
->mac
, cmd
->cmd
.lcs_lanstat_cmd
.mac_addr
, LCS_MAC_LENGTH
);
955 lcs_send_lanstat(struct lcs_card
*card
)
957 struct lcs_buffer
*buffer
;
960 LCS_DBF_TEXT(2,trace
, "cmdstat");
961 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
962 cmd
= (struct lcs_cmd
*) buffer
->data
;
963 /* Setup lanstat command. */
964 cmd
->cmd_code
= LCS_CMD_LANSTAT
;
965 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
966 cmd
->cmd
.lcs_std_cmd
.lan_type
= card
->lan_type
;
967 cmd
->cmd
.lcs_std_cmd
.portno
= card
->portno
;
968 return lcs_send_lancmd(card
, buffer
, __lcs_lanstat_cb
);
972 * send stoplan command
975 lcs_send_stoplan(struct lcs_card
*card
, __u8 initiator
)
977 struct lcs_buffer
*buffer
;
980 LCS_DBF_TEXT(2, trace
, "cmdstpln");
981 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
982 cmd
= (struct lcs_cmd
*) buffer
->data
;
983 cmd
->cmd_code
= LCS_CMD_STOPLAN
;
984 cmd
->initiator
= initiator
;
985 cmd
->cmd
.lcs_std_cmd
.lan_type
= card
->lan_type
;
986 cmd
->cmd
.lcs_std_cmd
.portno
= card
->portno
;
987 return lcs_send_lancmd(card
, buffer
, NULL
);
991 * send startlan command
994 __lcs_send_startlan_cb(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
996 LCS_DBF_TEXT(2, trace
, "srtlancb");
997 card
->lan_type
= cmd
->cmd
.lcs_std_cmd
.lan_type
;
998 card
->portno
= cmd
->cmd
.lcs_std_cmd
.portno
;
1002 lcs_send_startlan(struct lcs_card
*card
, __u8 initiator
)
1004 struct lcs_buffer
*buffer
;
1005 struct lcs_cmd
*cmd
;
1007 LCS_DBF_TEXT(2, trace
, "cmdstaln");
1008 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
1009 cmd
= (struct lcs_cmd
*) buffer
->data
;
1010 cmd
->cmd_code
= LCS_CMD_STARTLAN
;
1011 cmd
->initiator
= initiator
;
1012 cmd
->cmd
.lcs_std_cmd
.lan_type
= card
->lan_type
;
1013 cmd
->cmd
.lcs_std_cmd
.portno
= card
->portno
;
1014 return lcs_send_lancmd(card
, buffer
, __lcs_send_startlan_cb
);
1017 #ifdef CONFIG_IP_MULTICAST
1019 * send setipm command (Multicast)
1022 lcs_send_setipm(struct lcs_card
*card
,struct lcs_ipm_list
*ipm_list
)
1024 struct lcs_buffer
*buffer
;
1025 struct lcs_cmd
*cmd
;
1027 LCS_DBF_TEXT(2, trace
, "cmdsetim");
1028 buffer
= lcs_get_lancmd(card
, LCS_MULTICAST_CMD_SIZE
);
1029 cmd
= (struct lcs_cmd
*) buffer
->data
;
1030 cmd
->cmd_code
= LCS_CMD_SETIPM
;
1031 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
1032 cmd
->cmd
.lcs_qipassist
.lan_type
= card
->lan_type
;
1033 cmd
->cmd
.lcs_qipassist
.portno
= card
->portno
;
1034 cmd
->cmd
.lcs_qipassist
.version
= 4;
1035 cmd
->cmd
.lcs_qipassist
.num_ip_pairs
= 1;
1036 memcpy(cmd
->cmd
.lcs_qipassist
.lcs_ipass_ctlmsg
.ip_mac_pair
,
1037 &ipm_list
->ipm
, sizeof (struct lcs_ip_mac_pair
));
1038 LCS_DBF_TEXT_(2, trace
, "%x",ipm_list
->ipm
.ip_addr
);
1039 return lcs_send_lancmd(card
, buffer
, NULL
);
1043 * send delipm command (Multicast)
1046 lcs_send_delipm(struct lcs_card
*card
,struct lcs_ipm_list
*ipm_list
)
1048 struct lcs_buffer
*buffer
;
1049 struct lcs_cmd
*cmd
;
1051 LCS_DBF_TEXT(2, trace
, "cmddelim");
1052 buffer
= lcs_get_lancmd(card
, LCS_MULTICAST_CMD_SIZE
);
1053 cmd
= (struct lcs_cmd
*) buffer
->data
;
1054 cmd
->cmd_code
= LCS_CMD_DELIPM
;
1055 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
1056 cmd
->cmd
.lcs_qipassist
.lan_type
= card
->lan_type
;
1057 cmd
->cmd
.lcs_qipassist
.portno
= card
->portno
;
1058 cmd
->cmd
.lcs_qipassist
.version
= 4;
1059 cmd
->cmd
.lcs_qipassist
.num_ip_pairs
= 1;
1060 memcpy(cmd
->cmd
.lcs_qipassist
.lcs_ipass_ctlmsg
.ip_mac_pair
,
1061 &ipm_list
->ipm
, sizeof (struct lcs_ip_mac_pair
));
1062 LCS_DBF_TEXT_(2, trace
, "%x",ipm_list
->ipm
.ip_addr
);
1063 return lcs_send_lancmd(card
, buffer
, NULL
);
1067 * check if multicast is supported by LCS
1070 __lcs_check_multicast_cb(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
1072 LCS_DBF_TEXT(2, trace
, "chkmccb");
1073 card
->ip_assists_supported
=
1074 cmd
->cmd
.lcs_qipassist
.ip_assists_supported
;
1075 card
->ip_assists_enabled
=
1076 cmd
->cmd
.lcs_qipassist
.ip_assists_enabled
;
1080 lcs_check_multicast_support(struct lcs_card
*card
)
1082 struct lcs_buffer
*buffer
;
1083 struct lcs_cmd
*cmd
;
1086 LCS_DBF_TEXT(2, trace
, "cmdqipa");
1087 /* Send query ipassist. */
1088 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
1089 cmd
= (struct lcs_cmd
*) buffer
->data
;
1090 cmd
->cmd_code
= LCS_CMD_QIPASSIST
;
1091 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
1092 cmd
->cmd
.lcs_qipassist
.lan_type
= card
->lan_type
;
1093 cmd
->cmd
.lcs_qipassist
.portno
= card
->portno
;
1094 cmd
->cmd
.lcs_qipassist
.version
= 4;
1095 cmd
->cmd
.lcs_qipassist
.num_ip_pairs
= 1;
1096 rc
= lcs_send_lancmd(card
, buffer
, __lcs_check_multicast_cb
);
1098 pr_err("Query IPAssist failed. Assuming unsupported!\n");
1101 if (card
->ip_assists_supported
& LCS_IPASS_MULTICAST_SUPPORT
)
1107 * set or del multicast address on LCS card
1110 lcs_fix_multicast_list(struct lcs_card
*card
)
1112 struct list_head failed_list
;
1113 struct lcs_ipm_list
*ipm
, *tmp
;
1114 unsigned long flags
;
1117 LCS_DBF_TEXT(4,trace
, "fixipm");
1118 INIT_LIST_HEAD(&failed_list
);
1119 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1121 list_for_each_entry_safe(ipm
, tmp
, &card
->ipm_list
, list
){
1122 switch (ipm
->ipm_state
) {
1123 case LCS_IPM_STATE_SET_REQUIRED
:
1124 /* del from ipm_list so noone else can tamper with
1126 list_del_init(&ipm
->list
);
1127 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1128 rc
= lcs_send_setipm(card
, ipm
);
1129 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1131 pr_info("Adding multicast address failed."
1132 " Table possibly full!\n");
1133 /* store ipm in failed list -> will be added
1134 * to ipm_list again, so a retry will be done
1135 * during the next call of this function */
1136 list_add_tail(&ipm
->list
, &failed_list
);
1138 ipm
->ipm_state
= LCS_IPM_STATE_ON_CARD
;
1139 /* re-insert into ipm_list */
1140 list_add_tail(&ipm
->list
, &card
->ipm_list
);
1143 case LCS_IPM_STATE_DEL_REQUIRED
:
1144 list_del(&ipm
->list
);
1145 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1146 lcs_send_delipm(card
, ipm
);
1147 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1150 case LCS_IPM_STATE_ON_CARD
:
1154 /* re-insert all entries from the failed_list into ipm_list */
1155 list_for_each_entry_safe(ipm
, tmp
, &failed_list
, list
)
1156 list_move_tail(&ipm
->list
, &card
->ipm_list
);
1158 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1162 * get mac address for the relevant Multicast address
1165 lcs_get_mac_for_ipm(__be32 ipm
, char *mac
, struct net_device
*dev
)
1167 LCS_DBF_TEXT(4,trace
, "getmac");
1168 if (dev
->type
== ARPHRD_IEEE802_TR
)
1169 ip_tr_mc_map(ipm
, mac
);
1171 ip_eth_mc_map(ipm
, mac
);
1175 * function called by net device to handle multicast address relevant things
1178 lcs_remove_mc_addresses(struct lcs_card
*card
, struct in_device
*in4_dev
)
1180 struct ip_mc_list
*im4
;
1181 struct list_head
*l
;
1182 struct lcs_ipm_list
*ipm
;
1183 unsigned long flags
;
1184 char buf
[MAX_ADDR_LEN
];
1186 LCS_DBF_TEXT(4, trace
, "remmclst");
1187 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1188 list_for_each(l
, &card
->ipm_list
) {
1189 ipm
= list_entry(l
, struct lcs_ipm_list
, list
);
1190 for (im4
= in4_dev
->mc_list
; im4
!= NULL
; im4
= im4
->next
) {
1191 lcs_get_mac_for_ipm(im4
->multiaddr
, buf
, card
->dev
);
1192 if ( (ipm
->ipm
.ip_addr
== im4
->multiaddr
) &&
1193 (memcmp(buf
, &ipm
->ipm
.mac_addr
,
1194 LCS_MAC_LENGTH
) == 0) )
1198 ipm
->ipm_state
= LCS_IPM_STATE_DEL_REQUIRED
;
1200 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1203 static inline struct lcs_ipm_list
*
1204 lcs_check_addr_entry(struct lcs_card
*card
, struct ip_mc_list
*im4
, char *buf
)
1206 struct lcs_ipm_list
*tmp
, *ipm
= NULL
;
1207 struct list_head
*l
;
1208 unsigned long flags
;
1210 LCS_DBF_TEXT(4, trace
, "chkmcent");
1211 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1212 list_for_each(l
, &card
->ipm_list
) {
1213 tmp
= list_entry(l
, struct lcs_ipm_list
, list
);
1214 if ( (tmp
->ipm
.ip_addr
== im4
->multiaddr
) &&
1215 (memcmp(buf
, &tmp
->ipm
.mac_addr
,
1216 LCS_MAC_LENGTH
) == 0) ) {
1221 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1226 lcs_set_mc_addresses(struct lcs_card
*card
, struct in_device
*in4_dev
)
1229 struct ip_mc_list
*im4
;
1230 struct lcs_ipm_list
*ipm
;
1231 char buf
[MAX_ADDR_LEN
];
1232 unsigned long flags
;
1234 LCS_DBF_TEXT(4, trace
, "setmclst");
1235 for (im4
= in4_dev
->mc_list
; im4
; im4
= im4
->next
) {
1236 lcs_get_mac_for_ipm(im4
->multiaddr
, buf
, card
->dev
);
1237 ipm
= lcs_check_addr_entry(card
, im4
, buf
);
1239 continue; /* Address already in list. */
1240 ipm
= kzalloc(sizeof(struct lcs_ipm_list
), GFP_ATOMIC
);
1242 pr_info("Not enough memory to add"
1243 " new multicast entry!\n");
1246 memcpy(&ipm
->ipm
.mac_addr
, buf
, LCS_MAC_LENGTH
);
1247 ipm
->ipm
.ip_addr
= im4
->multiaddr
;
1248 ipm
->ipm_state
= LCS_IPM_STATE_SET_REQUIRED
;
1249 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1250 LCS_DBF_HEX(2,trace
,&ipm
->ipm
.ip_addr
,4);
1251 list_add(&ipm
->list
, &card
->ipm_list
);
1252 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1257 lcs_register_mc_addresses(void *data
)
1259 struct lcs_card
*card
;
1260 struct in_device
*in4_dev
;
1262 card
= (struct lcs_card
*) data
;
1264 if (!lcs_do_run_thread(card
, LCS_SET_MC_THREAD
))
1266 LCS_DBF_TEXT(4, trace
, "regmulti");
1268 in4_dev
= in_dev_get(card
->dev
);
1269 if (in4_dev
== NULL
)
1271 read_lock(&in4_dev
->mc_list_lock
);
1272 lcs_remove_mc_addresses(card
,in4_dev
);
1273 lcs_set_mc_addresses(card
, in4_dev
);
1274 read_unlock(&in4_dev
->mc_list_lock
);
1275 in_dev_put(in4_dev
);
1277 netif_carrier_off(card
->dev
);
1278 netif_tx_disable(card
->dev
);
1279 wait_event(card
->write
.wait_q
,
1280 (card
->write
.state
!= LCS_CH_STATE_RUNNING
));
1281 lcs_fix_multicast_list(card
);
1282 if (card
->state
== DEV_STATE_UP
) {
1283 netif_carrier_on(card
->dev
);
1284 netif_wake_queue(card
->dev
);
1287 lcs_clear_thread_running_bit(card
, LCS_SET_MC_THREAD
);
1290 #endif /* CONFIG_IP_MULTICAST */
1293 * function called by net device to
1294 * handle multicast address relevant things
1297 lcs_set_multicast_list(struct net_device
*dev
)
1299 #ifdef CONFIG_IP_MULTICAST
1300 struct lcs_card
*card
;
1302 LCS_DBF_TEXT(4, trace
, "setmulti");
1303 card
= (struct lcs_card
*) dev
->ml_priv
;
1305 if (!lcs_set_thread_start_bit(card
, LCS_SET_MC_THREAD
))
1306 schedule_work(&card
->kernel_thread_starter
);
1307 #endif /* CONFIG_IP_MULTICAST */
1311 lcs_check_irb_error(struct ccw_device
*cdev
, struct irb
*irb
)
1316 switch (PTR_ERR(irb
)) {
1318 dev_warn(&cdev
->dev
,
1319 "An I/O-error occurred on the LCS device\n");
1320 LCS_DBF_TEXT(2, trace
, "ckirberr");
1321 LCS_DBF_TEXT_(2, trace
, " rc%d", -EIO
);
1324 dev_warn(&cdev
->dev
,
1325 "A command timed out on the LCS device\n");
1326 LCS_DBF_TEXT(2, trace
, "ckirberr");
1327 LCS_DBF_TEXT_(2, trace
, " rc%d", -ETIMEDOUT
);
1330 dev_warn(&cdev
->dev
,
1331 "An error occurred on the LCS device, rc=%ld\n",
1333 LCS_DBF_TEXT(2, trace
, "ckirberr");
1334 LCS_DBF_TEXT(2, trace
, " rc???");
1336 return PTR_ERR(irb
);
1340 lcs_get_problem(struct ccw_device
*cdev
, struct irb
*irb
)
1345 sense
= (char *) irb
->ecw
;
1346 cstat
= irb
->scsw
.cmd
.cstat
;
1347 dstat
= irb
->scsw
.cmd
.dstat
;
1349 if (cstat
& (SCHN_STAT_CHN_CTRL_CHK
| SCHN_STAT_INTF_CTRL_CHK
|
1350 SCHN_STAT_CHN_DATA_CHK
| SCHN_STAT_CHAIN_CHECK
|
1351 SCHN_STAT_PROT_CHECK
| SCHN_STAT_PROG_CHECK
)) {
1352 LCS_DBF_TEXT(2, trace
, "CGENCHK");
1355 if (dstat
& DEV_STAT_UNIT_CHECK
) {
1356 if (sense
[LCS_SENSE_BYTE_1
] &
1357 LCS_SENSE_RESETTING_EVENT
) {
1358 LCS_DBF_TEXT(2, trace
, "REVIND");
1361 if (sense
[LCS_SENSE_BYTE_0
] &
1362 LCS_SENSE_CMD_REJECT
) {
1363 LCS_DBF_TEXT(2, trace
, "CMDREJ");
1366 if ((!sense
[LCS_SENSE_BYTE_0
]) &&
1367 (!sense
[LCS_SENSE_BYTE_1
]) &&
1368 (!sense
[LCS_SENSE_BYTE_2
]) &&
1369 (!sense
[LCS_SENSE_BYTE_3
])) {
1370 LCS_DBF_TEXT(2, trace
, "ZEROSEN");
1373 LCS_DBF_TEXT(2, trace
, "DGENCHK");
1380 lcs_schedule_recovery(struct lcs_card
*card
)
1382 LCS_DBF_TEXT(2, trace
, "startrec");
1383 if (!lcs_set_thread_start_bit(card
, LCS_RECOVERY_THREAD
))
1384 schedule_work(&card
->kernel_thread_starter
);
1388 * IRQ Handler for LCS channels
1391 lcs_irq(struct ccw_device
*cdev
, unsigned long intparm
, struct irb
*irb
)
1393 struct lcs_card
*card
;
1394 struct lcs_channel
*channel
;
1398 if (lcs_check_irb_error(cdev
, irb
))
1401 card
= CARD_FROM_DEV(cdev
);
1402 if (card
->read
.ccwdev
== cdev
)
1403 channel
= &card
->read
;
1405 channel
= &card
->write
;
1407 cstat
= irb
->scsw
.cmd
.cstat
;
1408 dstat
= irb
->scsw
.cmd
.dstat
;
1409 LCS_DBF_TEXT_(5, trace
, "Rint%s", dev_name(&cdev
->dev
));
1410 LCS_DBF_TEXT_(5, trace
, "%4x%4x", irb
->scsw
.cmd
.cstat
,
1411 irb
->scsw
.cmd
.dstat
);
1412 LCS_DBF_TEXT_(5, trace
, "%4x%4x", irb
->scsw
.cmd
.fctl
,
1413 irb
->scsw
.cmd
.actl
);
1415 /* Check for channel and device errors presented */
1416 rc
= lcs_get_problem(cdev
, irb
);
1417 if (rc
|| (dstat
& DEV_STAT_UNIT_EXCEP
)) {
1418 dev_warn(&cdev
->dev
,
1419 "The LCS device stopped because of an error,"
1420 " dstat=0x%X, cstat=0x%X \n",
1423 channel
->state
= LCS_CH_STATE_ERROR
;
1426 if (channel
->state
== LCS_CH_STATE_ERROR
) {
1427 lcs_schedule_recovery(card
);
1428 wake_up(&card
->wait_q
);
1431 /* How far in the ccw chain have we processed? */
1432 if ((channel
->state
!= LCS_CH_STATE_INIT
) &&
1433 (irb
->scsw
.cmd
.fctl
& SCSW_FCTL_START_FUNC
) &&
1434 (irb
->scsw
.cmd
.cpa
!= 0)) {
1435 index
= (struct ccw1
*) __va((addr_t
) irb
->scsw
.cmd
.cpa
)
1437 if ((irb
->scsw
.cmd
.actl
& SCSW_ACTL_SUSPENDED
) ||
1438 (irb
->scsw
.cmd
.cstat
& SCHN_STAT_PCI
))
1439 /* Bloody io subsystem tells us lies about cpa... */
1440 index
= (index
- 1) & (LCS_NUM_BUFFS
- 1);
1441 while (channel
->io_idx
!= index
) {
1442 __lcs_processed_buffer(channel
,
1443 channel
->iob
+ channel
->io_idx
);
1445 (channel
->io_idx
+ 1) & (LCS_NUM_BUFFS
- 1);
1449 if ((irb
->scsw
.cmd
.dstat
& DEV_STAT_DEV_END
) ||
1450 (irb
->scsw
.cmd
.dstat
& DEV_STAT_CHN_END
) ||
1451 (irb
->scsw
.cmd
.dstat
& DEV_STAT_UNIT_CHECK
))
1452 /* Mark channel as stopped. */
1453 channel
->state
= LCS_CH_STATE_STOPPED
;
1454 else if (irb
->scsw
.cmd
.actl
& SCSW_ACTL_SUSPENDED
)
1455 /* CCW execution stopped on a suspend bit. */
1456 channel
->state
= LCS_CH_STATE_SUSPENDED
;
1457 if (irb
->scsw
.cmd
.fctl
& SCSW_FCTL_HALT_FUNC
) {
1458 if (irb
->scsw
.cmd
.cc
!= 0) {
1459 ccw_device_halt(channel
->ccwdev
, (addr_t
) channel
);
1462 /* The channel has been stopped by halt_IO. */
1463 channel
->state
= LCS_CH_STATE_HALTED
;
1465 if (irb
->scsw
.cmd
.fctl
& SCSW_FCTL_CLEAR_FUNC
)
1466 channel
->state
= LCS_CH_STATE_CLEARED
;
1467 /* Do the rest in the tasklet. */
1468 tasklet_schedule(&channel
->irq_tasklet
);
1472 * Tasklet for IRQ handler
1475 lcs_tasklet(unsigned long data
)
1477 unsigned long flags
;
1478 struct lcs_channel
*channel
;
1479 struct lcs_buffer
*iob
;
1483 channel
= (struct lcs_channel
*) data
;
1484 LCS_DBF_TEXT_(5, trace
, "tlet%s", dev_name(&channel
->ccwdev
->dev
));
1486 /* Check for processed buffers. */
1488 buf_idx
= channel
->buf_idx
;
1489 while (iob
[buf_idx
].state
== LCS_BUF_STATE_PROCESSED
) {
1490 /* Do the callback thing. */
1491 if (iob
[buf_idx
].callback
!= NULL
)
1492 iob
[buf_idx
].callback(channel
, iob
+ buf_idx
);
1493 buf_idx
= (buf_idx
+ 1) & (LCS_NUM_BUFFS
- 1);
1495 channel
->buf_idx
= buf_idx
;
1497 if (channel
->state
== LCS_CH_STATE_STOPPED
)
1498 rc
= lcs_start_channel(channel
);
1499 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
1500 if (channel
->state
== LCS_CH_STATE_SUSPENDED
&&
1501 channel
->iob
[channel
->io_idx
].state
== LCS_BUF_STATE_READY
) {
1502 rc
= __lcs_resume_channel(channel
);
1504 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
1506 /* Something happened on the channel. Wake up waiters. */
1507 wake_up(&channel
->wait_q
);
1511 * Finish current tx buffer and make it ready for transmit.
1514 __lcs_emit_txbuffer(struct lcs_card
*card
)
1516 LCS_DBF_TEXT(5, trace
, "emittx");
1517 *(__u16
*)(card
->tx_buffer
->data
+ card
->tx_buffer
->count
) = 0;
1518 card
->tx_buffer
->count
+= 2;
1519 lcs_ready_buffer(&card
->write
, card
->tx_buffer
);
1520 card
->tx_buffer
= NULL
;
1525 * Callback for finished tx buffers.
1528 lcs_txbuffer_cb(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
1530 struct lcs_card
*card
;
1532 LCS_DBF_TEXT(5, trace
, "txbuffcb");
1533 /* Put buffer back to pool. */
1534 lcs_release_buffer(channel
, buffer
);
1535 card
= container_of(channel
, struct lcs_card
, write
);
1536 if (netif_queue_stopped(card
->dev
) && netif_carrier_ok(card
->dev
))
1537 netif_wake_queue(card
->dev
);
1538 spin_lock(&card
->lock
);
1540 if (card
->tx_emitted
<= 0 && card
->tx_buffer
!= NULL
)
1542 * Last running tx buffer has finished. Submit partially
1543 * filled current buffer.
1545 __lcs_emit_txbuffer(card
);
1546 spin_unlock(&card
->lock
);
1550 * Packet transmit function called by network stack
1553 __lcs_start_xmit(struct lcs_card
*card
, struct sk_buff
*skb
,
1554 struct net_device
*dev
)
1556 struct lcs_header
*header
;
1557 int rc
= NETDEV_TX_OK
;
1559 LCS_DBF_TEXT(5, trace
, "hardxmit");
1561 card
->stats
.tx_dropped
++;
1562 card
->stats
.tx_errors
++;
1563 return NETDEV_TX_OK
;
1565 if (card
->state
!= DEV_STATE_UP
) {
1567 card
->stats
.tx_dropped
++;
1568 card
->stats
.tx_errors
++;
1569 card
->stats
.tx_carrier_errors
++;
1570 return NETDEV_TX_OK
;
1572 if (skb
->protocol
== htons(ETH_P_IPV6
)) {
1574 return NETDEV_TX_OK
;
1576 netif_stop_queue(card
->dev
);
1577 spin_lock(&card
->lock
);
1578 if (card
->tx_buffer
!= NULL
&&
1579 card
->tx_buffer
->count
+ sizeof(struct lcs_header
) +
1580 skb
->len
+ sizeof(u16
) > LCS_IOBUFFERSIZE
)
1581 /* skb too big for current tx buffer. */
1582 __lcs_emit_txbuffer(card
);
1583 if (card
->tx_buffer
== NULL
) {
1584 /* Get new tx buffer */
1585 card
->tx_buffer
= lcs_get_buffer(&card
->write
);
1586 if (card
->tx_buffer
== NULL
) {
1587 card
->stats
.tx_dropped
++;
1588 rc
= NETDEV_TX_BUSY
;
1591 card
->tx_buffer
->callback
= lcs_txbuffer_cb
;
1592 card
->tx_buffer
->count
= 0;
1594 header
= (struct lcs_header
*)
1595 (card
->tx_buffer
->data
+ card
->tx_buffer
->count
);
1596 card
->tx_buffer
->count
+= skb
->len
+ sizeof(struct lcs_header
);
1597 header
->offset
= card
->tx_buffer
->count
;
1598 header
->type
= card
->lan_type
;
1599 header
->slot
= card
->portno
;
1600 skb_copy_from_linear_data(skb
, header
+ 1, skb
->len
);
1601 spin_unlock(&card
->lock
);
1602 card
->stats
.tx_bytes
+= skb
->len
;
1603 card
->stats
.tx_packets
++;
1605 netif_wake_queue(card
->dev
);
1606 spin_lock(&card
->lock
);
1607 if (card
->tx_emitted
<= 0 && card
->tx_buffer
!= NULL
)
1608 /* If this is the first tx buffer emit it immediately. */
1609 __lcs_emit_txbuffer(card
);
1611 spin_unlock(&card
->lock
);
1616 lcs_start_xmit(struct sk_buff
*skb
, struct net_device
*dev
)
1618 struct lcs_card
*card
;
1621 LCS_DBF_TEXT(5, trace
, "pktxmit");
1622 card
= (struct lcs_card
*) dev
->ml_priv
;
1623 rc
= __lcs_start_xmit(card
, skb
, dev
);
1628 * send startlan and lanstat command to make LCS device ready
1631 lcs_startlan_auto(struct lcs_card
*card
)
1635 LCS_DBF_TEXT(2, trace
, "strtauto");
1636 #ifdef CONFIG_NET_ETHERNET
1637 card
->lan_type
= LCS_FRAME_TYPE_ENET
;
1638 rc
= lcs_send_startlan(card
, LCS_INITIATOR_TCPIP
);
1644 card
->lan_type
= LCS_FRAME_TYPE_TR
;
1645 rc
= lcs_send_startlan(card
, LCS_INITIATOR_TCPIP
);
1650 card
->lan_type
= LCS_FRAME_TYPE_FDDI
;
1651 rc
= lcs_send_startlan(card
, LCS_INITIATOR_TCPIP
);
1659 lcs_startlan(struct lcs_card
*card
)
1663 LCS_DBF_TEXT(2, trace
, "startlan");
1665 if (card
->portno
!= LCS_INVALID_PORT_NO
) {
1666 if (card
->lan_type
== LCS_FRAME_TYPE_AUTO
)
1667 rc
= lcs_startlan_auto(card
);
1669 rc
= lcs_send_startlan(card
, LCS_INITIATOR_TCPIP
);
1671 for (i
= 0; i
<= 16; i
++) {
1673 if (card
->lan_type
!= LCS_FRAME_TYPE_AUTO
)
1674 rc
= lcs_send_startlan(card
,
1675 LCS_INITIATOR_TCPIP
);
1677 /* autodetecting lan type */
1678 rc
= lcs_startlan_auto(card
);
1684 return lcs_send_lanstat(card
);
1689 * LCS detect function
1690 * setup channels and make them I/O ready
1693 lcs_detect(struct lcs_card
*card
)
1697 LCS_DBF_TEXT(2, setup
, "lcsdetct");
1698 /* start/reset card */
1700 netif_stop_queue(card
->dev
);
1701 rc
= lcs_stop_channels(card
);
1703 rc
= lcs_start_channels(card
);
1705 rc
= lcs_send_startup(card
, LCS_INITIATOR_TCPIP
);
1707 rc
= lcs_startlan(card
);
1711 card
->state
= DEV_STATE_UP
;
1713 card
->state
= DEV_STATE_DOWN
;
1714 card
->write
.state
= LCS_CH_STATE_INIT
;
1715 card
->read
.state
= LCS_CH_STATE_INIT
;
1724 lcs_stopcard(struct lcs_card
*card
)
1728 LCS_DBF_TEXT(3, setup
, "stopcard");
1730 if (card
->read
.state
!= LCS_CH_STATE_STOPPED
&&
1731 card
->write
.state
!= LCS_CH_STATE_STOPPED
&&
1732 card
->read
.state
!= LCS_CH_STATE_ERROR
&&
1733 card
->write
.state
!= LCS_CH_STATE_ERROR
&&
1734 card
->state
== DEV_STATE_UP
) {
1735 lcs_clear_multicast_list(card
);
1736 rc
= lcs_send_stoplan(card
,LCS_INITIATOR_TCPIP
);
1737 rc
= lcs_send_shutdown(card
);
1739 rc
= lcs_stop_channels(card
);
1740 card
->state
= DEV_STATE_DOWN
;
1746 * Kernel Thread helper functions for LGW initiated commands
1749 lcs_start_kernel_thread(struct work_struct
*work
)
1751 struct lcs_card
*card
= container_of(work
, struct lcs_card
, kernel_thread_starter
);
1752 LCS_DBF_TEXT(5, trace
, "krnthrd");
1753 if (lcs_do_start_thread(card
, LCS_RECOVERY_THREAD
))
1754 kthread_run(lcs_recovery
, card
, "lcs_recover");
1755 #ifdef CONFIG_IP_MULTICAST
1756 if (lcs_do_start_thread(card
, LCS_SET_MC_THREAD
))
1757 kthread_run(lcs_register_mc_addresses
, card
, "regipm");
1762 * Process control frames.
1765 lcs_get_control(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
1767 LCS_DBF_TEXT(5, trace
, "getctrl");
1768 if (cmd
->initiator
== LCS_INITIATOR_LGW
) {
1769 switch(cmd
->cmd_code
) {
1770 case LCS_CMD_STARTUP
:
1771 case LCS_CMD_STARTLAN
:
1772 lcs_schedule_recovery(card
);
1774 case LCS_CMD_STOPLAN
:
1775 pr_warning("Stoplan for %s initiated by LGW.\n",
1778 netif_carrier_off(card
->dev
);
1781 LCS_DBF_TEXT(5, trace
, "noLGWcmd");
1785 lcs_notify_lancmd_waiters(card
, cmd
);
1789 * Unpack network packet.
1792 lcs_get_skb(struct lcs_card
*card
, char *skb_data
, unsigned int skb_len
)
1794 struct sk_buff
*skb
;
1796 LCS_DBF_TEXT(5, trace
, "getskb");
1797 if (card
->dev
== NULL
||
1798 card
->state
!= DEV_STATE_UP
)
1799 /* The card isn't up. Ignore the packet. */
1802 skb
= dev_alloc_skb(skb_len
);
1804 dev_err(&card
->dev
->dev
,
1805 " Allocating a socket buffer to interface %s failed\n",
1807 card
->stats
.rx_dropped
++;
1810 memcpy(skb_put(skb
, skb_len
), skb_data
, skb_len
);
1811 skb
->protocol
= card
->lan_type_trans(skb
, card
->dev
);
1812 card
->stats
.rx_bytes
+= skb_len
;
1813 card
->stats
.rx_packets
++;
1814 if (skb
->protocol
== htons(ETH_P_802_2
))
1815 *((__u32
*)skb
->cb
) = ++card
->pkt_seq
;
1820 * LCS main routine to get packets and lancmd replies from the buffers
1823 lcs_get_frames_cb(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
1825 struct lcs_card
*card
;
1826 struct lcs_header
*lcs_hdr
;
1829 LCS_DBF_TEXT(5, trace
, "lcsgtpkt");
1830 lcs_hdr
= (struct lcs_header
*) buffer
->data
;
1831 if (lcs_hdr
->offset
== LCS_ILLEGAL_OFFSET
) {
1832 LCS_DBF_TEXT(4, trace
, "-eiogpkt");
1835 card
= container_of(channel
, struct lcs_card
, read
);
1837 while (lcs_hdr
->offset
!= 0) {
1838 if (lcs_hdr
->offset
<= 0 ||
1839 lcs_hdr
->offset
> LCS_IOBUFFERSIZE
||
1840 lcs_hdr
->offset
< offset
) {
1841 /* Offset invalid. */
1842 card
->stats
.rx_length_errors
++;
1843 card
->stats
.rx_errors
++;
1846 /* What kind of frame is it? */
1847 if (lcs_hdr
->type
== LCS_FRAME_TYPE_CONTROL
)
1848 /* Control frame. */
1849 lcs_get_control(card
, (struct lcs_cmd
*) lcs_hdr
);
1850 else if (lcs_hdr
->type
== LCS_FRAME_TYPE_ENET
||
1851 lcs_hdr
->type
== LCS_FRAME_TYPE_TR
||
1852 lcs_hdr
->type
== LCS_FRAME_TYPE_FDDI
)
1853 /* Normal network packet. */
1854 lcs_get_skb(card
, (char *)(lcs_hdr
+ 1),
1855 lcs_hdr
->offset
- offset
-
1856 sizeof(struct lcs_header
));
1858 /* Unknown frame type. */
1860 /* Proceed to next frame. */
1861 offset
= lcs_hdr
->offset
;
1862 lcs_hdr
->offset
= LCS_ILLEGAL_OFFSET
;
1863 lcs_hdr
= (struct lcs_header
*) (buffer
->data
+ offset
);
1865 /* The buffer is now empty. Make it ready again. */
1866 lcs_ready_buffer(&card
->read
, buffer
);
1870 * get network statistics for ifconfig and other user programs
1872 static struct net_device_stats
*
1873 lcs_getstats(struct net_device
*dev
)
1875 struct lcs_card
*card
;
1877 LCS_DBF_TEXT(4, trace
, "netstats");
1878 card
= (struct lcs_card
*) dev
->ml_priv
;
1879 return &card
->stats
;
1883 lcs_stop_device(struct net_device
*dev
)
1885 struct lcs_card
*card
;
1888 LCS_DBF_TEXT(2, trace
, "stopdev");
1889 card
= (struct lcs_card
*) dev
->ml_priv
;
1890 netif_carrier_off(dev
);
1891 netif_tx_disable(dev
);
1892 dev
->flags
&= ~IFF_UP
;
1893 wait_event(card
->write
.wait_q
,
1894 (card
->write
.state
!= LCS_CH_STATE_RUNNING
));
1895 rc
= lcs_stopcard(card
);
1897 dev_err(&card
->dev
->dev
,
1898 " Shutting down the LCS device failed\n ");
1903 lcs_open_device(struct net_device
*dev
)
1905 struct lcs_card
*card
;
1908 LCS_DBF_TEXT(2, trace
, "opendev");
1909 card
= (struct lcs_card
*) dev
->ml_priv
;
1910 /* initialize statistics */
1911 rc
= lcs_detect(card
);
1913 pr_err("Error in opening device!\n");
1916 dev
->flags
|= IFF_UP
;
1917 netif_carrier_on(dev
);
1918 netif_wake_queue(dev
);
1919 card
->state
= DEV_STATE_UP
;
1925 * show function for portno called by cat or similar things
1928 lcs_portno_show (struct device
*dev
, struct device_attribute
*attr
, char *buf
)
1930 struct lcs_card
*card
;
1932 card
= dev_get_drvdata(dev
);
1937 return sprintf(buf
, "%d\n", card
->portno
);
1941 * store the value which is piped to file portno
1944 lcs_portno_store (struct device
*dev
, struct device_attribute
*attr
, const char *buf
, size_t count
)
1946 struct lcs_card
*card
;
1949 card
= dev_get_drvdata(dev
);
1954 sscanf(buf
, "%u", &value
);
1955 /* TODO: sanity checks */
1956 card
->portno
= value
;
1962 static DEVICE_ATTR(portno
, 0644, lcs_portno_show
, lcs_portno_store
);
1964 const char *lcs_type
[] = {
1969 "unknown channel type",
1970 "unsupported channel type",
1974 lcs_type_show(struct device
*dev
, struct device_attribute
*attr
, char *buf
)
1976 struct ccwgroup_device
*cgdev
;
1978 cgdev
= to_ccwgroupdev(dev
);
1982 return sprintf(buf
, "%s\n", lcs_type
[cgdev
->cdev
[0]->id
.driver_info
]);
1985 static DEVICE_ATTR(type
, 0444, lcs_type_show
, NULL
);
1988 lcs_timeout_show(struct device
*dev
, struct device_attribute
*attr
, char *buf
)
1990 struct lcs_card
*card
;
1992 card
= dev_get_drvdata(dev
);
1994 return card
? sprintf(buf
, "%u\n", card
->lancmd_timeout
) : 0;
1998 lcs_timeout_store (struct device
*dev
, struct device_attribute
*attr
, const char *buf
, size_t count
)
2000 struct lcs_card
*card
;
2003 card
= dev_get_drvdata(dev
);
2008 sscanf(buf
, "%u", &value
);
2009 /* TODO: sanity checks */
2010 card
->lancmd_timeout
= value
;
2016 static DEVICE_ATTR(lancmd_timeout
, 0644, lcs_timeout_show
, lcs_timeout_store
);
2019 lcs_dev_recover_store(struct device
*dev
, struct device_attribute
*attr
,
2020 const char *buf
, size_t count
)
2022 struct lcs_card
*card
= dev_get_drvdata(dev
);
2028 if (card
->state
!= DEV_STATE_UP
)
2030 i
= simple_strtoul(buf
, &tmp
, 16);
2032 lcs_schedule_recovery(card
);
2036 static DEVICE_ATTR(recover
, 0200, NULL
, lcs_dev_recover_store
);
2038 static struct attribute
* lcs_attrs
[] = {
2039 &dev_attr_portno
.attr
,
2040 &dev_attr_type
.attr
,
2041 &dev_attr_lancmd_timeout
.attr
,
2042 &dev_attr_recover
.attr
,
2046 static struct attribute_group lcs_attr_group
= {
2051 * lcs_probe_device is called on establishing a new ccwgroup_device.
2054 lcs_probe_device(struct ccwgroup_device
*ccwgdev
)
2056 struct lcs_card
*card
;
2059 if (!get_device(&ccwgdev
->dev
))
2062 LCS_DBF_TEXT(2, setup
, "add_dev");
2063 card
= lcs_alloc_card();
2065 LCS_DBF_TEXT_(2, setup
, " rc%d", -ENOMEM
);
2066 put_device(&ccwgdev
->dev
);
2069 ret
= sysfs_create_group(&ccwgdev
->dev
.kobj
, &lcs_attr_group
);
2071 lcs_free_card(card
);
2072 put_device(&ccwgdev
->dev
);
2075 dev_set_drvdata(&ccwgdev
->dev
, card
);
2076 ccwgdev
->cdev
[0]->handler
= lcs_irq
;
2077 ccwgdev
->cdev
[1]->handler
= lcs_irq
;
2078 card
->gdev
= ccwgdev
;
2079 INIT_WORK(&card
->kernel_thread_starter
, lcs_start_kernel_thread
);
2080 card
->thread_start_mask
= 0;
2081 card
->thread_allowed_mask
= 0;
2082 card
->thread_running_mask
= 0;
2087 lcs_register_netdev(struct ccwgroup_device
*ccwgdev
)
2089 struct lcs_card
*card
;
2091 LCS_DBF_TEXT(2, setup
, "regnetdv");
2092 card
= dev_get_drvdata(&ccwgdev
->dev
);
2093 if (card
->dev
->reg_state
!= NETREG_UNINITIALIZED
)
2095 SET_NETDEV_DEV(card
->dev
, &ccwgdev
->dev
);
2096 return register_netdev(card
->dev
);
2100 * lcs_new_device will be called by setting the group device online.
2102 static const struct net_device_ops lcs_netdev_ops
= {
2103 .ndo_open
= lcs_open_device
,
2104 .ndo_stop
= lcs_stop_device
,
2105 .ndo_get_stats
= lcs_getstats
,
2106 .ndo_start_xmit
= lcs_start_xmit
,
2109 static const struct net_device_ops lcs_mc_netdev_ops
= {
2110 .ndo_open
= lcs_open_device
,
2111 .ndo_stop
= lcs_stop_device
,
2112 .ndo_get_stats
= lcs_getstats
,
2113 .ndo_start_xmit
= lcs_start_xmit
,
2114 .ndo_set_multicast_list
= lcs_set_multicast_list
,
2118 lcs_new_device(struct ccwgroup_device
*ccwgdev
)
2120 struct lcs_card
*card
;
2121 struct net_device
*dev
=NULL
;
2122 enum lcs_dev_states recover_state
;
2125 card
= dev_get_drvdata(&ccwgdev
->dev
);
2129 LCS_DBF_TEXT(2, setup
, "newdev");
2130 LCS_DBF_HEX(3, setup
, &card
, sizeof(void*));
2131 card
->read
.ccwdev
= ccwgdev
->cdev
[0];
2132 card
->write
.ccwdev
= ccwgdev
->cdev
[1];
2134 recover_state
= card
->state
;
2135 rc
= ccw_device_set_online(card
->read
.ccwdev
);
2138 rc
= ccw_device_set_online(card
->write
.ccwdev
);
2142 LCS_DBF_TEXT(3, setup
, "lcsnewdv");
2144 lcs_setup_card(card
);
2145 rc
= lcs_detect(card
);
2147 LCS_DBF_TEXT(2, setup
, "dtctfail");
2148 dev_err(&card
->dev
->dev
,
2149 "Detecting a network adapter for LCS devices"
2150 " failed with rc=%d (0x%x)\n", rc
, rc
);
2155 LCS_DBF_TEXT(2, setup
, "samedev");
2156 LCS_DBF_HEX(3, setup
, &card
, sizeof(void*));
2159 switch (card
->lan_type
) {
2160 #ifdef CONFIG_NET_ETHERNET
2161 case LCS_FRAME_TYPE_ENET
:
2162 card
->lan_type_trans
= eth_type_trans
;
2163 dev
= alloc_etherdev(0);
2167 case LCS_FRAME_TYPE_TR
:
2168 card
->lan_type_trans
= tr_type_trans
;
2169 dev
= alloc_trdev(0);
2173 case LCS_FRAME_TYPE_FDDI
:
2174 card
->lan_type_trans
= fddi_type_trans
;
2175 dev
= alloc_fddidev(0);
2179 LCS_DBF_TEXT(3, setup
, "errinit");
2180 pr_err(" Initialization failed\n");
2186 card
->dev
->ml_priv
= card
;
2187 card
->dev
->netdev_ops
= &lcs_netdev_ops
;
2188 memcpy(card
->dev
->dev_addr
, card
->mac
, LCS_MAC_LENGTH
);
2189 #ifdef CONFIG_IP_MULTICAST
2190 if (!lcs_check_multicast_support(card
))
2191 card
->dev
->netdev_ops
= &lcs_mc_netdev_ops
;
2194 lcs_set_allowed_threads(card
,0xffffffff);
2195 if (recover_state
== DEV_STATE_RECOVER
) {
2196 lcs_set_multicast_list(card
->dev
);
2197 card
->dev
->flags
|= IFF_UP
;
2198 netif_carrier_on(card
->dev
);
2199 netif_wake_queue(card
->dev
);
2200 card
->state
= DEV_STATE_UP
;
2205 if (lcs_register_netdev(ccwgdev
) != 0)
2208 /* Print out supported assists: IPv6 */
2209 pr_info("LCS device %s %s IPv6 support\n", card
->dev
->name
,
2210 (card
->ip_assists_supported
& LCS_IPASS_IPV6_SUPPORT
) ?
2211 "with" : "without");
2212 /* Print out supported assist: Multicast */
2213 pr_info("LCS device %s %s Multicast support\n", card
->dev
->name
,
2214 (card
->ip_assists_supported
& LCS_IPASS_MULTICAST_SUPPORT
) ?
2215 "with" : "without");
2219 ccw_device_set_offline(card
->write
.ccwdev
);
2221 ccw_device_set_offline(card
->read
.ccwdev
);
2227 * lcs_shutdown_device, called when setting the group device offline.
2230 __lcs_shutdown_device(struct ccwgroup_device
*ccwgdev
, int recovery_mode
)
2232 struct lcs_card
*card
;
2233 enum lcs_dev_states recover_state
;
2236 LCS_DBF_TEXT(3, setup
, "shtdndev");
2237 card
= dev_get_drvdata(&ccwgdev
->dev
);
2240 if (recovery_mode
== 0) {
2241 lcs_set_allowed_threads(card
, 0);
2242 if (lcs_wait_for_threads(card
, LCS_SET_MC_THREAD
))
2243 return -ERESTARTSYS
;
2245 LCS_DBF_HEX(3, setup
, &card
, sizeof(void*));
2246 recover_state
= card
->state
;
2248 ret
= lcs_stop_device(card
->dev
);
2249 ret
= ccw_device_set_offline(card
->read
.ccwdev
);
2250 ret
= ccw_device_set_offline(card
->write
.ccwdev
);
2251 if (recover_state
== DEV_STATE_UP
) {
2252 card
->state
= DEV_STATE_RECOVER
;
2260 lcs_shutdown_device(struct ccwgroup_device
*ccwgdev
)
2262 return __lcs_shutdown_device(ccwgdev
, 0);
2266 * drive lcs recovery after startup and startlan initiated by Lan Gateway
2269 lcs_recovery(void *ptr
)
2271 struct lcs_card
*card
;
2272 struct ccwgroup_device
*gdev
;
2275 card
= (struct lcs_card
*) ptr
;
2277 LCS_DBF_TEXT(4, trace
, "recover1");
2278 if (!lcs_do_run_thread(card
, LCS_RECOVERY_THREAD
))
2280 LCS_DBF_TEXT(4, trace
, "recover2");
2282 dev_warn(&gdev
->dev
,
2283 "A recovery process has been started for the LCS device\n");
2284 rc
= __lcs_shutdown_device(gdev
, 1);
2285 rc
= lcs_new_device(gdev
);
2287 pr_info("Device %s successfully recovered!\n",
2290 pr_info("Device %s could not be recovered!\n",
2292 lcs_clear_thread_running_bit(card
, LCS_RECOVERY_THREAD
);
2297 * lcs_remove_device, free buffers and card
2300 lcs_remove_device(struct ccwgroup_device
*ccwgdev
)
2302 struct lcs_card
*card
;
2304 card
= dev_get_drvdata(&ccwgdev
->dev
);
2308 LCS_DBF_TEXT(3, setup
, "remdev");
2309 LCS_DBF_HEX(3, setup
, &card
, sizeof(void*));
2310 if (ccwgdev
->state
== CCWGROUP_ONLINE
) {
2311 lcs_shutdown_device(ccwgdev
);
2314 unregister_netdev(card
->dev
);
2315 sysfs_remove_group(&ccwgdev
->dev
.kobj
, &lcs_attr_group
);
2316 lcs_cleanup_card(card
);
2317 lcs_free_card(card
);
2318 put_device(&ccwgdev
->dev
);
2321 static int lcs_pm_suspend(struct lcs_card
*card
)
2324 netif_device_detach(card
->dev
);
2325 lcs_set_allowed_threads(card
, 0);
2326 lcs_wait_for_threads(card
, 0xffffffff);
2327 if (card
->state
!= DEV_STATE_DOWN
)
2328 __lcs_shutdown_device(card
->gdev
, 1);
2332 static int lcs_pm_resume(struct lcs_card
*card
)
2336 if (card
->state
== DEV_STATE_RECOVER
)
2337 rc
= lcs_new_device(card
->gdev
);
2339 netif_device_attach(card
->dev
);
2341 dev_warn(&card
->gdev
->dev
, "The lcs device driver "
2342 "failed to recover the device\n");
2347 static int lcs_prepare(struct ccwgroup_device
*gdev
)
2352 static void lcs_complete(struct ccwgroup_device
*gdev
)
2357 static int lcs_freeze(struct ccwgroup_device
*gdev
)
2359 struct lcs_card
*card
= dev_get_drvdata(&gdev
->dev
);
2360 return lcs_pm_suspend(card
);
2363 static int lcs_thaw(struct ccwgroup_device
*gdev
)
2365 struct lcs_card
*card
= dev_get_drvdata(&gdev
->dev
);
2366 return lcs_pm_resume(card
);
2369 static int lcs_restore(struct ccwgroup_device
*gdev
)
2371 struct lcs_card
*card
= dev_get_drvdata(&gdev
->dev
);
2372 return lcs_pm_resume(card
);
2375 static struct ccw_device_id lcs_ids
[] = {
2376 {CCW_DEVICE(0x3088, 0x08), .driver_info
= lcs_channel_type_parallel
},
2377 {CCW_DEVICE(0x3088, 0x1f), .driver_info
= lcs_channel_type_2216
},
2378 {CCW_DEVICE(0x3088, 0x60), .driver_info
= lcs_channel_type_osa2
},
2381 MODULE_DEVICE_TABLE(ccw
, lcs_ids
);
2383 static struct ccw_driver lcs_ccw_driver
= {
2384 .owner
= THIS_MODULE
,
2387 .probe
= ccwgroup_probe_ccwdev
,
2388 .remove
= ccwgroup_remove_ccwdev
,
2392 * LCS ccwgroup driver registration
2394 static struct ccwgroup_driver lcs_group_driver
= {
2395 .owner
= THIS_MODULE
,
2398 .driver_id
= 0xD3C3E2,
2399 .probe
= lcs_probe_device
,
2400 .remove
= lcs_remove_device
,
2401 .set_online
= lcs_new_device
,
2402 .set_offline
= lcs_shutdown_device
,
2403 .prepare
= lcs_prepare
,
2404 .complete
= lcs_complete
,
2405 .freeze
= lcs_freeze
,
2407 .restore
= lcs_restore
,
2411 lcs_driver_group_store(struct device_driver
*ddrv
, const char *buf
,
2415 err
= ccwgroup_create_from_string(lcs_root_dev
,
2416 lcs_group_driver
.driver_id
,
2417 &lcs_ccw_driver
, 2, buf
);
2418 return err
? err
: count
;
2421 static DRIVER_ATTR(group
, 0200, NULL
, lcs_driver_group_store
);
2423 static struct attribute
*lcs_group_attrs
[] = {
2424 &driver_attr_group
.attr
,
2428 static struct attribute_group lcs_group_attr_group
= {
2429 .attrs
= lcs_group_attrs
,
2432 static const struct attribute_group
*lcs_group_attr_groups
[] = {
2433 &lcs_group_attr_group
,
2438 * LCS Module/Kernel initialization function
2441 __init
lcs_init_module(void)
2445 pr_info("Loading %s\n", version
);
2446 rc
= lcs_register_debug_facility();
2447 LCS_DBF_TEXT(0, setup
, "lcsinit");
2450 lcs_root_dev
= root_device_register("lcs");
2451 rc
= IS_ERR(lcs_root_dev
) ? PTR_ERR(lcs_root_dev
) : 0;
2454 rc
= ccw_driver_register(&lcs_ccw_driver
);
2457 lcs_group_driver
.driver
.groups
= lcs_group_attr_groups
;
2458 rc
= ccwgroup_driver_register(&lcs_group_driver
);
2464 ccw_driver_unregister(&lcs_ccw_driver
);
2466 root_device_unregister(lcs_root_dev
);
2468 lcs_unregister_debug_facility();
2470 pr_err("Initializing the lcs device driver failed\n");
2476 * LCS module cleanup function
2479 __exit
lcs_cleanup_module(void)
2481 pr_info("Terminating lcs module.\n");
2482 LCS_DBF_TEXT(0, trace
, "cleanup");
2483 driver_remove_file(&lcs_group_driver
.driver
,
2484 &driver_attr_group
);
2485 ccwgroup_driver_unregister(&lcs_group_driver
);
2486 ccw_driver_unregister(&lcs_ccw_driver
);
2487 root_device_unregister(lcs_root_dev
);
2488 lcs_unregister_debug_facility();
2491 module_init(lcs_init_module
);
2492 module_exit(lcs_cleanup_module
);
2494 MODULE_AUTHOR("Frank Pavlic <fpavlic@de.ibm.com>");
2495 MODULE_LICENSE("GPL");