1 // SPDX-License-Identifier: GPL-2.0+
3 * Linux for S/390 Lan Channel Station Network Driver
5 * Copyright IBM Corp. 1999, 2009
6 * Author(s): Original Code written by
7 * DJ Barrow <djbarrow@de.ibm.com,barrow_dj@yahoo.com>
9 * Frank Pavlic <fpavlic@de.ibm.com> and
10 * Martin Schwidefsky <schwidefsky@de.ibm.com>
13 #define KMSG_COMPONENT "lcs"
14 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
16 #include <linux/module.h>
18 #include <linux/netdevice.h>
19 #include <linux/etherdevice.h>
20 #include <linux/fddidevice.h>
21 #include <linux/inetdevice.h>
23 #include <linux/igmp.h>
24 #include <linux/delay.h>
25 #include <linux/kthread.h>
26 #include <linux/slab.h>
30 #include <asm/debug.h>
31 #include <asm/idals.h>
32 #include <asm/timex.h>
33 #include <linux/device.h>
34 #include <asm/ccwgroup.h>
39 #if !defined(CONFIG_ETHERNET) && !defined(CONFIG_FDDI)
40 #error Cannot compile lcs.c without some net devices switched on.
44 * initialization string for output
47 static char version
[] __initdata
= "LCS driver";
50 * the root device for lcs group devices
52 static struct device
*lcs_root_dev
;
57 static void lcs_tasklet(unsigned long);
58 static void lcs_start_kernel_thread(struct work_struct
*);
59 static void lcs_get_frames_cb(struct lcs_channel
*, struct lcs_buffer
*);
60 #ifdef CONFIG_IP_MULTICAST
61 static int lcs_send_delipm(struct lcs_card
*, struct lcs_ipm_list
*);
62 #endif /* CONFIG_IP_MULTICAST */
63 static int lcs_recovery(void *ptr
);
66 * Debug Facility Stuff
68 static char debug_buffer
[255];
69 static debug_info_t
*lcs_dbf_setup
;
70 static debug_info_t
*lcs_dbf_trace
;
73 * LCS Debug Facility functions
76 lcs_unregister_debug_facility(void)
78 debug_unregister(lcs_dbf_setup
);
79 debug_unregister(lcs_dbf_trace
);
83 lcs_register_debug_facility(void)
85 lcs_dbf_setup
= debug_register("lcs_setup", 2, 1, 8);
86 lcs_dbf_trace
= debug_register("lcs_trace", 4, 1, 8);
87 if (lcs_dbf_setup
== NULL
|| lcs_dbf_trace
== NULL
) {
88 pr_err("Not enough memory for debug facility.\n");
89 lcs_unregister_debug_facility();
92 debug_register_view(lcs_dbf_setup
, &debug_hex_ascii_view
);
93 debug_set_level(lcs_dbf_setup
, 2);
94 debug_register_view(lcs_dbf_trace
, &debug_hex_ascii_view
);
95 debug_set_level(lcs_dbf_trace
, 2);
100 * Allocate io buffers.
103 lcs_alloc_channel(struct lcs_channel
*channel
)
107 LCS_DBF_TEXT(2, setup
, "ichalloc");
108 for (cnt
= 0; cnt
< LCS_NUM_BUFFS
; cnt
++) {
109 /* alloc memory fo iobuffer */
110 channel
->iob
[cnt
].data
=
111 kzalloc(LCS_IOBUFFERSIZE
, GFP_DMA
| GFP_KERNEL
);
112 if (channel
->iob
[cnt
].data
== NULL
)
114 channel
->iob
[cnt
].state
= LCS_BUF_STATE_EMPTY
;
116 if (cnt
< LCS_NUM_BUFFS
) {
117 /* Not all io buffers could be allocated. */
118 LCS_DBF_TEXT(2, setup
, "echalloc");
120 kfree(channel
->iob
[cnt
].data
);
130 lcs_free_channel(struct lcs_channel
*channel
)
134 LCS_DBF_TEXT(2, setup
, "ichfree");
135 for (cnt
= 0; cnt
< LCS_NUM_BUFFS
; cnt
++) {
136 kfree(channel
->iob
[cnt
].data
);
137 channel
->iob
[cnt
].data
= NULL
;
145 lcs_cleanup_channel(struct lcs_channel
*channel
)
147 LCS_DBF_TEXT(3, setup
, "cleanch");
148 /* Kill write channel tasklets. */
149 tasklet_kill(&channel
->irq_tasklet
);
150 /* Free channel buffers. */
151 lcs_free_channel(channel
);
155 * LCS free memory for card and channels.
158 lcs_free_card(struct lcs_card
*card
)
160 LCS_DBF_TEXT(2, setup
, "remcard");
161 LCS_DBF_HEX(2, setup
, &card
, sizeof(void*));
166 * LCS alloc memory for card and channels
168 static struct lcs_card
*
171 struct lcs_card
*card
;
174 LCS_DBF_TEXT(2, setup
, "alloclcs");
176 card
= kzalloc(sizeof(struct lcs_card
), GFP_KERNEL
| GFP_DMA
);
179 card
->lan_type
= LCS_FRAME_TYPE_AUTO
;
181 card
->lancmd_timeout
= LCS_LANCMD_TIMEOUT_DEFAULT
;
182 /* Allocate io buffers for the read channel. */
183 rc
= lcs_alloc_channel(&card
->read
);
185 LCS_DBF_TEXT(2, setup
, "iccwerr");
189 /* Allocate io buffers for the write channel. */
190 rc
= lcs_alloc_channel(&card
->write
);
192 LCS_DBF_TEXT(2, setup
, "iccwerr");
193 lcs_cleanup_channel(&card
->read
);
198 #ifdef CONFIG_IP_MULTICAST
199 INIT_LIST_HEAD(&card
->ipm_list
);
201 LCS_DBF_HEX(2, setup
, &card
, sizeof(void*));
206 * Setup read channel.
209 lcs_setup_read_ccws(struct lcs_card
*card
)
213 LCS_DBF_TEXT(2, setup
, "ireadccw");
214 /* Setup read ccws. */
215 memset(card
->read
.ccws
, 0, sizeof (struct ccw1
) * (LCS_NUM_BUFFS
+ 1));
216 for (cnt
= 0; cnt
< LCS_NUM_BUFFS
; cnt
++) {
217 card
->read
.ccws
[cnt
].cmd_code
= LCS_CCW_READ
;
218 card
->read
.ccws
[cnt
].count
= LCS_IOBUFFERSIZE
;
219 card
->read
.ccws
[cnt
].flags
=
220 CCW_FLAG_CC
| CCW_FLAG_SLI
| CCW_FLAG_PCI
;
222 * Note: we have allocated the buffer with GFP_DMA, so
223 * we do not need to do set_normalized_cda.
225 card
->read
.ccws
[cnt
].cda
=
226 (__u32
) __pa(card
->read
.iob
[cnt
].data
);
227 ((struct lcs_header
*)
228 card
->read
.iob
[cnt
].data
)->offset
= LCS_ILLEGAL_OFFSET
;
229 card
->read
.iob
[cnt
].callback
= lcs_get_frames_cb
;
230 card
->read
.iob
[cnt
].state
= LCS_BUF_STATE_READY
;
231 card
->read
.iob
[cnt
].count
= LCS_IOBUFFERSIZE
;
233 card
->read
.ccws
[0].flags
&= ~CCW_FLAG_PCI
;
234 card
->read
.ccws
[LCS_NUM_BUFFS
- 1].flags
&= ~CCW_FLAG_PCI
;
235 card
->read
.ccws
[LCS_NUM_BUFFS
- 1].flags
|= CCW_FLAG_SUSPEND
;
236 /* Last ccw is a tic (transfer in channel). */
237 card
->read
.ccws
[LCS_NUM_BUFFS
].cmd_code
= LCS_CCW_TRANSFER
;
238 card
->read
.ccws
[LCS_NUM_BUFFS
].cda
=
239 (__u32
) __pa(card
->read
.ccws
);
240 /* Setg initial state of the read channel. */
241 card
->read
.state
= LCS_CH_STATE_INIT
;
243 card
->read
.io_idx
= 0;
244 card
->read
.buf_idx
= 0;
248 lcs_setup_read(struct lcs_card
*card
)
250 LCS_DBF_TEXT(3, setup
, "initread");
252 lcs_setup_read_ccws(card
);
253 /* Initialize read channel tasklet. */
254 card
->read
.irq_tasklet
.data
= (unsigned long) &card
->read
;
255 card
->read
.irq_tasklet
.func
= lcs_tasklet
;
256 /* Initialize waitqueue. */
257 init_waitqueue_head(&card
->read
.wait_q
);
261 * Setup write channel.
264 lcs_setup_write_ccws(struct lcs_card
*card
)
268 LCS_DBF_TEXT(3, setup
, "iwritccw");
269 /* Setup write ccws. */
270 memset(card
->write
.ccws
, 0, sizeof(struct ccw1
) * (LCS_NUM_BUFFS
+ 1));
271 for (cnt
= 0; cnt
< LCS_NUM_BUFFS
; cnt
++) {
272 card
->write
.ccws
[cnt
].cmd_code
= LCS_CCW_WRITE
;
273 card
->write
.ccws
[cnt
].count
= 0;
274 card
->write
.ccws
[cnt
].flags
=
275 CCW_FLAG_SUSPEND
| CCW_FLAG_CC
| CCW_FLAG_SLI
;
277 * Note: we have allocated the buffer with GFP_DMA, so
278 * we do not need to do set_normalized_cda.
280 card
->write
.ccws
[cnt
].cda
=
281 (__u32
) __pa(card
->write
.iob
[cnt
].data
);
283 /* Last ccw is a tic (transfer in channel). */
284 card
->write
.ccws
[LCS_NUM_BUFFS
].cmd_code
= LCS_CCW_TRANSFER
;
285 card
->write
.ccws
[LCS_NUM_BUFFS
].cda
=
286 (__u32
) __pa(card
->write
.ccws
);
287 /* Set initial state of the write channel. */
288 card
->read
.state
= LCS_CH_STATE_INIT
;
290 card
->write
.io_idx
= 0;
291 card
->write
.buf_idx
= 0;
295 lcs_setup_write(struct lcs_card
*card
)
297 LCS_DBF_TEXT(3, setup
, "initwrit");
299 lcs_setup_write_ccws(card
);
300 /* Initialize write channel tasklet. */
301 card
->write
.irq_tasklet
.data
= (unsigned long) &card
->write
;
302 card
->write
.irq_tasklet
.func
= lcs_tasklet
;
303 /* Initialize waitqueue. */
304 init_waitqueue_head(&card
->write
.wait_q
);
308 lcs_set_allowed_threads(struct lcs_card
*card
, unsigned long threads
)
312 spin_lock_irqsave(&card
->mask_lock
, flags
);
313 card
->thread_allowed_mask
= threads
;
314 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
315 wake_up(&card
->wait_q
);
317 static int lcs_threads_running(struct lcs_card
*card
, unsigned long threads
)
322 spin_lock_irqsave(&card
->mask_lock
, flags
);
323 rc
= (card
->thread_running_mask
& threads
);
324 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
329 lcs_wait_for_threads(struct lcs_card
*card
, unsigned long threads
)
331 return wait_event_interruptible(card
->wait_q
,
332 lcs_threads_running(card
, threads
) == 0);
335 static int lcs_set_thread_start_bit(struct lcs_card
*card
, unsigned long thread
)
339 spin_lock_irqsave(&card
->mask_lock
, flags
);
340 if ( !(card
->thread_allowed_mask
& thread
) ||
341 (card
->thread_start_mask
& thread
) ) {
342 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
345 card
->thread_start_mask
|= thread
;
346 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
351 lcs_clear_thread_running_bit(struct lcs_card
*card
, unsigned long thread
)
355 spin_lock_irqsave(&card
->mask_lock
, flags
);
356 card
->thread_running_mask
&= ~thread
;
357 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
358 wake_up(&card
->wait_q
);
361 static int __lcs_do_run_thread(struct lcs_card
*card
, unsigned long thread
)
366 spin_lock_irqsave(&card
->mask_lock
, flags
);
367 if (card
->thread_start_mask
& thread
){
368 if ((card
->thread_allowed_mask
& thread
) &&
369 !(card
->thread_running_mask
& thread
)){
371 card
->thread_start_mask
&= ~thread
;
372 card
->thread_running_mask
|= thread
;
376 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
381 lcs_do_run_thread(struct lcs_card
*card
, unsigned long thread
)
384 wait_event(card
->wait_q
,
385 (rc
= __lcs_do_run_thread(card
, thread
)) >= 0);
390 lcs_do_start_thread(struct lcs_card
*card
, unsigned long thread
)
395 spin_lock_irqsave(&card
->mask_lock
, flags
);
396 LCS_DBF_TEXT_(4, trace
, " %02x%02x%02x",
397 (u8
) card
->thread_start_mask
,
398 (u8
) card
->thread_allowed_mask
,
399 (u8
) card
->thread_running_mask
);
400 rc
= (card
->thread_start_mask
& thread
);
401 spin_unlock_irqrestore(&card
->mask_lock
, flags
);
406 * Initialize channels,card and state machines.
409 lcs_setup_card(struct lcs_card
*card
)
411 LCS_DBF_TEXT(2, setup
, "initcard");
412 LCS_DBF_HEX(2, setup
, &card
, sizeof(void*));
414 lcs_setup_read(card
);
415 lcs_setup_write(card
);
416 /* Set cards initial state. */
417 card
->state
= DEV_STATE_DOWN
;
418 card
->tx_buffer
= NULL
;
419 card
->tx_emitted
= 0;
421 init_waitqueue_head(&card
->wait_q
);
422 spin_lock_init(&card
->lock
);
423 spin_lock_init(&card
->ipm_lock
);
424 spin_lock_init(&card
->mask_lock
);
425 #ifdef CONFIG_IP_MULTICAST
426 INIT_LIST_HEAD(&card
->ipm_list
);
428 INIT_LIST_HEAD(&card
->lancmd_waiters
);
431 static void lcs_clear_multicast_list(struct lcs_card
*card
)
433 #ifdef CONFIG_IP_MULTICAST
434 struct lcs_ipm_list
*ipm
;
437 /* Free multicast list. */
438 LCS_DBF_TEXT(3, setup
, "clmclist");
439 spin_lock_irqsave(&card
->ipm_lock
, flags
);
440 while (!list_empty(&card
->ipm_list
)){
441 ipm
= list_entry(card
->ipm_list
.next
,
442 struct lcs_ipm_list
, list
);
443 list_del(&ipm
->list
);
444 if (ipm
->ipm_state
!= LCS_IPM_STATE_SET_REQUIRED
){
445 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
446 lcs_send_delipm(card
, ipm
);
447 spin_lock_irqsave(&card
->ipm_lock
, flags
);
451 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
455 * Cleanup channels,card and state machines.
458 lcs_cleanup_card(struct lcs_card
*card
)
461 LCS_DBF_TEXT(3, setup
, "cleancrd");
462 LCS_DBF_HEX(2,setup
,&card
,sizeof(void*));
464 if (card
->dev
!= NULL
)
465 free_netdev(card
->dev
);
466 /* Cleanup channels. */
467 lcs_cleanup_channel(&card
->write
);
468 lcs_cleanup_channel(&card
->read
);
475 lcs_start_channel(struct lcs_channel
*channel
)
480 LCS_DBF_TEXT_(4, trace
,"ssch%s", dev_name(&channel
->ccwdev
->dev
));
481 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
482 rc
= ccw_device_start(channel
->ccwdev
,
483 channel
->ccws
+ channel
->io_idx
, 0, 0,
484 DOIO_DENY_PREFETCH
| DOIO_ALLOW_SUSPEND
);
486 channel
->state
= LCS_CH_STATE_RUNNING
;
487 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
489 LCS_DBF_TEXT_(4,trace
,"essh%s",
490 dev_name(&channel
->ccwdev
->dev
));
491 dev_err(&channel
->ccwdev
->dev
,
492 "Starting an LCS device resulted in an error,"
499 lcs_clear_channel(struct lcs_channel
*channel
)
504 LCS_DBF_TEXT(4,trace
,"clearch");
505 LCS_DBF_TEXT_(4, trace
, "%s", dev_name(&channel
->ccwdev
->dev
));
506 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
507 rc
= ccw_device_clear(channel
->ccwdev
, (addr_t
) channel
);
508 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
510 LCS_DBF_TEXT_(4, trace
, "ecsc%s",
511 dev_name(&channel
->ccwdev
->dev
));
514 wait_event(channel
->wait_q
, (channel
->state
== LCS_CH_STATE_CLEARED
));
515 channel
->state
= LCS_CH_STATE_STOPPED
;
524 lcs_stop_channel(struct lcs_channel
*channel
)
529 if (channel
->state
== LCS_CH_STATE_STOPPED
)
531 LCS_DBF_TEXT(4,trace
,"haltsch");
532 LCS_DBF_TEXT_(4, trace
, "%s", dev_name(&channel
->ccwdev
->dev
));
533 channel
->state
= LCS_CH_STATE_INIT
;
534 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
535 rc
= ccw_device_halt(channel
->ccwdev
, (addr_t
) channel
);
536 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
538 LCS_DBF_TEXT_(4, trace
, "ehsc%s",
539 dev_name(&channel
->ccwdev
->dev
));
542 /* Asynchronous halt initialted. Wait for its completion. */
543 wait_event(channel
->wait_q
, (channel
->state
== LCS_CH_STATE_HALTED
));
544 lcs_clear_channel(channel
);
549 * start read and write channel
552 lcs_start_channels(struct lcs_card
*card
)
556 LCS_DBF_TEXT(2, trace
, "chstart");
557 /* start read channel */
558 rc
= lcs_start_channel(&card
->read
);
561 /* start write channel */
562 rc
= lcs_start_channel(&card
->write
);
564 lcs_stop_channel(&card
->read
);
569 * stop read and write channel
572 lcs_stop_channels(struct lcs_card
*card
)
574 LCS_DBF_TEXT(2, trace
, "chhalt");
575 lcs_stop_channel(&card
->read
);
576 lcs_stop_channel(&card
->write
);
583 static struct lcs_buffer
*
584 __lcs_get_buffer(struct lcs_channel
*channel
)
588 LCS_DBF_TEXT(5, trace
, "_getbuff");
589 index
= channel
->io_idx
;
591 if (channel
->iob
[index
].state
== LCS_BUF_STATE_EMPTY
) {
592 channel
->iob
[index
].state
= LCS_BUF_STATE_LOCKED
;
593 return channel
->iob
+ index
;
595 index
= (index
+ 1) & (LCS_NUM_BUFFS
- 1);
596 } while (index
!= channel
->io_idx
);
600 static struct lcs_buffer
*
601 lcs_get_buffer(struct lcs_channel
*channel
)
603 struct lcs_buffer
*buffer
;
606 LCS_DBF_TEXT(5, trace
, "getbuff");
607 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
608 buffer
= __lcs_get_buffer(channel
);
609 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
614 * Resume channel program if the channel is suspended.
617 __lcs_resume_channel(struct lcs_channel
*channel
)
621 if (channel
->state
!= LCS_CH_STATE_SUSPENDED
)
623 if (channel
->ccws
[channel
->io_idx
].flags
& CCW_FLAG_SUSPEND
)
625 LCS_DBF_TEXT_(5, trace
, "rsch%s", dev_name(&channel
->ccwdev
->dev
));
626 rc
= ccw_device_resume(channel
->ccwdev
);
628 LCS_DBF_TEXT_(4, trace
, "ersc%s",
629 dev_name(&channel
->ccwdev
->dev
));
630 dev_err(&channel
->ccwdev
->dev
,
631 "Sending data from the LCS device to the LAN failed"
634 channel
->state
= LCS_CH_STATE_RUNNING
;
640 * Make a buffer ready for processing.
642 static void __lcs_ready_buffer_bits(struct lcs_channel
*channel
, int index
)
646 LCS_DBF_TEXT(5, trace
, "rdybits");
647 prev
= (index
- 1) & (LCS_NUM_BUFFS
- 1);
648 next
= (index
+ 1) & (LCS_NUM_BUFFS
- 1);
649 /* Check if we may clear the suspend bit of this buffer. */
650 if (channel
->ccws
[next
].flags
& CCW_FLAG_SUSPEND
) {
651 /* Check if we have to set the PCI bit. */
652 if (!(channel
->ccws
[prev
].flags
& CCW_FLAG_SUSPEND
))
653 /* Suspend bit of the previous buffer is not set. */
654 channel
->ccws
[index
].flags
|= CCW_FLAG_PCI
;
655 /* Suspend bit of the next buffer is set. */
656 channel
->ccws
[index
].flags
&= ~CCW_FLAG_SUSPEND
;
661 lcs_ready_buffer(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
666 LCS_DBF_TEXT(5, trace
, "rdybuff");
667 BUG_ON(buffer
->state
!= LCS_BUF_STATE_LOCKED
&&
668 buffer
->state
!= LCS_BUF_STATE_PROCESSED
);
669 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
670 buffer
->state
= LCS_BUF_STATE_READY
;
671 index
= buffer
- channel
->iob
;
673 channel
->ccws
[index
].count
= buffer
->count
;
674 /* Check relevant PCI/suspend bits. */
675 __lcs_ready_buffer_bits(channel
, index
);
676 rc
= __lcs_resume_channel(channel
);
677 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
682 * Mark the buffer as processed. Take care of the suspend bit
683 * of the previous buffer. This function is called from
684 * interrupt context, so the lock must not be taken.
687 __lcs_processed_buffer(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
689 int index
, prev
, next
;
691 LCS_DBF_TEXT(5, trace
, "prcsbuff");
692 BUG_ON(buffer
->state
!= LCS_BUF_STATE_READY
);
693 buffer
->state
= LCS_BUF_STATE_PROCESSED
;
694 index
= buffer
- channel
->iob
;
695 prev
= (index
- 1) & (LCS_NUM_BUFFS
- 1);
696 next
= (index
+ 1) & (LCS_NUM_BUFFS
- 1);
697 /* Set the suspend bit and clear the PCI bit of this buffer. */
698 channel
->ccws
[index
].flags
|= CCW_FLAG_SUSPEND
;
699 channel
->ccws
[index
].flags
&= ~CCW_FLAG_PCI
;
700 /* Check the suspend bit of the previous buffer. */
701 if (channel
->iob
[prev
].state
== LCS_BUF_STATE_READY
) {
703 * Previous buffer is in state ready. It might have
704 * happened in lcs_ready_buffer that the suspend bit
705 * has not been cleared to avoid an endless loop.
708 __lcs_ready_buffer_bits(channel
, prev
);
710 /* Clear PCI bit of next buffer. */
711 channel
->ccws
[next
].flags
&= ~CCW_FLAG_PCI
;
712 return __lcs_resume_channel(channel
);
716 * Put a processed buffer back to state empty.
719 lcs_release_buffer(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
723 LCS_DBF_TEXT(5, trace
, "relbuff");
724 BUG_ON(buffer
->state
!= LCS_BUF_STATE_LOCKED
&&
725 buffer
->state
!= LCS_BUF_STATE_PROCESSED
);
726 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
727 buffer
->state
= LCS_BUF_STATE_EMPTY
;
728 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
732 * Get buffer for a lan command.
734 static struct lcs_buffer
*
735 lcs_get_lancmd(struct lcs_card
*card
, int count
)
737 struct lcs_buffer
*buffer
;
740 LCS_DBF_TEXT(4, trace
, "getlncmd");
741 /* Get buffer and wait if none is available. */
742 wait_event(card
->write
.wait_q
,
743 ((buffer
= lcs_get_buffer(&card
->write
)) != NULL
));
744 count
+= sizeof(struct lcs_header
);
745 *(__u16
*)(buffer
->data
+ count
) = 0;
746 buffer
->count
= count
+ sizeof(__u16
);
747 buffer
->callback
= lcs_release_buffer
;
748 cmd
= (struct lcs_cmd
*) buffer
->data
;
750 cmd
->type
= LCS_FRAME_TYPE_CONTROL
;
757 lcs_get_reply(struct lcs_reply
*reply
)
759 WARN_ON(atomic_read(&reply
->refcnt
) <= 0);
760 atomic_inc(&reply
->refcnt
);
764 lcs_put_reply(struct lcs_reply
*reply
)
766 WARN_ON(atomic_read(&reply
->refcnt
) <= 0);
767 if (atomic_dec_and_test(&reply
->refcnt
)) {
773 static struct lcs_reply
*
774 lcs_alloc_reply(struct lcs_cmd
*cmd
)
776 struct lcs_reply
*reply
;
778 LCS_DBF_TEXT(4, trace
, "getreply");
780 reply
= kzalloc(sizeof(struct lcs_reply
), GFP_ATOMIC
);
783 atomic_set(&reply
->refcnt
,1);
784 reply
->sequence_no
= cmd
->sequence_no
;
787 init_waitqueue_head(&reply
->wait_q
);
793 * Notifier function for lancmd replies. Called from read irq.
796 lcs_notify_lancmd_waiters(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
798 struct list_head
*l
, *n
;
799 struct lcs_reply
*reply
;
801 LCS_DBF_TEXT(4, trace
, "notiwait");
802 spin_lock(&card
->lock
);
803 list_for_each_safe(l
, n
, &card
->lancmd_waiters
) {
804 reply
= list_entry(l
, struct lcs_reply
, list
);
805 if (reply
->sequence_no
== cmd
->sequence_no
) {
806 lcs_get_reply(reply
);
807 list_del_init(&reply
->list
);
808 if (reply
->callback
!= NULL
)
809 reply
->callback(card
, cmd
);
811 reply
->rc
= cmd
->return_code
;
812 wake_up(&reply
->wait_q
);
813 lcs_put_reply(reply
);
817 spin_unlock(&card
->lock
);
821 * Emit buffer of a lan command.
824 lcs_lancmd_timeout(struct timer_list
*t
)
826 struct lcs_reply
*reply
= from_timer(reply
, t
, timer
);
827 struct lcs_reply
*list_reply
, *r
;
830 LCS_DBF_TEXT(4, trace
, "timeout");
831 spin_lock_irqsave(&reply
->card
->lock
, flags
);
832 list_for_each_entry_safe(list_reply
, r
,
833 &reply
->card
->lancmd_waiters
,list
) {
834 if (reply
== list_reply
) {
835 lcs_get_reply(reply
);
836 list_del_init(&reply
->list
);
837 spin_unlock_irqrestore(&reply
->card
->lock
, flags
);
840 wake_up(&reply
->wait_q
);
841 lcs_put_reply(reply
);
845 spin_unlock_irqrestore(&reply
->card
->lock
, flags
);
849 lcs_send_lancmd(struct lcs_card
*card
, struct lcs_buffer
*buffer
,
850 void (*reply_callback
)(struct lcs_card
*, struct lcs_cmd
*))
852 struct lcs_reply
*reply
;
857 LCS_DBF_TEXT(4, trace
, "sendcmd");
858 cmd
= (struct lcs_cmd
*) buffer
->data
;
859 cmd
->return_code
= 0;
860 cmd
->sequence_no
= card
->sequence_no
++;
861 reply
= lcs_alloc_reply(cmd
);
864 reply
->callback
= reply_callback
;
866 spin_lock_irqsave(&card
->lock
, flags
);
867 list_add_tail(&reply
->list
, &card
->lancmd_waiters
);
868 spin_unlock_irqrestore(&card
->lock
, flags
);
870 buffer
->callback
= lcs_release_buffer
;
871 rc
= lcs_ready_buffer(&card
->write
, buffer
);
874 timer_setup(&reply
->timer
, lcs_lancmd_timeout
, 0);
875 mod_timer(&reply
->timer
, jiffies
+ HZ
* card
->lancmd_timeout
);
876 wait_event(reply
->wait_q
, reply
->received
);
877 del_timer_sync(&reply
->timer
);
878 LCS_DBF_TEXT_(4, trace
, "rc:%d",reply
->rc
);
880 lcs_put_reply(reply
);
881 return rc
? -EIO
: 0;
885 * LCS startup command
888 lcs_send_startup(struct lcs_card
*card
, __u8 initiator
)
890 struct lcs_buffer
*buffer
;
893 LCS_DBF_TEXT(2, trace
, "startup");
894 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
895 cmd
= (struct lcs_cmd
*) buffer
->data
;
896 cmd
->cmd_code
= LCS_CMD_STARTUP
;
897 cmd
->initiator
= initiator
;
898 cmd
->cmd
.lcs_startup
.buff_size
= LCS_IOBUFFERSIZE
;
899 return lcs_send_lancmd(card
, buffer
, NULL
);
903 * LCS shutdown command
906 lcs_send_shutdown(struct lcs_card
*card
)
908 struct lcs_buffer
*buffer
;
911 LCS_DBF_TEXT(2, trace
, "shutdown");
912 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
913 cmd
= (struct lcs_cmd
*) buffer
->data
;
914 cmd
->cmd_code
= LCS_CMD_SHUTDOWN
;
915 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
916 return lcs_send_lancmd(card
, buffer
, NULL
);
920 * LCS lanstat command
923 __lcs_lanstat_cb(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
925 LCS_DBF_TEXT(2, trace
, "statcb");
926 memcpy(card
->mac
, cmd
->cmd
.lcs_lanstat_cmd
.mac_addr
, LCS_MAC_LENGTH
);
930 lcs_send_lanstat(struct lcs_card
*card
)
932 struct lcs_buffer
*buffer
;
935 LCS_DBF_TEXT(2,trace
, "cmdstat");
936 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
937 cmd
= (struct lcs_cmd
*) buffer
->data
;
938 /* Setup lanstat command. */
939 cmd
->cmd_code
= LCS_CMD_LANSTAT
;
940 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
941 cmd
->cmd
.lcs_std_cmd
.lan_type
= card
->lan_type
;
942 cmd
->cmd
.lcs_std_cmd
.portno
= card
->portno
;
943 return lcs_send_lancmd(card
, buffer
, __lcs_lanstat_cb
);
947 * send stoplan command
950 lcs_send_stoplan(struct lcs_card
*card
, __u8 initiator
)
952 struct lcs_buffer
*buffer
;
955 LCS_DBF_TEXT(2, trace
, "cmdstpln");
956 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
957 cmd
= (struct lcs_cmd
*) buffer
->data
;
958 cmd
->cmd_code
= LCS_CMD_STOPLAN
;
959 cmd
->initiator
= initiator
;
960 cmd
->cmd
.lcs_std_cmd
.lan_type
= card
->lan_type
;
961 cmd
->cmd
.lcs_std_cmd
.portno
= card
->portno
;
962 return lcs_send_lancmd(card
, buffer
, NULL
);
966 * send startlan command
969 __lcs_send_startlan_cb(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
971 LCS_DBF_TEXT(2, trace
, "srtlancb");
972 card
->lan_type
= cmd
->cmd
.lcs_std_cmd
.lan_type
;
973 card
->portno
= cmd
->cmd
.lcs_std_cmd
.portno
;
977 lcs_send_startlan(struct lcs_card
*card
, __u8 initiator
)
979 struct lcs_buffer
*buffer
;
982 LCS_DBF_TEXT(2, trace
, "cmdstaln");
983 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
984 cmd
= (struct lcs_cmd
*) buffer
->data
;
985 cmd
->cmd_code
= LCS_CMD_STARTLAN
;
986 cmd
->initiator
= initiator
;
987 cmd
->cmd
.lcs_std_cmd
.lan_type
= card
->lan_type
;
988 cmd
->cmd
.lcs_std_cmd
.portno
= card
->portno
;
989 return lcs_send_lancmd(card
, buffer
, __lcs_send_startlan_cb
);
992 #ifdef CONFIG_IP_MULTICAST
994 * send setipm command (Multicast)
997 lcs_send_setipm(struct lcs_card
*card
,struct lcs_ipm_list
*ipm_list
)
999 struct lcs_buffer
*buffer
;
1000 struct lcs_cmd
*cmd
;
1002 LCS_DBF_TEXT(2, trace
, "cmdsetim");
1003 buffer
= lcs_get_lancmd(card
, LCS_MULTICAST_CMD_SIZE
);
1004 cmd
= (struct lcs_cmd
*) buffer
->data
;
1005 cmd
->cmd_code
= LCS_CMD_SETIPM
;
1006 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
1007 cmd
->cmd
.lcs_qipassist
.lan_type
= card
->lan_type
;
1008 cmd
->cmd
.lcs_qipassist
.portno
= card
->portno
;
1009 cmd
->cmd
.lcs_qipassist
.version
= 4;
1010 cmd
->cmd
.lcs_qipassist
.num_ip_pairs
= 1;
1011 memcpy(cmd
->cmd
.lcs_qipassist
.lcs_ipass_ctlmsg
.ip_mac_pair
,
1012 &ipm_list
->ipm
, sizeof (struct lcs_ip_mac_pair
));
1013 LCS_DBF_TEXT_(2, trace
, "%x",ipm_list
->ipm
.ip_addr
);
1014 return lcs_send_lancmd(card
, buffer
, NULL
);
1018 * send delipm command (Multicast)
1021 lcs_send_delipm(struct lcs_card
*card
,struct lcs_ipm_list
*ipm_list
)
1023 struct lcs_buffer
*buffer
;
1024 struct lcs_cmd
*cmd
;
1026 LCS_DBF_TEXT(2, trace
, "cmddelim");
1027 buffer
= lcs_get_lancmd(card
, LCS_MULTICAST_CMD_SIZE
);
1028 cmd
= (struct lcs_cmd
*) buffer
->data
;
1029 cmd
->cmd_code
= LCS_CMD_DELIPM
;
1030 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
1031 cmd
->cmd
.lcs_qipassist
.lan_type
= card
->lan_type
;
1032 cmd
->cmd
.lcs_qipassist
.portno
= card
->portno
;
1033 cmd
->cmd
.lcs_qipassist
.version
= 4;
1034 cmd
->cmd
.lcs_qipassist
.num_ip_pairs
= 1;
1035 memcpy(cmd
->cmd
.lcs_qipassist
.lcs_ipass_ctlmsg
.ip_mac_pair
,
1036 &ipm_list
->ipm
, sizeof (struct lcs_ip_mac_pair
));
1037 LCS_DBF_TEXT_(2, trace
, "%x",ipm_list
->ipm
.ip_addr
);
1038 return lcs_send_lancmd(card
, buffer
, NULL
);
1042 * check if multicast is supported by LCS
1045 __lcs_check_multicast_cb(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
1047 LCS_DBF_TEXT(2, trace
, "chkmccb");
1048 card
->ip_assists_supported
=
1049 cmd
->cmd
.lcs_qipassist
.ip_assists_supported
;
1050 card
->ip_assists_enabled
=
1051 cmd
->cmd
.lcs_qipassist
.ip_assists_enabled
;
1055 lcs_check_multicast_support(struct lcs_card
*card
)
1057 struct lcs_buffer
*buffer
;
1058 struct lcs_cmd
*cmd
;
1061 LCS_DBF_TEXT(2, trace
, "cmdqipa");
1062 /* Send query ipassist. */
1063 buffer
= lcs_get_lancmd(card
, LCS_STD_CMD_SIZE
);
1064 cmd
= (struct lcs_cmd
*) buffer
->data
;
1065 cmd
->cmd_code
= LCS_CMD_QIPASSIST
;
1066 cmd
->initiator
= LCS_INITIATOR_TCPIP
;
1067 cmd
->cmd
.lcs_qipassist
.lan_type
= card
->lan_type
;
1068 cmd
->cmd
.lcs_qipassist
.portno
= card
->portno
;
1069 cmd
->cmd
.lcs_qipassist
.version
= 4;
1070 cmd
->cmd
.lcs_qipassist
.num_ip_pairs
= 1;
1071 rc
= lcs_send_lancmd(card
, buffer
, __lcs_check_multicast_cb
);
1073 pr_err("Query IPAssist failed. Assuming unsupported!\n");
1076 if (card
->ip_assists_supported
& LCS_IPASS_MULTICAST_SUPPORT
)
1082 * set or del multicast address on LCS card
1085 lcs_fix_multicast_list(struct lcs_card
*card
)
1087 struct list_head failed_list
;
1088 struct lcs_ipm_list
*ipm
, *tmp
;
1089 unsigned long flags
;
1092 LCS_DBF_TEXT(4,trace
, "fixipm");
1093 INIT_LIST_HEAD(&failed_list
);
1094 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1096 list_for_each_entry_safe(ipm
, tmp
, &card
->ipm_list
, list
){
1097 switch (ipm
->ipm_state
) {
1098 case LCS_IPM_STATE_SET_REQUIRED
:
1099 /* del from ipm_list so no one else can tamper with
1101 list_del_init(&ipm
->list
);
1102 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1103 rc
= lcs_send_setipm(card
, ipm
);
1104 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1106 pr_info("Adding multicast address failed."
1107 " Table possibly full!\n");
1108 /* store ipm in failed list -> will be added
1109 * to ipm_list again, so a retry will be done
1110 * during the next call of this function */
1111 list_add_tail(&ipm
->list
, &failed_list
);
1113 ipm
->ipm_state
= LCS_IPM_STATE_ON_CARD
;
1114 /* re-insert into ipm_list */
1115 list_add_tail(&ipm
->list
, &card
->ipm_list
);
1118 case LCS_IPM_STATE_DEL_REQUIRED
:
1119 list_del(&ipm
->list
);
1120 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1121 lcs_send_delipm(card
, ipm
);
1122 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1125 case LCS_IPM_STATE_ON_CARD
:
1129 /* re-insert all entries from the failed_list into ipm_list */
1130 list_for_each_entry_safe(ipm
, tmp
, &failed_list
, list
)
1131 list_move_tail(&ipm
->list
, &card
->ipm_list
);
1133 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1137 * get mac address for the relevant Multicast address
1140 lcs_get_mac_for_ipm(__be32 ipm
, char *mac
, struct net_device
*dev
)
1142 LCS_DBF_TEXT(4,trace
, "getmac");
1143 ip_eth_mc_map(ipm
, mac
);
1147 * function called by net device to handle multicast address relevant things
1149 static void lcs_remove_mc_addresses(struct lcs_card
*card
,
1150 struct in_device
*in4_dev
)
1152 struct ip_mc_list
*im4
;
1153 struct list_head
*l
;
1154 struct lcs_ipm_list
*ipm
;
1155 unsigned long flags
;
1156 char buf
[MAX_ADDR_LEN
];
1158 LCS_DBF_TEXT(4, trace
, "remmclst");
1159 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1160 list_for_each(l
, &card
->ipm_list
) {
1161 ipm
= list_entry(l
, struct lcs_ipm_list
, list
);
1162 for (im4
= rcu_dereference(in4_dev
->mc_list
);
1163 im4
!= NULL
; im4
= rcu_dereference(im4
->next_rcu
)) {
1164 lcs_get_mac_for_ipm(im4
->multiaddr
, buf
, card
->dev
);
1165 if ( (ipm
->ipm
.ip_addr
== im4
->multiaddr
) &&
1166 (memcmp(buf
, &ipm
->ipm
.mac_addr
,
1167 LCS_MAC_LENGTH
) == 0) )
1171 ipm
->ipm_state
= LCS_IPM_STATE_DEL_REQUIRED
;
1173 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1176 static struct lcs_ipm_list
*lcs_check_addr_entry(struct lcs_card
*card
,
1177 struct ip_mc_list
*im4
,
1180 struct lcs_ipm_list
*tmp
, *ipm
= NULL
;
1181 struct list_head
*l
;
1182 unsigned long flags
;
1184 LCS_DBF_TEXT(4, trace
, "chkmcent");
1185 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1186 list_for_each(l
, &card
->ipm_list
) {
1187 tmp
= list_entry(l
, struct lcs_ipm_list
, list
);
1188 if ( (tmp
->ipm
.ip_addr
== im4
->multiaddr
) &&
1189 (memcmp(buf
, &tmp
->ipm
.mac_addr
,
1190 LCS_MAC_LENGTH
) == 0) ) {
1195 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1199 static void lcs_set_mc_addresses(struct lcs_card
*card
,
1200 struct in_device
*in4_dev
)
1203 struct ip_mc_list
*im4
;
1204 struct lcs_ipm_list
*ipm
;
1205 char buf
[MAX_ADDR_LEN
];
1206 unsigned long flags
;
1208 LCS_DBF_TEXT(4, trace
, "setmclst");
1209 for (im4
= rcu_dereference(in4_dev
->mc_list
); im4
!= NULL
;
1210 im4
= rcu_dereference(im4
->next_rcu
)) {
1211 lcs_get_mac_for_ipm(im4
->multiaddr
, buf
, card
->dev
);
1212 ipm
= lcs_check_addr_entry(card
, im4
, buf
);
1214 continue; /* Address already in list. */
1215 ipm
= kzalloc(sizeof(struct lcs_ipm_list
), GFP_ATOMIC
);
1217 pr_info("Not enough memory to add"
1218 " new multicast entry!\n");
1221 memcpy(&ipm
->ipm
.mac_addr
, buf
, LCS_MAC_LENGTH
);
1222 ipm
->ipm
.ip_addr
= im4
->multiaddr
;
1223 ipm
->ipm_state
= LCS_IPM_STATE_SET_REQUIRED
;
1224 spin_lock_irqsave(&card
->ipm_lock
, flags
);
1225 LCS_DBF_HEX(2,trace
,&ipm
->ipm
.ip_addr
,4);
1226 list_add(&ipm
->list
, &card
->ipm_list
);
1227 spin_unlock_irqrestore(&card
->ipm_lock
, flags
);
1232 lcs_register_mc_addresses(void *data
)
1234 struct lcs_card
*card
;
1235 struct in_device
*in4_dev
;
1237 card
= (struct lcs_card
*) data
;
1239 if (!lcs_do_run_thread(card
, LCS_SET_MC_THREAD
))
1241 LCS_DBF_TEXT(4, trace
, "regmulti");
1243 in4_dev
= in_dev_get(card
->dev
);
1244 if (in4_dev
== NULL
)
1247 lcs_remove_mc_addresses(card
,in4_dev
);
1248 lcs_set_mc_addresses(card
, in4_dev
);
1250 in_dev_put(in4_dev
);
1252 netif_carrier_off(card
->dev
);
1253 netif_tx_disable(card
->dev
);
1254 wait_event(card
->write
.wait_q
,
1255 (card
->write
.state
!= LCS_CH_STATE_RUNNING
));
1256 lcs_fix_multicast_list(card
);
1257 if (card
->state
== DEV_STATE_UP
) {
1258 netif_carrier_on(card
->dev
);
1259 netif_wake_queue(card
->dev
);
1262 lcs_clear_thread_running_bit(card
, LCS_SET_MC_THREAD
);
1265 #endif /* CONFIG_IP_MULTICAST */
1268 * function called by net device to
1269 * handle multicast address relevant things
1272 lcs_set_multicast_list(struct net_device
*dev
)
1274 #ifdef CONFIG_IP_MULTICAST
1275 struct lcs_card
*card
;
1277 LCS_DBF_TEXT(4, trace
, "setmulti");
1278 card
= (struct lcs_card
*) dev
->ml_priv
;
1280 if (!lcs_set_thread_start_bit(card
, LCS_SET_MC_THREAD
))
1281 schedule_work(&card
->kernel_thread_starter
);
1282 #endif /* CONFIG_IP_MULTICAST */
1286 lcs_check_irb_error(struct ccw_device
*cdev
, struct irb
*irb
)
1291 switch (PTR_ERR(irb
)) {
1293 dev_warn(&cdev
->dev
,
1294 "An I/O-error occurred on the LCS device\n");
1295 LCS_DBF_TEXT(2, trace
, "ckirberr");
1296 LCS_DBF_TEXT_(2, trace
, " rc%d", -EIO
);
1299 dev_warn(&cdev
->dev
,
1300 "A command timed out on the LCS device\n");
1301 LCS_DBF_TEXT(2, trace
, "ckirberr");
1302 LCS_DBF_TEXT_(2, trace
, " rc%d", -ETIMEDOUT
);
1305 dev_warn(&cdev
->dev
,
1306 "An error occurred on the LCS device, rc=%ld\n",
1308 LCS_DBF_TEXT(2, trace
, "ckirberr");
1309 LCS_DBF_TEXT(2, trace
, " rc???");
1311 return PTR_ERR(irb
);
1315 lcs_get_problem(struct ccw_device
*cdev
, struct irb
*irb
)
1320 sense
= (char *) irb
->ecw
;
1321 cstat
= irb
->scsw
.cmd
.cstat
;
1322 dstat
= irb
->scsw
.cmd
.dstat
;
1324 if (cstat
& (SCHN_STAT_CHN_CTRL_CHK
| SCHN_STAT_INTF_CTRL_CHK
|
1325 SCHN_STAT_CHN_DATA_CHK
| SCHN_STAT_CHAIN_CHECK
|
1326 SCHN_STAT_PROT_CHECK
| SCHN_STAT_PROG_CHECK
)) {
1327 LCS_DBF_TEXT(2, trace
, "CGENCHK");
1330 if (dstat
& DEV_STAT_UNIT_CHECK
) {
1331 if (sense
[LCS_SENSE_BYTE_1
] &
1332 LCS_SENSE_RESETTING_EVENT
) {
1333 LCS_DBF_TEXT(2, trace
, "REVIND");
1336 if (sense
[LCS_SENSE_BYTE_0
] &
1337 LCS_SENSE_CMD_REJECT
) {
1338 LCS_DBF_TEXT(2, trace
, "CMDREJ");
1341 if ((!sense
[LCS_SENSE_BYTE_0
]) &&
1342 (!sense
[LCS_SENSE_BYTE_1
]) &&
1343 (!sense
[LCS_SENSE_BYTE_2
]) &&
1344 (!sense
[LCS_SENSE_BYTE_3
])) {
1345 LCS_DBF_TEXT(2, trace
, "ZEROSEN");
1348 LCS_DBF_TEXT(2, trace
, "DGENCHK");
1355 lcs_schedule_recovery(struct lcs_card
*card
)
1357 LCS_DBF_TEXT(2, trace
, "startrec");
1358 if (!lcs_set_thread_start_bit(card
, LCS_RECOVERY_THREAD
))
1359 schedule_work(&card
->kernel_thread_starter
);
1363 * IRQ Handler for LCS channels
1366 lcs_irq(struct ccw_device
*cdev
, unsigned long intparm
, struct irb
*irb
)
1368 struct lcs_card
*card
;
1369 struct lcs_channel
*channel
;
1373 if (lcs_check_irb_error(cdev
, irb
))
1376 card
= CARD_FROM_DEV(cdev
);
1377 if (card
->read
.ccwdev
== cdev
)
1378 channel
= &card
->read
;
1380 channel
= &card
->write
;
1382 cstat
= irb
->scsw
.cmd
.cstat
;
1383 dstat
= irb
->scsw
.cmd
.dstat
;
1384 LCS_DBF_TEXT_(5, trace
, "Rint%s", dev_name(&cdev
->dev
));
1385 LCS_DBF_TEXT_(5, trace
, "%4x%4x", irb
->scsw
.cmd
.cstat
,
1386 irb
->scsw
.cmd
.dstat
);
1387 LCS_DBF_TEXT_(5, trace
, "%4x%4x", irb
->scsw
.cmd
.fctl
,
1388 irb
->scsw
.cmd
.actl
);
1390 /* Check for channel and device errors presented */
1391 rc
= lcs_get_problem(cdev
, irb
);
1392 if (rc
|| (dstat
& DEV_STAT_UNIT_EXCEP
)) {
1393 dev_warn(&cdev
->dev
,
1394 "The LCS device stopped because of an error,"
1395 " dstat=0x%X, cstat=0x%X \n",
1398 channel
->state
= LCS_CH_STATE_ERROR
;
1401 if (channel
->state
== LCS_CH_STATE_ERROR
) {
1402 lcs_schedule_recovery(card
);
1403 wake_up(&card
->wait_q
);
1406 /* How far in the ccw chain have we processed? */
1407 if ((channel
->state
!= LCS_CH_STATE_INIT
) &&
1408 (irb
->scsw
.cmd
.fctl
& SCSW_FCTL_START_FUNC
) &&
1409 (irb
->scsw
.cmd
.cpa
!= 0)) {
1410 index
= (struct ccw1
*) __va((addr_t
) irb
->scsw
.cmd
.cpa
)
1412 if ((irb
->scsw
.cmd
.actl
& SCSW_ACTL_SUSPENDED
) ||
1413 (irb
->scsw
.cmd
.cstat
& SCHN_STAT_PCI
))
1414 /* Bloody io subsystem tells us lies about cpa... */
1415 index
= (index
- 1) & (LCS_NUM_BUFFS
- 1);
1416 while (channel
->io_idx
!= index
) {
1417 __lcs_processed_buffer(channel
,
1418 channel
->iob
+ channel
->io_idx
);
1420 (channel
->io_idx
+ 1) & (LCS_NUM_BUFFS
- 1);
1424 if ((irb
->scsw
.cmd
.dstat
& DEV_STAT_DEV_END
) ||
1425 (irb
->scsw
.cmd
.dstat
& DEV_STAT_CHN_END
) ||
1426 (irb
->scsw
.cmd
.dstat
& DEV_STAT_UNIT_CHECK
))
1427 /* Mark channel as stopped. */
1428 channel
->state
= LCS_CH_STATE_STOPPED
;
1429 else if (irb
->scsw
.cmd
.actl
& SCSW_ACTL_SUSPENDED
)
1430 /* CCW execution stopped on a suspend bit. */
1431 channel
->state
= LCS_CH_STATE_SUSPENDED
;
1432 if (irb
->scsw
.cmd
.fctl
& SCSW_FCTL_HALT_FUNC
) {
1433 if (irb
->scsw
.cmd
.cc
!= 0) {
1434 ccw_device_halt(channel
->ccwdev
, (addr_t
) channel
);
1437 /* The channel has been stopped by halt_IO. */
1438 channel
->state
= LCS_CH_STATE_HALTED
;
1440 if (irb
->scsw
.cmd
.fctl
& SCSW_FCTL_CLEAR_FUNC
)
1441 channel
->state
= LCS_CH_STATE_CLEARED
;
1442 /* Do the rest in the tasklet. */
1443 tasklet_schedule(&channel
->irq_tasklet
);
1447 * Tasklet for IRQ handler
1450 lcs_tasklet(unsigned long data
)
1452 unsigned long flags
;
1453 struct lcs_channel
*channel
;
1454 struct lcs_buffer
*iob
;
1457 channel
= (struct lcs_channel
*) data
;
1458 LCS_DBF_TEXT_(5, trace
, "tlet%s", dev_name(&channel
->ccwdev
->dev
));
1460 /* Check for processed buffers. */
1462 buf_idx
= channel
->buf_idx
;
1463 while (iob
[buf_idx
].state
== LCS_BUF_STATE_PROCESSED
) {
1464 /* Do the callback thing. */
1465 if (iob
[buf_idx
].callback
!= NULL
)
1466 iob
[buf_idx
].callback(channel
, iob
+ buf_idx
);
1467 buf_idx
= (buf_idx
+ 1) & (LCS_NUM_BUFFS
- 1);
1469 channel
->buf_idx
= buf_idx
;
1471 if (channel
->state
== LCS_CH_STATE_STOPPED
)
1472 lcs_start_channel(channel
);
1473 spin_lock_irqsave(get_ccwdev_lock(channel
->ccwdev
), flags
);
1474 if (channel
->state
== LCS_CH_STATE_SUSPENDED
&&
1475 channel
->iob
[channel
->io_idx
].state
== LCS_BUF_STATE_READY
)
1476 __lcs_resume_channel(channel
);
1477 spin_unlock_irqrestore(get_ccwdev_lock(channel
->ccwdev
), flags
);
1479 /* Something happened on the channel. Wake up waiters. */
1480 wake_up(&channel
->wait_q
);
1484 * Finish current tx buffer and make it ready for transmit.
1487 __lcs_emit_txbuffer(struct lcs_card
*card
)
1489 LCS_DBF_TEXT(5, trace
, "emittx");
1490 *(__u16
*)(card
->tx_buffer
->data
+ card
->tx_buffer
->count
) = 0;
1491 card
->tx_buffer
->count
+= 2;
1492 lcs_ready_buffer(&card
->write
, card
->tx_buffer
);
1493 card
->tx_buffer
= NULL
;
1498 * Callback for finished tx buffers.
1501 lcs_txbuffer_cb(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
1503 struct lcs_card
*card
;
1505 LCS_DBF_TEXT(5, trace
, "txbuffcb");
1506 /* Put buffer back to pool. */
1507 lcs_release_buffer(channel
, buffer
);
1508 card
= container_of(channel
, struct lcs_card
, write
);
1509 if (netif_queue_stopped(card
->dev
) && netif_carrier_ok(card
->dev
))
1510 netif_wake_queue(card
->dev
);
1511 spin_lock(&card
->lock
);
1513 if (card
->tx_emitted
<= 0 && card
->tx_buffer
!= NULL
)
1515 * Last running tx buffer has finished. Submit partially
1516 * filled current buffer.
1518 __lcs_emit_txbuffer(card
);
1519 spin_unlock(&card
->lock
);
1523 * Packet transmit function called by network stack
1526 __lcs_start_xmit(struct lcs_card
*card
, struct sk_buff
*skb
,
1527 struct net_device
*dev
)
1529 struct lcs_header
*header
;
1530 int rc
= NETDEV_TX_OK
;
1532 LCS_DBF_TEXT(5, trace
, "hardxmit");
1534 card
->stats
.tx_dropped
++;
1535 card
->stats
.tx_errors
++;
1536 return NETDEV_TX_OK
;
1538 if (card
->state
!= DEV_STATE_UP
) {
1540 card
->stats
.tx_dropped
++;
1541 card
->stats
.tx_errors
++;
1542 card
->stats
.tx_carrier_errors
++;
1543 return NETDEV_TX_OK
;
1545 if (skb
->protocol
== htons(ETH_P_IPV6
)) {
1547 return NETDEV_TX_OK
;
1549 netif_stop_queue(card
->dev
);
1550 spin_lock(&card
->lock
);
1551 if (card
->tx_buffer
!= NULL
&&
1552 card
->tx_buffer
->count
+ sizeof(struct lcs_header
) +
1553 skb
->len
+ sizeof(u16
) > LCS_IOBUFFERSIZE
)
1554 /* skb too big for current tx buffer. */
1555 __lcs_emit_txbuffer(card
);
1556 if (card
->tx_buffer
== NULL
) {
1557 /* Get new tx buffer */
1558 card
->tx_buffer
= lcs_get_buffer(&card
->write
);
1559 if (card
->tx_buffer
== NULL
) {
1560 card
->stats
.tx_dropped
++;
1561 rc
= NETDEV_TX_BUSY
;
1564 card
->tx_buffer
->callback
= lcs_txbuffer_cb
;
1565 card
->tx_buffer
->count
= 0;
1567 header
= (struct lcs_header
*)
1568 (card
->tx_buffer
->data
+ card
->tx_buffer
->count
);
1569 card
->tx_buffer
->count
+= skb
->len
+ sizeof(struct lcs_header
);
1570 header
->offset
= card
->tx_buffer
->count
;
1571 header
->type
= card
->lan_type
;
1572 header
->slot
= card
->portno
;
1573 skb_copy_from_linear_data(skb
, header
+ 1, skb
->len
);
1574 spin_unlock(&card
->lock
);
1575 card
->stats
.tx_bytes
+= skb
->len
;
1576 card
->stats
.tx_packets
++;
1578 netif_wake_queue(card
->dev
);
1579 spin_lock(&card
->lock
);
1580 if (card
->tx_emitted
<= 0 && card
->tx_buffer
!= NULL
)
1581 /* If this is the first tx buffer emit it immediately. */
1582 __lcs_emit_txbuffer(card
);
1584 spin_unlock(&card
->lock
);
1589 lcs_start_xmit(struct sk_buff
*skb
, struct net_device
*dev
)
1591 struct lcs_card
*card
;
1594 LCS_DBF_TEXT(5, trace
, "pktxmit");
1595 card
= (struct lcs_card
*) dev
->ml_priv
;
1596 rc
= __lcs_start_xmit(card
, skb
, dev
);
1601 * send startlan and lanstat command to make LCS device ready
1604 lcs_startlan_auto(struct lcs_card
*card
)
1608 LCS_DBF_TEXT(2, trace
, "strtauto");
1609 #ifdef CONFIG_ETHERNET
1610 card
->lan_type
= LCS_FRAME_TYPE_ENET
;
1611 rc
= lcs_send_startlan(card
, LCS_INITIATOR_TCPIP
);
1617 card
->lan_type
= LCS_FRAME_TYPE_FDDI
;
1618 rc
= lcs_send_startlan(card
, LCS_INITIATOR_TCPIP
);
1626 lcs_startlan(struct lcs_card
*card
)
1630 LCS_DBF_TEXT(2, trace
, "startlan");
1632 if (card
->portno
!= LCS_INVALID_PORT_NO
) {
1633 if (card
->lan_type
== LCS_FRAME_TYPE_AUTO
)
1634 rc
= lcs_startlan_auto(card
);
1636 rc
= lcs_send_startlan(card
, LCS_INITIATOR_TCPIP
);
1638 for (i
= 0; i
<= 16; i
++) {
1640 if (card
->lan_type
!= LCS_FRAME_TYPE_AUTO
)
1641 rc
= lcs_send_startlan(card
,
1642 LCS_INITIATOR_TCPIP
);
1644 /* autodetecting lan type */
1645 rc
= lcs_startlan_auto(card
);
1651 return lcs_send_lanstat(card
);
1656 * LCS detect function
1657 * setup channels and make them I/O ready
1660 lcs_detect(struct lcs_card
*card
)
1664 LCS_DBF_TEXT(2, setup
, "lcsdetct");
1665 /* start/reset card */
1667 netif_stop_queue(card
->dev
);
1668 rc
= lcs_stop_channels(card
);
1670 rc
= lcs_start_channels(card
);
1672 rc
= lcs_send_startup(card
, LCS_INITIATOR_TCPIP
);
1674 rc
= lcs_startlan(card
);
1678 card
->state
= DEV_STATE_UP
;
1680 card
->state
= DEV_STATE_DOWN
;
1681 card
->write
.state
= LCS_CH_STATE_INIT
;
1682 card
->read
.state
= LCS_CH_STATE_INIT
;
1691 lcs_stopcard(struct lcs_card
*card
)
1695 LCS_DBF_TEXT(3, setup
, "stopcard");
1697 if (card
->read
.state
!= LCS_CH_STATE_STOPPED
&&
1698 card
->write
.state
!= LCS_CH_STATE_STOPPED
&&
1699 card
->read
.state
!= LCS_CH_STATE_ERROR
&&
1700 card
->write
.state
!= LCS_CH_STATE_ERROR
&&
1701 card
->state
== DEV_STATE_UP
) {
1702 lcs_clear_multicast_list(card
);
1703 rc
= lcs_send_stoplan(card
,LCS_INITIATOR_TCPIP
);
1704 rc
= lcs_send_shutdown(card
);
1706 rc
= lcs_stop_channels(card
);
1707 card
->state
= DEV_STATE_DOWN
;
1713 * Kernel Thread helper functions for LGW initiated commands
1716 lcs_start_kernel_thread(struct work_struct
*work
)
1718 struct lcs_card
*card
= container_of(work
, struct lcs_card
, kernel_thread_starter
);
1719 LCS_DBF_TEXT(5, trace
, "krnthrd");
1720 if (lcs_do_start_thread(card
, LCS_RECOVERY_THREAD
))
1721 kthread_run(lcs_recovery
, card
, "lcs_recover");
1722 #ifdef CONFIG_IP_MULTICAST
1723 if (lcs_do_start_thread(card
, LCS_SET_MC_THREAD
))
1724 kthread_run(lcs_register_mc_addresses
, card
, "regipm");
1729 * Process control frames.
1732 lcs_get_control(struct lcs_card
*card
, struct lcs_cmd
*cmd
)
1734 LCS_DBF_TEXT(5, trace
, "getctrl");
1735 if (cmd
->initiator
== LCS_INITIATOR_LGW
) {
1736 switch(cmd
->cmd_code
) {
1737 case LCS_CMD_STARTUP
:
1738 case LCS_CMD_STARTLAN
:
1739 lcs_schedule_recovery(card
);
1741 case LCS_CMD_STOPLAN
:
1742 pr_warn("Stoplan for %s initiated by LGW\n",
1745 netif_carrier_off(card
->dev
);
1748 LCS_DBF_TEXT(5, trace
, "noLGWcmd");
1752 lcs_notify_lancmd_waiters(card
, cmd
);
1756 * Unpack network packet.
1759 lcs_get_skb(struct lcs_card
*card
, char *skb_data
, unsigned int skb_len
)
1761 struct sk_buff
*skb
;
1763 LCS_DBF_TEXT(5, trace
, "getskb");
1764 if (card
->dev
== NULL
||
1765 card
->state
!= DEV_STATE_UP
)
1766 /* The card isn't up. Ignore the packet. */
1769 skb
= dev_alloc_skb(skb_len
);
1771 dev_err(&card
->dev
->dev
,
1772 " Allocating a socket buffer to interface %s failed\n",
1774 card
->stats
.rx_dropped
++;
1777 skb_put_data(skb
, skb_data
, skb_len
);
1778 skb
->protocol
= card
->lan_type_trans(skb
, card
->dev
);
1779 card
->stats
.rx_bytes
+= skb_len
;
1780 card
->stats
.rx_packets
++;
1781 if (skb
->protocol
== htons(ETH_P_802_2
))
1782 *((__u32
*)skb
->cb
) = ++card
->pkt_seq
;
1787 * LCS main routine to get packets and lancmd replies from the buffers
1790 lcs_get_frames_cb(struct lcs_channel
*channel
, struct lcs_buffer
*buffer
)
1792 struct lcs_card
*card
;
1793 struct lcs_header
*lcs_hdr
;
1796 LCS_DBF_TEXT(5, trace
, "lcsgtpkt");
1797 lcs_hdr
= (struct lcs_header
*) buffer
->data
;
1798 if (lcs_hdr
->offset
== LCS_ILLEGAL_OFFSET
) {
1799 LCS_DBF_TEXT(4, trace
, "-eiogpkt");
1802 card
= container_of(channel
, struct lcs_card
, read
);
1804 while (lcs_hdr
->offset
!= 0) {
1805 if (lcs_hdr
->offset
<= 0 ||
1806 lcs_hdr
->offset
> LCS_IOBUFFERSIZE
||
1807 lcs_hdr
->offset
< offset
) {
1808 /* Offset invalid. */
1809 card
->stats
.rx_length_errors
++;
1810 card
->stats
.rx_errors
++;
1813 /* What kind of frame is it? */
1814 if (lcs_hdr
->type
== LCS_FRAME_TYPE_CONTROL
)
1815 /* Control frame. */
1816 lcs_get_control(card
, (struct lcs_cmd
*) lcs_hdr
);
1817 else if (lcs_hdr
->type
== LCS_FRAME_TYPE_ENET
||
1818 lcs_hdr
->type
== LCS_FRAME_TYPE_TR
||
1819 lcs_hdr
->type
== LCS_FRAME_TYPE_FDDI
)
1820 /* Normal network packet. */
1821 lcs_get_skb(card
, (char *)(lcs_hdr
+ 1),
1822 lcs_hdr
->offset
- offset
-
1823 sizeof(struct lcs_header
));
1825 /* Unknown frame type. */
1826 ; // FIXME: error message ?
1827 /* Proceed to next frame. */
1828 offset
= lcs_hdr
->offset
;
1829 lcs_hdr
->offset
= LCS_ILLEGAL_OFFSET
;
1830 lcs_hdr
= (struct lcs_header
*) (buffer
->data
+ offset
);
1832 /* The buffer is now empty. Make it ready again. */
1833 lcs_ready_buffer(&card
->read
, buffer
);
1837 * get network statistics for ifconfig and other user programs
1839 static struct net_device_stats
*
1840 lcs_getstats(struct net_device
*dev
)
1842 struct lcs_card
*card
;
1844 LCS_DBF_TEXT(4, trace
, "netstats");
1845 card
= (struct lcs_card
*) dev
->ml_priv
;
1846 return &card
->stats
;
1851 * This function will be called by user doing ifconfig xxx down
1854 lcs_stop_device(struct net_device
*dev
)
1856 struct lcs_card
*card
;
1859 LCS_DBF_TEXT(2, trace
, "stopdev");
1860 card
= (struct lcs_card
*) dev
->ml_priv
;
1861 netif_carrier_off(dev
);
1862 netif_tx_disable(dev
);
1863 dev
->flags
&= ~IFF_UP
;
1864 wait_event(card
->write
.wait_q
,
1865 (card
->write
.state
!= LCS_CH_STATE_RUNNING
));
1866 rc
= lcs_stopcard(card
);
1868 dev_err(&card
->dev
->dev
,
1869 " Shutting down the LCS device failed\n");
1874 * start lcs device and make it runnable
1875 * This function will be called by user doing ifconfig xxx up
1878 lcs_open_device(struct net_device
*dev
)
1880 struct lcs_card
*card
;
1883 LCS_DBF_TEXT(2, trace
, "opendev");
1884 card
= (struct lcs_card
*) dev
->ml_priv
;
1885 /* initialize statistics */
1886 rc
= lcs_detect(card
);
1888 pr_err("Error in opening device!\n");
1891 dev
->flags
|= IFF_UP
;
1892 netif_carrier_on(dev
);
1893 netif_wake_queue(dev
);
1894 card
->state
= DEV_STATE_UP
;
1900 * show function for portno called by cat or similar things
1903 lcs_portno_show (struct device
*dev
, struct device_attribute
*attr
, char *buf
)
1905 struct lcs_card
*card
;
1907 card
= dev_get_drvdata(dev
);
1912 return sprintf(buf
, "%d\n", card
->portno
);
1916 * store the value which is piped to file portno
1919 lcs_portno_store (struct device
*dev
, struct device_attribute
*attr
, const char *buf
, size_t count
)
1921 struct lcs_card
*card
;
1925 card
= dev_get_drvdata(dev
);
1930 rc
= kstrtos16(buf
, 0, &value
);
1933 /* TODO: sanity checks */
1934 card
->portno
= value
;
1940 static DEVICE_ATTR(portno
, 0644, lcs_portno_show
, lcs_portno_store
);
1942 static const char *lcs_type
[] = {
1947 "unknown channel type",
1948 "unsupported channel type",
1952 lcs_type_show(struct device
*dev
, struct device_attribute
*attr
, char *buf
)
1954 struct ccwgroup_device
*cgdev
;
1956 cgdev
= to_ccwgroupdev(dev
);
1960 return sprintf(buf
, "%s\n", lcs_type
[cgdev
->cdev
[0]->id
.driver_info
]);
1963 static DEVICE_ATTR(type
, 0444, lcs_type_show
, NULL
);
1966 lcs_timeout_show(struct device
*dev
, struct device_attribute
*attr
, char *buf
)
1968 struct lcs_card
*card
;
1970 card
= dev_get_drvdata(dev
);
1972 return card
? sprintf(buf
, "%u\n", card
->lancmd_timeout
) : 0;
1976 lcs_timeout_store (struct device
*dev
, struct device_attribute
*attr
, const char *buf
, size_t count
)
1978 struct lcs_card
*card
;
1982 card
= dev_get_drvdata(dev
);
1987 rc
= kstrtouint(buf
, 0, &value
);
1990 /* TODO: sanity checks */
1991 card
->lancmd_timeout
= value
;
1997 static DEVICE_ATTR(lancmd_timeout
, 0644, lcs_timeout_show
, lcs_timeout_store
);
2000 lcs_dev_recover_store(struct device
*dev
, struct device_attribute
*attr
,
2001 const char *buf
, size_t count
)
2003 struct lcs_card
*card
= dev_get_drvdata(dev
);
2009 if (card
->state
!= DEV_STATE_UP
)
2011 i
= simple_strtoul(buf
, &tmp
, 16);
2013 lcs_schedule_recovery(card
);
2017 static DEVICE_ATTR(recover
, 0200, NULL
, lcs_dev_recover_store
);
2019 static struct attribute
* lcs_attrs
[] = {
2020 &dev_attr_portno
.attr
,
2021 &dev_attr_type
.attr
,
2022 &dev_attr_lancmd_timeout
.attr
,
2023 &dev_attr_recover
.attr
,
2026 static struct attribute_group lcs_attr_group
= {
2029 static const struct attribute_group
*lcs_attr_groups
[] = {
2033 static const struct device_type lcs_devtype
= {
2035 .groups
= lcs_attr_groups
,
2039 * lcs_probe_device is called on establishing a new ccwgroup_device.
2042 lcs_probe_device(struct ccwgroup_device
*ccwgdev
)
2044 struct lcs_card
*card
;
2046 if (!get_device(&ccwgdev
->dev
))
2049 LCS_DBF_TEXT(2, setup
, "add_dev");
2050 card
= lcs_alloc_card();
2052 LCS_DBF_TEXT_(2, setup
, " rc%d", -ENOMEM
);
2053 put_device(&ccwgdev
->dev
);
2056 dev_set_drvdata(&ccwgdev
->dev
, card
);
2057 ccwgdev
->cdev
[0]->handler
= lcs_irq
;
2058 ccwgdev
->cdev
[1]->handler
= lcs_irq
;
2059 card
->gdev
= ccwgdev
;
2060 INIT_WORK(&card
->kernel_thread_starter
, lcs_start_kernel_thread
);
2061 card
->thread_start_mask
= 0;
2062 card
->thread_allowed_mask
= 0;
2063 card
->thread_running_mask
= 0;
2064 ccwgdev
->dev
.type
= &lcs_devtype
;
2070 lcs_register_netdev(struct ccwgroup_device
*ccwgdev
)
2072 struct lcs_card
*card
;
2074 LCS_DBF_TEXT(2, setup
, "regnetdv");
2075 card
= dev_get_drvdata(&ccwgdev
->dev
);
2076 if (card
->dev
->reg_state
!= NETREG_UNINITIALIZED
)
2078 SET_NETDEV_DEV(card
->dev
, &ccwgdev
->dev
);
2079 return register_netdev(card
->dev
);
2083 * lcs_new_device will be called by setting the group device online.
2085 static const struct net_device_ops lcs_netdev_ops
= {
2086 .ndo_open
= lcs_open_device
,
2087 .ndo_stop
= lcs_stop_device
,
2088 .ndo_get_stats
= lcs_getstats
,
2089 .ndo_start_xmit
= lcs_start_xmit
,
2092 static const struct net_device_ops lcs_mc_netdev_ops
= {
2093 .ndo_open
= lcs_open_device
,
2094 .ndo_stop
= lcs_stop_device
,
2095 .ndo_get_stats
= lcs_getstats
,
2096 .ndo_start_xmit
= lcs_start_xmit
,
2097 .ndo_set_rx_mode
= lcs_set_multicast_list
,
2101 lcs_new_device(struct ccwgroup_device
*ccwgdev
)
2103 struct lcs_card
*card
;
2104 struct net_device
*dev
=NULL
;
2105 enum lcs_dev_states recover_state
;
2108 card
= dev_get_drvdata(&ccwgdev
->dev
);
2112 LCS_DBF_TEXT(2, setup
, "newdev");
2113 LCS_DBF_HEX(3, setup
, &card
, sizeof(void*));
2114 card
->read
.ccwdev
= ccwgdev
->cdev
[0];
2115 card
->write
.ccwdev
= ccwgdev
->cdev
[1];
2117 recover_state
= card
->state
;
2118 rc
= ccw_device_set_online(card
->read
.ccwdev
);
2121 rc
= ccw_device_set_online(card
->write
.ccwdev
);
2125 LCS_DBF_TEXT(3, setup
, "lcsnewdv");
2127 lcs_setup_card(card
);
2128 rc
= lcs_detect(card
);
2130 LCS_DBF_TEXT(2, setup
, "dtctfail");
2131 dev_err(&ccwgdev
->dev
,
2132 "Detecting a network adapter for LCS devices"
2133 " failed with rc=%d (0x%x)\n", rc
, rc
);
2138 LCS_DBF_TEXT(2, setup
, "samedev");
2139 LCS_DBF_HEX(3, setup
, &card
, sizeof(void*));
2142 switch (card
->lan_type
) {
2143 #ifdef CONFIG_ETHERNET
2144 case LCS_FRAME_TYPE_ENET
:
2145 card
->lan_type_trans
= eth_type_trans
;
2146 dev
= alloc_etherdev(0);
2150 case LCS_FRAME_TYPE_FDDI
:
2151 card
->lan_type_trans
= fddi_type_trans
;
2152 dev
= alloc_fddidev(0);
2156 LCS_DBF_TEXT(3, setup
, "errinit");
2157 pr_err(" Initialization failed\n");
2163 card
->dev
->ml_priv
= card
;
2164 card
->dev
->netdev_ops
= &lcs_netdev_ops
;
2165 memcpy(card
->dev
->dev_addr
, card
->mac
, LCS_MAC_LENGTH
);
2166 #ifdef CONFIG_IP_MULTICAST
2167 if (!lcs_check_multicast_support(card
))
2168 card
->dev
->netdev_ops
= &lcs_mc_netdev_ops
;
2171 lcs_set_allowed_threads(card
,0xffffffff);
2172 if (recover_state
== DEV_STATE_RECOVER
) {
2173 lcs_set_multicast_list(card
->dev
);
2174 card
->dev
->flags
|= IFF_UP
;
2175 netif_carrier_on(card
->dev
);
2176 netif_wake_queue(card
->dev
);
2177 card
->state
= DEV_STATE_UP
;
2182 if (lcs_register_netdev(ccwgdev
) != 0)
2185 /* Print out supported assists: IPv6 */
2186 pr_info("LCS device %s %s IPv6 support\n", card
->dev
->name
,
2187 (card
->ip_assists_supported
& LCS_IPASS_IPV6_SUPPORT
) ?
2188 "with" : "without");
2189 /* Print out supported assist: Multicast */
2190 pr_info("LCS device %s %s Multicast support\n", card
->dev
->name
,
2191 (card
->ip_assists_supported
& LCS_IPASS_MULTICAST_SUPPORT
) ?
2192 "with" : "without");
2196 ccw_device_set_offline(card
->write
.ccwdev
);
2198 ccw_device_set_offline(card
->read
.ccwdev
);
2204 * lcs_shutdown_device, called when setting the group device offline.
2207 __lcs_shutdown_device(struct ccwgroup_device
*ccwgdev
, int recovery_mode
)
2209 struct lcs_card
*card
;
2210 enum lcs_dev_states recover_state
;
2211 int ret
= 0, ret2
= 0, ret3
= 0;
2213 LCS_DBF_TEXT(3, setup
, "shtdndev");
2214 card
= dev_get_drvdata(&ccwgdev
->dev
);
2217 if (recovery_mode
== 0) {
2218 lcs_set_allowed_threads(card
, 0);
2219 if (lcs_wait_for_threads(card
, LCS_SET_MC_THREAD
))
2220 return -ERESTARTSYS
;
2222 LCS_DBF_HEX(3, setup
, &card
, sizeof(void*));
2223 recover_state
= card
->state
;
2225 ret
= lcs_stop_device(card
->dev
);
2226 ret2
= ccw_device_set_offline(card
->read
.ccwdev
);
2227 ret3
= ccw_device_set_offline(card
->write
.ccwdev
);
2229 ret
= (ret2
) ? ret2
: ret3
;
2231 LCS_DBF_TEXT_(3, setup
, "1err:%d", ret
);
2232 if (recover_state
== DEV_STATE_UP
) {
2233 card
->state
= DEV_STATE_RECOVER
;
2239 lcs_shutdown_device(struct ccwgroup_device
*ccwgdev
)
2241 return __lcs_shutdown_device(ccwgdev
, 0);
2245 * drive lcs recovery after startup and startlan initiated by Lan Gateway
2248 lcs_recovery(void *ptr
)
2250 struct lcs_card
*card
;
2251 struct ccwgroup_device
*gdev
;
2254 card
= (struct lcs_card
*) ptr
;
2256 LCS_DBF_TEXT(4, trace
, "recover1");
2257 if (!lcs_do_run_thread(card
, LCS_RECOVERY_THREAD
))
2259 LCS_DBF_TEXT(4, trace
, "recover2");
2261 dev_warn(&gdev
->dev
,
2262 "A recovery process has been started for the LCS device\n");
2263 rc
= __lcs_shutdown_device(gdev
, 1);
2264 rc
= lcs_new_device(gdev
);
2266 pr_info("Device %s successfully recovered!\n",
2269 pr_info("Device %s could not be recovered!\n",
2271 lcs_clear_thread_running_bit(card
, LCS_RECOVERY_THREAD
);
2276 * lcs_remove_device, free buffers and card
2279 lcs_remove_device(struct ccwgroup_device
*ccwgdev
)
2281 struct lcs_card
*card
;
2283 card
= dev_get_drvdata(&ccwgdev
->dev
);
2287 LCS_DBF_TEXT(3, setup
, "remdev");
2288 LCS_DBF_HEX(3, setup
, &card
, sizeof(void*));
2289 if (ccwgdev
->state
== CCWGROUP_ONLINE
) {
2290 lcs_shutdown_device(ccwgdev
);
2293 unregister_netdev(card
->dev
);
2294 lcs_cleanup_card(card
);
2295 lcs_free_card(card
);
2296 dev_set_drvdata(&ccwgdev
->dev
, NULL
);
2297 put_device(&ccwgdev
->dev
);
2300 static int lcs_pm_suspend(struct lcs_card
*card
)
2303 netif_device_detach(card
->dev
);
2304 lcs_set_allowed_threads(card
, 0);
2305 lcs_wait_for_threads(card
, 0xffffffff);
2306 if (card
->state
!= DEV_STATE_DOWN
)
2307 __lcs_shutdown_device(card
->gdev
, 1);
2311 static int lcs_pm_resume(struct lcs_card
*card
)
2315 if (card
->state
== DEV_STATE_RECOVER
)
2316 rc
= lcs_new_device(card
->gdev
);
2318 netif_device_attach(card
->dev
);
2320 dev_warn(&card
->gdev
->dev
, "The lcs device driver "
2321 "failed to recover the device\n");
2326 static int lcs_prepare(struct ccwgroup_device
*gdev
)
2331 static void lcs_complete(struct ccwgroup_device
*gdev
)
2336 static int lcs_freeze(struct ccwgroup_device
*gdev
)
2338 struct lcs_card
*card
= dev_get_drvdata(&gdev
->dev
);
2339 return lcs_pm_suspend(card
);
2342 static int lcs_thaw(struct ccwgroup_device
*gdev
)
2344 struct lcs_card
*card
= dev_get_drvdata(&gdev
->dev
);
2345 return lcs_pm_resume(card
);
2348 static int lcs_restore(struct ccwgroup_device
*gdev
)
2350 struct lcs_card
*card
= dev_get_drvdata(&gdev
->dev
);
2351 return lcs_pm_resume(card
);
2354 static struct ccw_device_id lcs_ids
[] = {
2355 {CCW_DEVICE(0x3088, 0x08), .driver_info
= lcs_channel_type_parallel
},
2356 {CCW_DEVICE(0x3088, 0x1f), .driver_info
= lcs_channel_type_2216
},
2357 {CCW_DEVICE(0x3088, 0x60), .driver_info
= lcs_channel_type_osa2
},
2360 MODULE_DEVICE_TABLE(ccw
, lcs_ids
);
2362 static struct ccw_driver lcs_ccw_driver
= {
2364 .owner
= THIS_MODULE
,
2368 .probe
= ccwgroup_probe_ccwdev
,
2369 .remove
= ccwgroup_remove_ccwdev
,
2370 .int_class
= IRQIO_LCS
,
2374 * LCS ccwgroup driver registration
2376 static struct ccwgroup_driver lcs_group_driver
= {
2378 .owner
= THIS_MODULE
,
2381 .ccw_driver
= &lcs_ccw_driver
,
2382 .setup
= lcs_probe_device
,
2383 .remove
= lcs_remove_device
,
2384 .set_online
= lcs_new_device
,
2385 .set_offline
= lcs_shutdown_device
,
2386 .prepare
= lcs_prepare
,
2387 .complete
= lcs_complete
,
2388 .freeze
= lcs_freeze
,
2390 .restore
= lcs_restore
,
2393 static ssize_t
group_store(struct device_driver
*ddrv
, const char *buf
,
2397 err
= ccwgroup_create_dev(lcs_root_dev
, &lcs_group_driver
, 2, buf
);
2398 return err
? err
: count
;
2400 static DRIVER_ATTR_WO(group
);
2402 static struct attribute
*lcs_drv_attrs
[] = {
2403 &driver_attr_group
.attr
,
2406 static struct attribute_group lcs_drv_attr_group
= {
2407 .attrs
= lcs_drv_attrs
,
2409 static const struct attribute_group
*lcs_drv_attr_groups
[] = {
2410 &lcs_drv_attr_group
,
2415 * LCS Module/Kernel initialization function
2418 __init
lcs_init_module(void)
2422 pr_info("Loading %s\n", version
);
2423 rc
= lcs_register_debug_facility();
2424 LCS_DBF_TEXT(0, setup
, "lcsinit");
2427 lcs_root_dev
= root_device_register("lcs");
2428 rc
= PTR_ERR_OR_ZERO(lcs_root_dev
);
2431 rc
= ccw_driver_register(&lcs_ccw_driver
);
2434 lcs_group_driver
.driver
.groups
= lcs_drv_attr_groups
;
2435 rc
= ccwgroup_driver_register(&lcs_group_driver
);
2441 ccw_driver_unregister(&lcs_ccw_driver
);
2443 root_device_unregister(lcs_root_dev
);
2445 lcs_unregister_debug_facility();
2447 pr_err("Initializing the lcs device driver failed\n");
2453 * LCS module cleanup function
2456 __exit
lcs_cleanup_module(void)
2458 pr_info("Terminating lcs module.\n");
2459 LCS_DBF_TEXT(0, trace
, "cleanup");
2460 ccwgroup_driver_unregister(&lcs_group_driver
);
2461 ccw_driver_unregister(&lcs_ccw_driver
);
2462 root_device_unregister(lcs_root_dev
);
2463 lcs_unregister_debug_facility();
2466 module_init(lcs_init_module
);
2467 module_exit(lcs_cleanup_module
);
2469 MODULE_AUTHOR("Frank Pavlic <fpavlic@de.ibm.com>");
2470 MODULE_LICENSE("GPL");