/drivers/char/pcmcia/synclink_cs.c
C | 4311 lines | 2938 code | 672 blank | 701 comment | 620 complexity | 9990b381aff71ea36e28a41ddda3c1f6 MD5 | raw file
Possible License(s): GPL-2.0, LGPL-2.0, AGPL-1.0
Large files files are truncated, but you can click here to view the full file
1/*
2 * linux/drivers/char/pcmcia/synclink_cs.c
3 *
4 * $Id: synclink_cs.c,v 4.34 2005/09/08 13:20:54 paulkf Exp $
5 *
6 * Device driver for Microgate SyncLink PC Card
7 * multiprotocol serial adapter.
8 *
9 * written by Paul Fulghum for Microgate Corporation
10 * paulkf@microgate.com
11 *
12 * Microgate and SyncLink are trademarks of Microgate Corporation
13 *
14 * This code is released under the GNU General Public License (GPL)
15 *
16 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
17 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
19 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
20 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
21 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
22 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
24 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
26 * OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29#define VERSION(ver,rel,seq) (((ver)<<16) | ((rel)<<8) | (seq))
30#if defined(__i386__)
31# define BREAKPOINT() asm(" int $3");
32#else
33# define BREAKPOINT() { }
34#endif
35
36#define MAX_DEVICE_COUNT 4
37
38#include <linux/module.h>
39#include <linux/errno.h>
40#include <linux/signal.h>
41#include <linux/sched.h>
42#include <linux/timer.h>
43#include <linux/time.h>
44#include <linux/interrupt.h>
45#include <linux/tty.h>
46#include <linux/tty_flip.h>
47#include <linux/serial.h>
48#include <linux/major.h>
49#include <linux/string.h>
50#include <linux/fcntl.h>
51#include <linux/ptrace.h>
52#include <linux/ioport.h>
53#include <linux/mm.h>
54#include <linux/seq_file.h>
55#include <linux/slab.h>
56#include <linux/netdevice.h>
57#include <linux/vmalloc.h>
58#include <linux/init.h>
59#include <linux/delay.h>
60#include <linux/ioctl.h>
61#include <linux/synclink.h>
62
63#include <asm/system.h>
64#include <asm/io.h>
65#include <asm/irq.h>
66#include <asm/dma.h>
67#include <linux/bitops.h>
68#include <asm/types.h>
69#include <linux/termios.h>
70#include <linux/workqueue.h>
71#include <linux/hdlc.h>
72
73#include <pcmcia/cistpl.h>
74#include <pcmcia/cisreg.h>
75#include <pcmcia/ds.h>
76
77#if defined(CONFIG_HDLC) || (defined(CONFIG_HDLC_MODULE) && defined(CONFIG_SYNCLINK_CS_MODULE))
78#define SYNCLINK_GENERIC_HDLC 1
79#else
80#define SYNCLINK_GENERIC_HDLC 0
81#endif
82
83#define GET_USER(error,value,addr) error = get_user(value,addr)
84#define COPY_FROM_USER(error,dest,src,size) error = copy_from_user(dest,src,size) ? -EFAULT : 0
85#define PUT_USER(error,value,addr) error = put_user(value,addr)
86#define COPY_TO_USER(error,dest,src,size) error = copy_to_user(dest,src,size) ? -EFAULT : 0
87
88#include <asm/uaccess.h>
89
90static MGSL_PARAMS default_params = {
91 MGSL_MODE_HDLC, /* unsigned long mode */
92 0, /* unsigned char loopback; */
93 HDLC_FLAG_UNDERRUN_ABORT15, /* unsigned short flags; */
94 HDLC_ENCODING_NRZI_SPACE, /* unsigned char encoding; */
95 0, /* unsigned long clock_speed; */
96 0xff, /* unsigned char addr_filter; */
97 HDLC_CRC_16_CCITT, /* unsigned short crc_type; */
98 HDLC_PREAMBLE_LENGTH_8BITS, /* unsigned char preamble_length; */
99 HDLC_PREAMBLE_PATTERN_NONE, /* unsigned char preamble; */
100 9600, /* unsigned long data_rate; */
101 8, /* unsigned char data_bits; */
102 1, /* unsigned char stop_bits; */
103 ASYNC_PARITY_NONE /* unsigned char parity; */
104};
105
106typedef struct
107{
108 int count;
109 unsigned char status;
110 char data[1];
111} RXBUF;
112
113/* The queue of BH actions to be performed */
114
115#define BH_RECEIVE 1
116#define BH_TRANSMIT 2
117#define BH_STATUS 4
118
119#define IO_PIN_SHUTDOWN_LIMIT 100
120
121#define RELEVANT_IFLAG(iflag) (iflag & (IGNBRK|BRKINT|IGNPAR|PARMRK|INPCK))
122
123struct _input_signal_events {
124 int ri_up;
125 int ri_down;
126 int dsr_up;
127 int dsr_down;
128 int dcd_up;
129 int dcd_down;
130 int cts_up;
131 int cts_down;
132};
133
134
135/*
136 * Device instance data structure
137 */
138
139typedef struct _mgslpc_info {
140 struct tty_port port;
141 void *if_ptr; /* General purpose pointer (used by SPPP) */
142 int magic;
143 int line;
144
145 struct mgsl_icount icount;
146
147 int timeout;
148 int x_char; /* xon/xoff character */
149 unsigned char read_status_mask;
150 unsigned char ignore_status_mask;
151
152 unsigned char *tx_buf;
153 int tx_put;
154 int tx_get;
155 int tx_count;
156
157 /* circular list of fixed length rx buffers */
158
159 unsigned char *rx_buf; /* memory allocated for all rx buffers */
160 int rx_buf_total_size; /* size of memory allocated for rx buffers */
161 int rx_put; /* index of next empty rx buffer */
162 int rx_get; /* index of next full rx buffer */
163 int rx_buf_size; /* size in bytes of single rx buffer */
164 int rx_buf_count; /* total number of rx buffers */
165 int rx_frame_count; /* number of full rx buffers */
166
167 wait_queue_head_t status_event_wait_q;
168 wait_queue_head_t event_wait_q;
169 struct timer_list tx_timer; /* HDLC transmit timeout timer */
170 struct _mgslpc_info *next_device; /* device list link */
171
172 unsigned short imra_value;
173 unsigned short imrb_value;
174 unsigned char pim_value;
175
176 spinlock_t lock;
177 struct work_struct task; /* task structure for scheduling bh */
178
179 u32 max_frame_size;
180
181 u32 pending_bh;
182
183 bool bh_running;
184 bool bh_requested;
185
186 int dcd_chkcount; /* check counts to prevent */
187 int cts_chkcount; /* too many IRQs if a signal */
188 int dsr_chkcount; /* is floating */
189 int ri_chkcount;
190
191 bool rx_enabled;
192 bool rx_overflow;
193
194 bool tx_enabled;
195 bool tx_active;
196 bool tx_aborting;
197 u32 idle_mode;
198
199 int if_mode; /* serial interface selection (RS-232, v.35 etc) */
200
201 char device_name[25]; /* device instance name */
202
203 unsigned int io_base; /* base I/O address of adapter */
204 unsigned int irq_level;
205
206 MGSL_PARAMS params; /* communications parameters */
207
208 unsigned char serial_signals; /* current serial signal states */
209
210 bool irq_occurred; /* for diagnostics use */
211 char testing_irq;
212 unsigned int init_error; /* startup error (DIAGS) */
213
214 char flag_buf[MAX_ASYNC_BUFFER_SIZE];
215 bool drop_rts_on_tx_done;
216
217 struct _input_signal_events input_signal_events;
218
219 /* PCMCIA support */
220 struct pcmcia_device *p_dev;
221 int stop;
222
223 /* SPPP/Cisco HDLC device parts */
224 int netcount;
225 spinlock_t netlock;
226
227#if SYNCLINK_GENERIC_HDLC
228 struct net_device *netdev;
229#endif
230
231} MGSLPC_INFO;
232
233#define MGSLPC_MAGIC 0x5402
234
235/*
236 * The size of the serial xmit buffer is 1 page, or 4096 bytes
237 */
238#define TXBUFSIZE 4096
239
240
241#define CHA 0x00 /* channel A offset */
242#define CHB 0x40 /* channel B offset */
243
244/*
245 * FIXME: PPC has PVR defined in asm/reg.h. For now we just undef it.
246 */
247#undef PVR
248
249#define RXFIFO 0
250#define TXFIFO 0
251#define STAR 0x20
252#define CMDR 0x20
253#define RSTA 0x21
254#define PRE 0x21
255#define MODE 0x22
256#define TIMR 0x23
257#define XAD1 0x24
258#define XAD2 0x25
259#define RAH1 0x26
260#define RAH2 0x27
261#define DAFO 0x27
262#define RAL1 0x28
263#define RFC 0x28
264#define RHCR 0x29
265#define RAL2 0x29
266#define RBCL 0x2a
267#define XBCL 0x2a
268#define RBCH 0x2b
269#define XBCH 0x2b
270#define CCR0 0x2c
271#define CCR1 0x2d
272#define CCR2 0x2e
273#define CCR3 0x2f
274#define VSTR 0x34
275#define BGR 0x34
276#define RLCR 0x35
277#define AML 0x36
278#define AMH 0x37
279#define GIS 0x38
280#define IVA 0x38
281#define IPC 0x39
282#define ISR 0x3a
283#define IMR 0x3a
284#define PVR 0x3c
285#define PIS 0x3d
286#define PIM 0x3d
287#define PCR 0x3e
288#define CCR4 0x3f
289
290// IMR/ISR
291
292#define IRQ_BREAK_ON BIT15 // rx break detected
293#define IRQ_DATAOVERRUN BIT14 // receive data overflow
294#define IRQ_ALLSENT BIT13 // all sent
295#define IRQ_UNDERRUN BIT12 // transmit data underrun
296#define IRQ_TIMER BIT11 // timer interrupt
297#define IRQ_CTS BIT10 // CTS status change
298#define IRQ_TXREPEAT BIT9 // tx message repeat
299#define IRQ_TXFIFO BIT8 // transmit pool ready
300#define IRQ_RXEOM BIT7 // receive message end
301#define IRQ_EXITHUNT BIT6 // receive frame start
302#define IRQ_RXTIME BIT6 // rx char timeout
303#define IRQ_DCD BIT2 // carrier detect status change
304#define IRQ_OVERRUN BIT1 // receive frame overflow
305#define IRQ_RXFIFO BIT0 // receive pool full
306
307// STAR
308
309#define XFW BIT6 // transmit FIFO write enable
310#define CEC BIT2 // command executing
311#define CTS BIT1 // CTS state
312
313#define PVR_DTR BIT0
314#define PVR_DSR BIT1
315#define PVR_RI BIT2
316#define PVR_AUTOCTS BIT3
317#define PVR_RS232 0x20 /* 0010b */
318#define PVR_V35 0xe0 /* 1110b */
319#define PVR_RS422 0x40 /* 0100b */
320
321/* Register access functions */
322
323#define write_reg(info, reg, val) outb((val),(info)->io_base + (reg))
324#define read_reg(info, reg) inb((info)->io_base + (reg))
325
326#define read_reg16(info, reg) inw((info)->io_base + (reg))
327#define write_reg16(info, reg, val) outw((val), (info)->io_base + (reg))
328
329#define set_reg_bits(info, reg, mask) \
330 write_reg(info, (reg), \
331 (unsigned char) (read_reg(info, (reg)) | (mask)))
332#define clear_reg_bits(info, reg, mask) \
333 write_reg(info, (reg), \
334 (unsigned char) (read_reg(info, (reg)) & ~(mask)))
335/*
336 * interrupt enable/disable routines
337 */
338static void irq_disable(MGSLPC_INFO *info, unsigned char channel, unsigned short mask)
339{
340 if (channel == CHA) {
341 info->imra_value |= mask;
342 write_reg16(info, CHA + IMR, info->imra_value);
343 } else {
344 info->imrb_value |= mask;
345 write_reg16(info, CHB + IMR, info->imrb_value);
346 }
347}
348static void irq_enable(MGSLPC_INFO *info, unsigned char channel, unsigned short mask)
349{
350 if (channel == CHA) {
351 info->imra_value &= ~mask;
352 write_reg16(info, CHA + IMR, info->imra_value);
353 } else {
354 info->imrb_value &= ~mask;
355 write_reg16(info, CHB + IMR, info->imrb_value);
356 }
357}
358
359#define port_irq_disable(info, mask) \
360 { info->pim_value |= (mask); write_reg(info, PIM, info->pim_value); }
361
362#define port_irq_enable(info, mask) \
363 { info->pim_value &= ~(mask); write_reg(info, PIM, info->pim_value); }
364
365static void rx_start(MGSLPC_INFO *info);
366static void rx_stop(MGSLPC_INFO *info);
367
368static void tx_start(MGSLPC_INFO *info, struct tty_struct *tty);
369static void tx_stop(MGSLPC_INFO *info);
370static void tx_set_idle(MGSLPC_INFO *info);
371
372static void get_signals(MGSLPC_INFO *info);
373static void set_signals(MGSLPC_INFO *info);
374
375static void reset_device(MGSLPC_INFO *info);
376
377static void hdlc_mode(MGSLPC_INFO *info);
378static void async_mode(MGSLPC_INFO *info);
379
380static void tx_timeout(unsigned long context);
381
382static int carrier_raised(struct tty_port *port);
383static void dtr_rts(struct tty_port *port, int onoff);
384
385#if SYNCLINK_GENERIC_HDLC
386#define dev_to_port(D) (dev_to_hdlc(D)->priv)
387static void hdlcdev_tx_done(MGSLPC_INFO *info);
388static void hdlcdev_rx(MGSLPC_INFO *info, char *buf, int size);
389static int hdlcdev_init(MGSLPC_INFO *info);
390static void hdlcdev_exit(MGSLPC_INFO *info);
391#endif
392
393static void trace_block(MGSLPC_INFO *info,const char* data, int count, int xmit);
394
395static bool register_test(MGSLPC_INFO *info);
396static bool irq_test(MGSLPC_INFO *info);
397static int adapter_test(MGSLPC_INFO *info);
398
399static int claim_resources(MGSLPC_INFO *info);
400static void release_resources(MGSLPC_INFO *info);
401static void mgslpc_add_device(MGSLPC_INFO *info);
402static void mgslpc_remove_device(MGSLPC_INFO *info);
403
404static bool rx_get_frame(MGSLPC_INFO *info, struct tty_struct *tty);
405static void rx_reset_buffers(MGSLPC_INFO *info);
406static int rx_alloc_buffers(MGSLPC_INFO *info);
407static void rx_free_buffers(MGSLPC_INFO *info);
408
409static irqreturn_t mgslpc_isr(int irq, void *dev_id);
410
411/*
412 * Bottom half interrupt handlers
413 */
414static void bh_handler(struct work_struct *work);
415static void bh_transmit(MGSLPC_INFO *info, struct tty_struct *tty);
416static void bh_status(MGSLPC_INFO *info);
417
418/*
419 * ioctl handlers
420 */
421static int tiocmget(struct tty_struct *tty);
422static int tiocmset(struct tty_struct *tty,
423 unsigned int set, unsigned int clear);
424static int get_stats(MGSLPC_INFO *info, struct mgsl_icount __user *user_icount);
425static int get_params(MGSLPC_INFO *info, MGSL_PARAMS __user *user_params);
426static int set_params(MGSLPC_INFO *info, MGSL_PARAMS __user *new_params, struct tty_struct *tty);
427static int get_txidle(MGSLPC_INFO *info, int __user *idle_mode);
428static int set_txidle(MGSLPC_INFO *info, int idle_mode);
429static int set_txenable(MGSLPC_INFO *info, int enable, struct tty_struct *tty);
430static int tx_abort(MGSLPC_INFO *info);
431static int set_rxenable(MGSLPC_INFO *info, int enable);
432static int wait_events(MGSLPC_INFO *info, int __user *mask);
433
434static MGSLPC_INFO *mgslpc_device_list = NULL;
435static int mgslpc_device_count = 0;
436
437/*
438 * Set this param to non-zero to load eax with the
439 * .text section address and breakpoint on module load.
440 * This is useful for use with gdb and add-symbol-file command.
441 */
442static int break_on_load=0;
443
444/*
445 * Driver major number, defaults to zero to get auto
446 * assigned major number. May be forced as module parameter.
447 */
448static int ttymajor=0;
449
450static int debug_level = 0;
451static int maxframe[MAX_DEVICE_COUNT] = {0,};
452
453module_param(break_on_load, bool, 0);
454module_param(ttymajor, int, 0);
455module_param(debug_level, int, 0);
456module_param_array(maxframe, int, NULL, 0);
457
458MODULE_LICENSE("GPL");
459
460static char *driver_name = "SyncLink PC Card driver";
461static char *driver_version = "$Revision: 4.34 $";
462
463static struct tty_driver *serial_driver;
464
465/* number of characters left in xmit buffer before we ask for more */
466#define WAKEUP_CHARS 256
467
468static void mgslpc_change_params(MGSLPC_INFO *info, struct tty_struct *tty);
469static void mgslpc_wait_until_sent(struct tty_struct *tty, int timeout);
470
471/* PCMCIA prototypes */
472
473static int mgslpc_config(struct pcmcia_device *link);
474static void mgslpc_release(u_long arg);
475static void mgslpc_detach(struct pcmcia_device *p_dev);
476
477/*
478 * 1st function defined in .text section. Calling this function in
479 * init_module() followed by a breakpoint allows a remote debugger
480 * (gdb) to get the .text address for the add-symbol-file command.
481 * This allows remote debugging of dynamically loadable modules.
482 */
483static void* mgslpc_get_text_ptr(void)
484{
485 return mgslpc_get_text_ptr;
486}
487
488/**
489 * line discipline callback wrappers
490 *
491 * The wrappers maintain line discipline references
492 * while calling into the line discipline.
493 *
494 * ldisc_receive_buf - pass receive data to line discipline
495 */
496
497static void ldisc_receive_buf(struct tty_struct *tty,
498 const __u8 *data, char *flags, int count)
499{
500 struct tty_ldisc *ld;
501 if (!tty)
502 return;
503 ld = tty_ldisc_ref(tty);
504 if (ld) {
505 if (ld->ops->receive_buf)
506 ld->ops->receive_buf(tty, data, flags, count);
507 tty_ldisc_deref(ld);
508 }
509}
510
511static const struct tty_port_operations mgslpc_port_ops = {
512 .carrier_raised = carrier_raised,
513 .dtr_rts = dtr_rts
514};
515
516static int mgslpc_probe(struct pcmcia_device *link)
517{
518 MGSLPC_INFO *info;
519 int ret;
520
521 if (debug_level >= DEBUG_LEVEL_INFO)
522 printk("mgslpc_attach\n");
523
524 info = kzalloc(sizeof(MGSLPC_INFO), GFP_KERNEL);
525 if (!info) {
526 printk("Error can't allocate device instance data\n");
527 return -ENOMEM;
528 }
529
530 info->magic = MGSLPC_MAGIC;
531 tty_port_init(&info->port);
532 info->port.ops = &mgslpc_port_ops;
533 INIT_WORK(&info->task, bh_handler);
534 info->max_frame_size = 4096;
535 info->port.close_delay = 5*HZ/10;
536 info->port.closing_wait = 30*HZ;
537 init_waitqueue_head(&info->status_event_wait_q);
538 init_waitqueue_head(&info->event_wait_q);
539 spin_lock_init(&info->lock);
540 spin_lock_init(&info->netlock);
541 memcpy(&info->params,&default_params,sizeof(MGSL_PARAMS));
542 info->idle_mode = HDLC_TXIDLE_FLAGS;
543 info->imra_value = 0xffff;
544 info->imrb_value = 0xffff;
545 info->pim_value = 0xff;
546
547 info->p_dev = link;
548 link->priv = info;
549
550 /* Initialize the struct pcmcia_device structure */
551
552 ret = mgslpc_config(link);
553 if (ret)
554 return ret;
555
556 mgslpc_add_device(info);
557
558 return 0;
559}
560
561/* Card has been inserted.
562 */
563
564static int mgslpc_ioprobe(struct pcmcia_device *p_dev, void *priv_data)
565{
566 return pcmcia_request_io(p_dev);
567}
568
569static int mgslpc_config(struct pcmcia_device *link)
570{
571 MGSLPC_INFO *info = link->priv;
572 int ret;
573
574 if (debug_level >= DEBUG_LEVEL_INFO)
575 printk("mgslpc_config(0x%p)\n", link);
576
577 link->config_flags |= CONF_ENABLE_IRQ | CONF_AUTO_SET_IO;
578
579 ret = pcmcia_loop_config(link, mgslpc_ioprobe, NULL);
580 if (ret != 0)
581 goto failed;
582
583 link->config_index = 8;
584 link->config_regs = PRESENT_OPTION;
585
586 ret = pcmcia_request_irq(link, mgslpc_isr);
587 if (ret)
588 goto failed;
589 ret = pcmcia_enable_device(link);
590 if (ret)
591 goto failed;
592
593 info->io_base = link->resource[0]->start;
594 info->irq_level = link->irq;
595 return 0;
596
597failed:
598 mgslpc_release((u_long)link);
599 return -ENODEV;
600}
601
602/* Card has been removed.
603 * Unregister device and release PCMCIA configuration.
604 * If device is open, postpone until it is closed.
605 */
606static void mgslpc_release(u_long arg)
607{
608 struct pcmcia_device *link = (struct pcmcia_device *)arg;
609
610 if (debug_level >= DEBUG_LEVEL_INFO)
611 printk("mgslpc_release(0x%p)\n", link);
612
613 pcmcia_disable_device(link);
614}
615
616static void mgslpc_detach(struct pcmcia_device *link)
617{
618 if (debug_level >= DEBUG_LEVEL_INFO)
619 printk("mgslpc_detach(0x%p)\n", link);
620
621 ((MGSLPC_INFO *)link->priv)->stop = 1;
622 mgslpc_release((u_long)link);
623
624 mgslpc_remove_device((MGSLPC_INFO *)link->priv);
625}
626
627static int mgslpc_suspend(struct pcmcia_device *link)
628{
629 MGSLPC_INFO *info = link->priv;
630
631 info->stop = 1;
632
633 return 0;
634}
635
636static int mgslpc_resume(struct pcmcia_device *link)
637{
638 MGSLPC_INFO *info = link->priv;
639
640 info->stop = 0;
641
642 return 0;
643}
644
645
646static inline bool mgslpc_paranoia_check(MGSLPC_INFO *info,
647 char *name, const char *routine)
648{
649#ifdef MGSLPC_PARANOIA_CHECK
650 static const char *badmagic =
651 "Warning: bad magic number for mgsl struct (%s) in %s\n";
652 static const char *badinfo =
653 "Warning: null mgslpc_info for (%s) in %s\n";
654
655 if (!info) {
656 printk(badinfo, name, routine);
657 return true;
658 }
659 if (info->magic != MGSLPC_MAGIC) {
660 printk(badmagic, name, routine);
661 return true;
662 }
663#else
664 if (!info)
665 return true;
666#endif
667 return false;
668}
669
670
671#define CMD_RXFIFO BIT7 // release current rx FIFO
672#define CMD_RXRESET BIT6 // receiver reset
673#define CMD_RXFIFO_READ BIT5
674#define CMD_START_TIMER BIT4
675#define CMD_TXFIFO BIT3 // release current tx FIFO
676#define CMD_TXEOM BIT1 // transmit end message
677#define CMD_TXRESET BIT0 // transmit reset
678
679static bool wait_command_complete(MGSLPC_INFO *info, unsigned char channel)
680{
681 int i = 0;
682 /* wait for command completion */
683 while (read_reg(info, (unsigned char)(channel+STAR)) & BIT2) {
684 udelay(1);
685 if (i++ == 1000)
686 return false;
687 }
688 return true;
689}
690
691static void issue_command(MGSLPC_INFO *info, unsigned char channel, unsigned char cmd)
692{
693 wait_command_complete(info, channel);
694 write_reg(info, (unsigned char) (channel + CMDR), cmd);
695}
696
697static void tx_pause(struct tty_struct *tty)
698{
699 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
700 unsigned long flags;
701
702 if (mgslpc_paranoia_check(info, tty->name, "tx_pause"))
703 return;
704 if (debug_level >= DEBUG_LEVEL_INFO)
705 printk("tx_pause(%s)\n",info->device_name);
706
707 spin_lock_irqsave(&info->lock,flags);
708 if (info->tx_enabled)
709 tx_stop(info);
710 spin_unlock_irqrestore(&info->lock,flags);
711}
712
713static void tx_release(struct tty_struct *tty)
714{
715 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
716 unsigned long flags;
717
718 if (mgslpc_paranoia_check(info, tty->name, "tx_release"))
719 return;
720 if (debug_level >= DEBUG_LEVEL_INFO)
721 printk("tx_release(%s)\n",info->device_name);
722
723 spin_lock_irqsave(&info->lock,flags);
724 if (!info->tx_enabled)
725 tx_start(info, tty);
726 spin_unlock_irqrestore(&info->lock,flags);
727}
728
729/* Return next bottom half action to perform.
730 * or 0 if nothing to do.
731 */
732static int bh_action(MGSLPC_INFO *info)
733{
734 unsigned long flags;
735 int rc = 0;
736
737 spin_lock_irqsave(&info->lock,flags);
738
739 if (info->pending_bh & BH_RECEIVE) {
740 info->pending_bh &= ~BH_RECEIVE;
741 rc = BH_RECEIVE;
742 } else if (info->pending_bh & BH_TRANSMIT) {
743 info->pending_bh &= ~BH_TRANSMIT;
744 rc = BH_TRANSMIT;
745 } else if (info->pending_bh & BH_STATUS) {
746 info->pending_bh &= ~BH_STATUS;
747 rc = BH_STATUS;
748 }
749
750 if (!rc) {
751 /* Mark BH routine as complete */
752 info->bh_running = false;
753 info->bh_requested = false;
754 }
755
756 spin_unlock_irqrestore(&info->lock,flags);
757
758 return rc;
759}
760
761static void bh_handler(struct work_struct *work)
762{
763 MGSLPC_INFO *info = container_of(work, MGSLPC_INFO, task);
764 struct tty_struct *tty;
765 int action;
766
767 if (!info)
768 return;
769
770 if (debug_level >= DEBUG_LEVEL_BH)
771 printk( "%s(%d):bh_handler(%s) entry\n",
772 __FILE__,__LINE__,info->device_name);
773
774 info->bh_running = true;
775 tty = tty_port_tty_get(&info->port);
776
777 while((action = bh_action(info)) != 0) {
778
779 /* Process work item */
780 if ( debug_level >= DEBUG_LEVEL_BH )
781 printk( "%s(%d):bh_handler() work item action=%d\n",
782 __FILE__,__LINE__,action);
783
784 switch (action) {
785
786 case BH_RECEIVE:
787 while(rx_get_frame(info, tty));
788 break;
789 case BH_TRANSMIT:
790 bh_transmit(info, tty);
791 break;
792 case BH_STATUS:
793 bh_status(info);
794 break;
795 default:
796 /* unknown work item ID */
797 printk("Unknown work item ID=%08X!\n", action);
798 break;
799 }
800 }
801
802 tty_kref_put(tty);
803 if (debug_level >= DEBUG_LEVEL_BH)
804 printk( "%s(%d):bh_handler(%s) exit\n",
805 __FILE__,__LINE__,info->device_name);
806}
807
808static void bh_transmit(MGSLPC_INFO *info, struct tty_struct *tty)
809{
810 if (debug_level >= DEBUG_LEVEL_BH)
811 printk("bh_transmit() entry on %s\n", info->device_name);
812
813 if (tty)
814 tty_wakeup(tty);
815}
816
817static void bh_status(MGSLPC_INFO *info)
818{
819 info->ri_chkcount = 0;
820 info->dsr_chkcount = 0;
821 info->dcd_chkcount = 0;
822 info->cts_chkcount = 0;
823}
824
825/* eom: non-zero = end of frame */
826static void rx_ready_hdlc(MGSLPC_INFO *info, int eom)
827{
828 unsigned char data[2];
829 unsigned char fifo_count, read_count, i;
830 RXBUF *buf = (RXBUF*)(info->rx_buf + (info->rx_put * info->rx_buf_size));
831
832 if (debug_level >= DEBUG_LEVEL_ISR)
833 printk("%s(%d):rx_ready_hdlc(eom=%d)\n",__FILE__,__LINE__,eom);
834
835 if (!info->rx_enabled)
836 return;
837
838 if (info->rx_frame_count >= info->rx_buf_count) {
839 /* no more free buffers */
840 issue_command(info, CHA, CMD_RXRESET);
841 info->pending_bh |= BH_RECEIVE;
842 info->rx_overflow = true;
843 info->icount.buf_overrun++;
844 return;
845 }
846
847 if (eom) {
848 /* end of frame, get FIFO count from RBCL register */
849 if (!(fifo_count = (unsigned char)(read_reg(info, CHA+RBCL) & 0x1f)))
850 fifo_count = 32;
851 } else
852 fifo_count = 32;
853
854 do {
855 if (fifo_count == 1) {
856 read_count = 1;
857 data[0] = read_reg(info, CHA + RXFIFO);
858 } else {
859 read_count = 2;
860 *((unsigned short *) data) = read_reg16(info, CHA + RXFIFO);
861 }
862 fifo_count -= read_count;
863 if (!fifo_count && eom)
864 buf->status = data[--read_count];
865
866 for (i = 0; i < read_count; i++) {
867 if (buf->count >= info->max_frame_size) {
868 /* frame too large, reset receiver and reset current buffer */
869 issue_command(info, CHA, CMD_RXRESET);
870 buf->count = 0;
871 return;
872 }
873 *(buf->data + buf->count) = data[i];
874 buf->count++;
875 }
876 } while (fifo_count);
877
878 if (eom) {
879 info->pending_bh |= BH_RECEIVE;
880 info->rx_frame_count++;
881 info->rx_put++;
882 if (info->rx_put >= info->rx_buf_count)
883 info->rx_put = 0;
884 }
885 issue_command(info, CHA, CMD_RXFIFO);
886}
887
888static void rx_ready_async(MGSLPC_INFO *info, int tcd, struct tty_struct *tty)
889{
890 unsigned char data, status, flag;
891 int fifo_count;
892 int work = 0;
893 struct mgsl_icount *icount = &info->icount;
894
895 if (tcd) {
896 /* early termination, get FIFO count from RBCL register */
897 fifo_count = (unsigned char)(read_reg(info, CHA+RBCL) & 0x1f);
898
899 /* Zero fifo count could mean 0 or 32 bytes available.
900 * If BIT5 of STAR is set then at least 1 byte is available.
901 */
902 if (!fifo_count && (read_reg(info,CHA+STAR) & BIT5))
903 fifo_count = 32;
904 } else
905 fifo_count = 32;
906
907 tty_buffer_request_room(tty, fifo_count);
908 /* Flush received async data to receive data buffer. */
909 while (fifo_count) {
910 data = read_reg(info, CHA + RXFIFO);
911 status = read_reg(info, CHA + RXFIFO);
912 fifo_count -= 2;
913
914 icount->rx++;
915 flag = TTY_NORMAL;
916
917 // if no frameing/crc error then save data
918 // BIT7:parity error
919 // BIT6:framing error
920
921 if (status & (BIT7 + BIT6)) {
922 if (status & BIT7)
923 icount->parity++;
924 else
925 icount->frame++;
926
927 /* discard char if tty control flags say so */
928 if (status & info->ignore_status_mask)
929 continue;
930
931 status &= info->read_status_mask;
932
933 if (status & BIT7)
934 flag = TTY_PARITY;
935 else if (status & BIT6)
936 flag = TTY_FRAME;
937 }
938 work += tty_insert_flip_char(tty, data, flag);
939 }
940 issue_command(info, CHA, CMD_RXFIFO);
941
942 if (debug_level >= DEBUG_LEVEL_ISR) {
943 printk("%s(%d):rx_ready_async",
944 __FILE__,__LINE__);
945 printk("%s(%d):rx=%d brk=%d parity=%d frame=%d overrun=%d\n",
946 __FILE__,__LINE__,icount->rx,icount->brk,
947 icount->parity,icount->frame,icount->overrun);
948 }
949
950 if (work)
951 tty_flip_buffer_push(tty);
952}
953
954
955static void tx_done(MGSLPC_INFO *info, struct tty_struct *tty)
956{
957 if (!info->tx_active)
958 return;
959
960 info->tx_active = false;
961 info->tx_aborting = false;
962
963 if (info->params.mode == MGSL_MODE_ASYNC)
964 return;
965
966 info->tx_count = info->tx_put = info->tx_get = 0;
967 del_timer(&info->tx_timer);
968
969 if (info->drop_rts_on_tx_done) {
970 get_signals(info);
971 if (info->serial_signals & SerialSignal_RTS) {
972 info->serial_signals &= ~SerialSignal_RTS;
973 set_signals(info);
974 }
975 info->drop_rts_on_tx_done = false;
976 }
977
978#if SYNCLINK_GENERIC_HDLC
979 if (info->netcount)
980 hdlcdev_tx_done(info);
981 else
982#endif
983 {
984 if (tty->stopped || tty->hw_stopped) {
985 tx_stop(info);
986 return;
987 }
988 info->pending_bh |= BH_TRANSMIT;
989 }
990}
991
992static void tx_ready(MGSLPC_INFO *info, struct tty_struct *tty)
993{
994 unsigned char fifo_count = 32;
995 int c;
996
997 if (debug_level >= DEBUG_LEVEL_ISR)
998 printk("%s(%d):tx_ready(%s)\n", __FILE__,__LINE__,info->device_name);
999
1000 if (info->params.mode == MGSL_MODE_HDLC) {
1001 if (!info->tx_active)
1002 return;
1003 } else {
1004 if (tty->stopped || tty->hw_stopped) {
1005 tx_stop(info);
1006 return;
1007 }
1008 if (!info->tx_count)
1009 info->tx_active = false;
1010 }
1011
1012 if (!info->tx_count)
1013 return;
1014
1015 while (info->tx_count && fifo_count) {
1016 c = min(2, min_t(int, fifo_count, min(info->tx_count, TXBUFSIZE - info->tx_get)));
1017
1018 if (c == 1) {
1019 write_reg(info, CHA + TXFIFO, *(info->tx_buf + info->tx_get));
1020 } else {
1021 write_reg16(info, CHA + TXFIFO,
1022 *((unsigned short*)(info->tx_buf + info->tx_get)));
1023 }
1024 info->tx_count -= c;
1025 info->tx_get = (info->tx_get + c) & (TXBUFSIZE - 1);
1026 fifo_count -= c;
1027 }
1028
1029 if (info->params.mode == MGSL_MODE_ASYNC) {
1030 if (info->tx_count < WAKEUP_CHARS)
1031 info->pending_bh |= BH_TRANSMIT;
1032 issue_command(info, CHA, CMD_TXFIFO);
1033 } else {
1034 if (info->tx_count)
1035 issue_command(info, CHA, CMD_TXFIFO);
1036 else
1037 issue_command(info, CHA, CMD_TXFIFO + CMD_TXEOM);
1038 }
1039}
1040
1041static void cts_change(MGSLPC_INFO *info, struct tty_struct *tty)
1042{
1043 get_signals(info);
1044 if ((info->cts_chkcount)++ >= IO_PIN_SHUTDOWN_LIMIT)
1045 irq_disable(info, CHB, IRQ_CTS);
1046 info->icount.cts++;
1047 if (info->serial_signals & SerialSignal_CTS)
1048 info->input_signal_events.cts_up++;
1049 else
1050 info->input_signal_events.cts_down++;
1051 wake_up_interruptible(&info->status_event_wait_q);
1052 wake_up_interruptible(&info->event_wait_q);
1053
1054 if (info->port.flags & ASYNC_CTS_FLOW) {
1055 if (tty->hw_stopped) {
1056 if (info->serial_signals & SerialSignal_CTS) {
1057 if (debug_level >= DEBUG_LEVEL_ISR)
1058 printk("CTS tx start...");
1059 if (tty)
1060 tty->hw_stopped = 0;
1061 tx_start(info, tty);
1062 info->pending_bh |= BH_TRANSMIT;
1063 return;
1064 }
1065 } else {
1066 if (!(info->serial_signals & SerialSignal_CTS)) {
1067 if (debug_level >= DEBUG_LEVEL_ISR)
1068 printk("CTS tx stop...");
1069 if (tty)
1070 tty->hw_stopped = 1;
1071 tx_stop(info);
1072 }
1073 }
1074 }
1075 info->pending_bh |= BH_STATUS;
1076}
1077
1078static void dcd_change(MGSLPC_INFO *info, struct tty_struct *tty)
1079{
1080 get_signals(info);
1081 if ((info->dcd_chkcount)++ >= IO_PIN_SHUTDOWN_LIMIT)
1082 irq_disable(info, CHB, IRQ_DCD);
1083 info->icount.dcd++;
1084 if (info->serial_signals & SerialSignal_DCD) {
1085 info->input_signal_events.dcd_up++;
1086 }
1087 else
1088 info->input_signal_events.dcd_down++;
1089#if SYNCLINK_GENERIC_HDLC
1090 if (info->netcount) {
1091 if (info->serial_signals & SerialSignal_DCD)
1092 netif_carrier_on(info->netdev);
1093 else
1094 netif_carrier_off(info->netdev);
1095 }
1096#endif
1097 wake_up_interruptible(&info->status_event_wait_q);
1098 wake_up_interruptible(&info->event_wait_q);
1099
1100 if (info->port.flags & ASYNC_CHECK_CD) {
1101 if (debug_level >= DEBUG_LEVEL_ISR)
1102 printk("%s CD now %s...", info->device_name,
1103 (info->serial_signals & SerialSignal_DCD) ? "on" : "off");
1104 if (info->serial_signals & SerialSignal_DCD)
1105 wake_up_interruptible(&info->port.open_wait);
1106 else {
1107 if (debug_level >= DEBUG_LEVEL_ISR)
1108 printk("doing serial hangup...");
1109 if (tty)
1110 tty_hangup(tty);
1111 }
1112 }
1113 info->pending_bh |= BH_STATUS;
1114}
1115
1116static void dsr_change(MGSLPC_INFO *info)
1117{
1118 get_signals(info);
1119 if ((info->dsr_chkcount)++ >= IO_PIN_SHUTDOWN_LIMIT)
1120 port_irq_disable(info, PVR_DSR);
1121 info->icount.dsr++;
1122 if (info->serial_signals & SerialSignal_DSR)
1123 info->input_signal_events.dsr_up++;
1124 else
1125 info->input_signal_events.dsr_down++;
1126 wake_up_interruptible(&info->status_event_wait_q);
1127 wake_up_interruptible(&info->event_wait_q);
1128 info->pending_bh |= BH_STATUS;
1129}
1130
1131static void ri_change(MGSLPC_INFO *info)
1132{
1133 get_signals(info);
1134 if ((info->ri_chkcount)++ >= IO_PIN_SHUTDOWN_LIMIT)
1135 port_irq_disable(info, PVR_RI);
1136 info->icount.rng++;
1137 if (info->serial_signals & SerialSignal_RI)
1138 info->input_signal_events.ri_up++;
1139 else
1140 info->input_signal_events.ri_down++;
1141 wake_up_interruptible(&info->status_event_wait_q);
1142 wake_up_interruptible(&info->event_wait_q);
1143 info->pending_bh |= BH_STATUS;
1144}
1145
1146/* Interrupt service routine entry point.
1147 *
1148 * Arguments:
1149 *
1150 * irq interrupt number that caused interrupt
1151 * dev_id device ID supplied during interrupt registration
1152 */
1153static irqreturn_t mgslpc_isr(int dummy, void *dev_id)
1154{
1155 MGSLPC_INFO *info = dev_id;
1156 struct tty_struct *tty;
1157 unsigned short isr;
1158 unsigned char gis, pis;
1159 int count=0;
1160
1161 if (debug_level >= DEBUG_LEVEL_ISR)
1162 printk("mgslpc_isr(%d) entry.\n", info->irq_level);
1163
1164 if (!(info->p_dev->_locked))
1165 return IRQ_HANDLED;
1166
1167 tty = tty_port_tty_get(&info->port);
1168
1169 spin_lock(&info->lock);
1170
1171 while ((gis = read_reg(info, CHA + GIS))) {
1172 if (debug_level >= DEBUG_LEVEL_ISR)
1173 printk("mgslpc_isr %s gis=%04X\n", info->device_name,gis);
1174
1175 if ((gis & 0x70) || count > 1000) {
1176 printk("synclink_cs:hardware failed or ejected\n");
1177 break;
1178 }
1179 count++;
1180
1181 if (gis & (BIT1 + BIT0)) {
1182 isr = read_reg16(info, CHB + ISR);
1183 if (isr & IRQ_DCD)
1184 dcd_change(info, tty);
1185 if (isr & IRQ_CTS)
1186 cts_change(info, tty);
1187 }
1188 if (gis & (BIT3 + BIT2))
1189 {
1190 isr = read_reg16(info, CHA + ISR);
1191 if (isr & IRQ_TIMER) {
1192 info->irq_occurred = true;
1193 irq_disable(info, CHA, IRQ_TIMER);
1194 }
1195
1196 /* receive IRQs */
1197 if (isr & IRQ_EXITHUNT) {
1198 info->icount.exithunt++;
1199 wake_up_interruptible(&info->event_wait_q);
1200 }
1201 if (isr & IRQ_BREAK_ON) {
1202 info->icount.brk++;
1203 if (info->port.flags & ASYNC_SAK)
1204 do_SAK(tty);
1205 }
1206 if (isr & IRQ_RXTIME) {
1207 issue_command(info, CHA, CMD_RXFIFO_READ);
1208 }
1209 if (isr & (IRQ_RXEOM + IRQ_RXFIFO)) {
1210 if (info->params.mode == MGSL_MODE_HDLC)
1211 rx_ready_hdlc(info, isr & IRQ_RXEOM);
1212 else
1213 rx_ready_async(info, isr & IRQ_RXEOM, tty);
1214 }
1215
1216 /* transmit IRQs */
1217 if (isr & IRQ_UNDERRUN) {
1218 if (info->tx_aborting)
1219 info->icount.txabort++;
1220 else
1221 info->icount.txunder++;
1222 tx_done(info, tty);
1223 }
1224 else if (isr & IRQ_ALLSENT) {
1225 info->icount.txok++;
1226 tx_done(info, tty);
1227 }
1228 else if (isr & IRQ_TXFIFO)
1229 tx_ready(info, tty);
1230 }
1231 if (gis & BIT7) {
1232 pis = read_reg(info, CHA + PIS);
1233 if (pis & BIT1)
1234 dsr_change(info);
1235 if (pis & BIT2)
1236 ri_change(info);
1237 }
1238 }
1239
1240 /* Request bottom half processing if there's something
1241 * for it to do and the bh is not already running
1242 */
1243
1244 if (info->pending_bh && !info->bh_running && !info->bh_requested) {
1245 if ( debug_level >= DEBUG_LEVEL_ISR )
1246 printk("%s(%d):%s queueing bh task.\n",
1247 __FILE__,__LINE__,info->device_name);
1248 schedule_work(&info->task);
1249 info->bh_requested = true;
1250 }
1251
1252 spin_unlock(&info->lock);
1253 tty_kref_put(tty);
1254
1255 if (debug_level >= DEBUG_LEVEL_ISR)
1256 printk("%s(%d):mgslpc_isr(%d)exit.\n",
1257 __FILE__, __LINE__, info->irq_level);
1258
1259 return IRQ_HANDLED;
1260}
1261
1262/* Initialize and start device.
1263 */
1264static int startup(MGSLPC_INFO * info, struct tty_struct *tty)
1265{
1266 int retval = 0;
1267
1268 if (debug_level >= DEBUG_LEVEL_INFO)
1269 printk("%s(%d):startup(%s)\n",__FILE__,__LINE__,info->device_name);
1270
1271 if (info->port.flags & ASYNC_INITIALIZED)
1272 return 0;
1273
1274 if (!info->tx_buf) {
1275 /* allocate a page of memory for a transmit buffer */
1276 info->tx_buf = (unsigned char *)get_zeroed_page(GFP_KERNEL);
1277 if (!info->tx_buf) {
1278 printk(KERN_ERR"%s(%d):%s can't allocate transmit buffer\n",
1279 __FILE__,__LINE__,info->device_name);
1280 return -ENOMEM;
1281 }
1282 }
1283
1284 info->pending_bh = 0;
1285
1286 memset(&info->icount, 0, sizeof(info->icount));
1287
1288 setup_timer(&info->tx_timer, tx_timeout, (unsigned long)info);
1289
1290 /* Allocate and claim adapter resources */
1291 retval = claim_resources(info);
1292
1293 /* perform existence check and diagnostics */
1294 if ( !retval )
1295 retval = adapter_test(info);
1296
1297 if ( retval ) {
1298 if (capable(CAP_SYS_ADMIN) && tty)
1299 set_bit(TTY_IO_ERROR, &tty->flags);
1300 release_resources(info);
1301 return retval;
1302 }
1303
1304 /* program hardware for current parameters */
1305 mgslpc_change_params(info, tty);
1306
1307 if (tty)
1308 clear_bit(TTY_IO_ERROR, &tty->flags);
1309
1310 info->port.flags |= ASYNC_INITIALIZED;
1311
1312 return 0;
1313}
1314
1315/* Called by mgslpc_close() and mgslpc_hangup() to shutdown hardware
1316 */
1317static void shutdown(MGSLPC_INFO * info, struct tty_struct *tty)
1318{
1319 unsigned long flags;
1320
1321 if (!(info->port.flags & ASYNC_INITIALIZED))
1322 return;
1323
1324 if (debug_level >= DEBUG_LEVEL_INFO)
1325 printk("%s(%d):mgslpc_shutdown(%s)\n",
1326 __FILE__,__LINE__, info->device_name );
1327
1328 /* clear status wait queue because status changes */
1329 /* can't happen after shutting down the hardware */
1330 wake_up_interruptible(&info->status_event_wait_q);
1331 wake_up_interruptible(&info->event_wait_q);
1332
1333 del_timer_sync(&info->tx_timer);
1334
1335 if (info->tx_buf) {
1336 free_page((unsigned long) info->tx_buf);
1337 info->tx_buf = NULL;
1338 }
1339
1340 spin_lock_irqsave(&info->lock,flags);
1341
1342 rx_stop(info);
1343 tx_stop(info);
1344
1345 /* TODO:disable interrupts instead of reset to preserve signal states */
1346 reset_device(info);
1347
1348 if (!tty || tty->termios->c_cflag & HUPCL) {
1349 info->serial_signals &= ~(SerialSignal_DTR + SerialSignal_RTS);
1350 set_signals(info);
1351 }
1352
1353 spin_unlock_irqrestore(&info->lock,flags);
1354
1355 release_resources(info);
1356
1357 if (tty)
1358 set_bit(TTY_IO_ERROR, &tty->flags);
1359
1360 info->port.flags &= ~ASYNC_INITIALIZED;
1361}
1362
1363static void mgslpc_program_hw(MGSLPC_INFO *info, struct tty_struct *tty)
1364{
1365 unsigned long flags;
1366
1367 spin_lock_irqsave(&info->lock,flags);
1368
1369 rx_stop(info);
1370 tx_stop(info);
1371 info->tx_count = info->tx_put = info->tx_get = 0;
1372
1373 if (info->params.mode == MGSL_MODE_HDLC || info->netcount)
1374 hdlc_mode(info);
1375 else
1376 async_mode(info);
1377
1378 set_signals(info);
1379
1380 info->dcd_chkcount = 0;
1381 info->cts_chkcount = 0;
1382 info->ri_chkcount = 0;
1383 info->dsr_chkcount = 0;
1384
1385 irq_enable(info, CHB, IRQ_DCD | IRQ_CTS);
1386 port_irq_enable(info, (unsigned char) PVR_DSR | PVR_RI);
1387 get_signals(info);
1388
1389 if (info->netcount || (tty && (tty->termios->c_cflag & CREAD)))
1390 rx_start(info);
1391
1392 spin_unlock_irqrestore(&info->lock,flags);
1393}
1394
1395/* Reconfigure adapter based on new parameters
1396 */
1397static void mgslpc_change_params(MGSLPC_INFO *info, struct tty_struct *tty)
1398{
1399 unsigned cflag;
1400 int bits_per_char;
1401
1402 if (!tty || !tty->termios)
1403 return;
1404
1405 if (debug_level >= DEBUG_LEVEL_INFO)
1406 printk("%s(%d):mgslpc_change_params(%s)\n",
1407 __FILE__,__LINE__, info->device_name );
1408
1409 cflag = tty->termios->c_cflag;
1410
1411 /* if B0 rate (hangup) specified then negate DTR and RTS */
1412 /* otherwise assert DTR and RTS */
1413 if (cflag & CBAUD)
1414 info->serial_signals |= SerialSignal_RTS + SerialSignal_DTR;
1415 else
1416 info->serial_signals &= ~(SerialSignal_RTS + SerialSignal_DTR);
1417
1418 /* byte size and parity */
1419
1420 switch (cflag & CSIZE) {
1421 case CS5: info->params.data_bits = 5; break;
1422 case CS6: info->params.data_bits = 6; break;
1423 case CS7: info->params.data_bits = 7; break;
1424 case CS8: info->params.data_bits = 8; break;
1425 default: info->params.data_bits = 7; break;
1426 }
1427
1428 if (cflag & CSTOPB)
1429 info->params.stop_bits = 2;
1430 else
1431 info->params.stop_bits = 1;
1432
1433 info->params.parity = ASYNC_PARITY_NONE;
1434 if (cflag & PARENB) {
1435 if (cflag & PARODD)
1436 info->params.parity = ASYNC_PARITY_ODD;
1437 else
1438 info->params.parity = ASYNC_PARITY_EVEN;
1439#ifdef CMSPAR
1440 if (cflag & CMSPAR)
1441 info->params.parity = ASYNC_PARITY_SPACE;
1442#endif
1443 }
1444
1445 /* calculate number of jiffies to transmit a full
1446 * FIFO (32 bytes) at specified data rate
1447 */
1448 bits_per_char = info->params.data_bits +
1449 info->params.stop_bits + 1;
1450
1451 /* if port data rate is set to 460800 or less then
1452 * allow tty settings to override, otherwise keep the
1453 * current data rate.
1454 */
1455 if (info->params.data_rate <= 460800) {
1456 info->params.data_rate = tty_get_baud_rate(tty);
1457 }
1458
1459 if ( info->params.data_rate ) {
1460 info->timeout = (32*HZ*bits_per_char) /
1461 info->params.data_rate;
1462 }
1463 info->timeout += HZ/50; /* Add .02 seconds of slop */
1464
1465 if (cflag & CRTSCTS)
1466 info->port.flags |= ASYNC_CTS_FLOW;
1467 else
1468 info->port.flags &= ~ASYNC_CTS_FLOW;
1469
1470 if (cflag & CLOCAL)
1471 info->port.flags &= ~ASYNC_CHECK_CD;
1472 else
1473 info->port.flags |= ASYNC_CHECK_CD;
1474
1475 /* process tty input control flags */
1476
1477 info->read_status_mask = 0;
1478 if (I_INPCK(tty))
1479 info->read_status_mask |= BIT7 | BIT6;
1480 if (I_IGNPAR(tty))
1481 info->ignore_status_mask |= BIT7 | BIT6;
1482
1483 mgslpc_program_hw(info, tty);
1484}
1485
1486/* Add a character to the transmit buffer
1487 */
1488static int mgslpc_put_char(struct tty_struct *tty, unsigned char ch)
1489{
1490 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
1491 unsigned long flags;
1492
1493 if (debug_level >= DEBUG_LEVEL_INFO) {
1494 printk( "%s(%d):mgslpc_put_char(%d) on %s\n",
1495 __FILE__,__LINE__,ch,info->device_name);
1496 }
1497
1498 if (mgslpc_paranoia_check(info, tty->name, "mgslpc_put_char"))
1499 return 0;
1500
1501 if (!info->tx_buf)
1502 return 0;
1503
1504 spin_lock_irqsave(&info->lock,flags);
1505
1506 if (info->params.mode == MGSL_MODE_ASYNC || !info->tx_active) {
1507 if (info->tx_count < TXBUFSIZE - 1) {
1508 info->tx_buf[info->tx_put++] = ch;
1509 info->tx_put &= TXBUFSIZE-1;
1510 info->tx_count++;
1511 }
1512 }
1513
1514 spin_unlock_irqrestore(&info->lock,flags);
1515 return 1;
1516}
1517
1518/* Enable transmitter so remaining characters in the
1519 * transmit buffer are sent.
1520 */
1521static void mgslpc_flush_chars(struct tty_struct *tty)
1522{
1523 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
1524 unsigned long flags;
1525
1526 if (debug_level >= DEBUG_LEVEL_INFO)
1527 printk( "%s(%d):mgslpc_flush_chars() entry on %s tx_count=%d\n",
1528 __FILE__,__LINE__,info->device_name,info->tx_count);
1529
1530 if (mgslpc_paranoia_check(info, tty->name, "mgslpc_flush_chars"))
1531 return;
1532
1533 if (info->tx_count <= 0 || tty->stopped ||
1534 tty->hw_stopped || !info->tx_buf)
1535 return;
1536
1537 if (debug_level >= DEBUG_LEVEL_INFO)
1538 printk( "%s(%d):mgslpc_flush_chars() entry on %s starting transmitter\n",
1539 __FILE__,__LINE__,info->device_name);
1540
1541 spin_lock_irqsave(&info->lock,flags);
1542 if (!info->tx_active)
1543 tx_start(info, tty);
1544 spin_unlock_irqrestore(&info->lock,flags);
1545}
1546
1547/* Send a block of data
1548 *
1549 * Arguments:
1550 *
1551 * tty pointer to tty information structure
1552 * buf pointer to buffer containing send data
1553 * count size of send data in bytes
1554 *
1555 * Returns: number of characters written
1556 */
1557static int mgslpc_write(struct tty_struct * tty,
1558 const unsigned char *buf, int count)
1559{
1560 int c, ret = 0;
1561 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
1562 unsigned long flags;
1563
1564 if (debug_level >= DEBUG_LEVEL_INFO)
1565 printk( "%s(%d):mgslpc_write(%s) count=%d\n",
1566 __FILE__,__LINE__,info->device_name,count);
1567
1568 if (mgslpc_paranoia_check(info, tty->name, "mgslpc_write") ||
1569 !info->tx_buf)
1570 goto cleanup;
1571
1572 if (info->params.mode == MGSL_MODE_HDLC) {
1573 if (count > TXBUFSIZE) {
1574 ret = -EIO;
1575 goto cleanup;
1576 }
1577 if (info->tx_active)
1578 goto cleanup;
1579 else if (info->tx_count)
1580 goto start;
1581 }
1582
1583 for (;;) {
1584 c = min(count,
1585 min(TXBUFSIZE - info->tx_count - 1,
1586 TXBUFSIZE - info->tx_put));
1587 if (c <= 0)
1588 break;
1589
1590 memcpy(info->tx_buf + info->tx_put, buf, c);
1591
1592 spin_lock_irqsave(&info->lock,flags);
1593 info->tx_put = (info->tx_put + c) & (TXBUFSIZE-1);
1594 info->tx_count += c;
1595 spin_unlock_irqrestore(&info->lock,flags);
1596
1597 buf += c;
1598 count -= c;
1599 ret += c;
1600 }
1601start:
1602 if (info->tx_count && !tty->stopped && !tty->hw_stopped) {
1603 spin_lock_irqsave(&info->lock,flags);
1604 if (!info->tx_active)
1605 tx_start(info, tty);
1606 spin_unlock_irqrestore(&info->lock,flags);
1607 }
1608cleanup:
1609 if (debug_level >= DEBUG_LEVEL_INFO)
1610 printk( "%s(%d):mgslpc_write(%s) returning=%d\n",
1611 __FILE__,__LINE__,info->device_name,ret);
1612 return ret;
1613}
1614
1615/* Return the count of free bytes in transmit buffer
1616 */
1617static int mgslpc_write_room(struct tty_struct *tty)
1618{
1619 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
1620 int ret;
1621
1622 if (mgslpc_paranoia_check(info, tty->name, "mgslpc_write_room"))
1623 return 0;
1624
1625 if (info->params.mode == MGSL_MODE_HDLC) {
1626 /* HDLC (frame oriented) mode */
1627 if (info->tx_active)
1628 return 0;
1629 else
1630 return HDLC_MAX_FRAME_SIZE;
1631 } else {
1632 ret = TXBUFSIZE - info->tx_count - 1;
1633 if (ret < 0)
1634 ret = 0;
1635 }
1636
1637 if (debug_level >= DEBUG_LEVEL_INFO)
1638 printk("%s(%d):mgslpc_write_room(%s)=%d\n",
1639 __FILE__,__LINE__, info->device_name, ret);
1640 return ret;
1641}
1642
1643/* Return the count of bytes in transmit buffer
1644 */
1645static int mgslpc_chars_in_buffer(struct tty_struct *tty)
1646{
1647 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
1648 int rc;
1649
1650 if (debug_level >= DEBUG_LEVEL_INFO)
1651 printk("%s(%d):mgslpc_chars_in_buffer(%s)\n",
1652 __FILE__,__LINE__, info->device_name );
1653
1654 if (mgslpc_paranoia_check(info, tty->name, "mgslpc_chars_in_buffer"))
1655 return 0;
1656
1657 if (info->params.mode == MGSL_MODE_HDLC)
1658 rc = info->tx_active ? info->max_frame_size : 0;
1659 else
1660 rc = info->tx_count;
1661
1662 if (debug_level >= DEBUG_LEVEL_INFO)
1663 printk("%s(%d):mgslpc_chars_in_buffer(%s)=%d\n",
1664 __FILE__,__LINE__, info->device_name, rc);
1665
1666 return rc;
1667}
1668
1669/* Discard all data in the send buffer
1670 */
1671static void mgslpc_flush_buffer(struct tty_struct *tty)
1672{
1673 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
1674 unsigned long flags;
1675
1676 if (debug_level >= DEBUG_LEVEL_INFO)
1677 printk("%s(%d):mgslpc_flush_buffer(%s) entry\n",
1678 __FILE__,__LINE__, info->device_name );
1679
1680 if (mgslpc_paranoia_check(info, tty->name, "mgslpc_flush_buffer"))
1681 return;
1682
1683 spin_lock_irqsave(&info->lock,flags);
1684 info->tx_count = info->tx_put = info->tx_get = 0;
1685 del_timer(&info->tx_timer);
1686 spin_unlock_irqrestore(&info->lock,flags);
1687
1688 wake_up_interruptible(&tty->write_wait);
1689 tty_wakeup(tty);
1690}
1691
1692/* Send a high-priority XON/XOFF character
1693 */
1694static void mgslpc_send_xchar(struct tty_struct *tty, char ch)
1695{
1696 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
1697 unsigned long flags;
1698
1699 if (debug_level >= DEBUG_LEVEL_INFO)
1700 printk("%s(%d):mgslpc_send_xchar(%s,%d)\n",
1701 __FILE__,__LINE__, info->device_name, ch );
1702
1703 if (mgslpc_paranoia_check(info, tty->name, "mgslpc_send_xchar"))
1704 return;
1705
1706 info->x_char = ch;
1707 if (ch) {
1708 spin_lock_irqsave(&info->lock,flags);
1709 if (!info->tx_enabled)
1710 tx_start(info, tty);
1711 spin_unlock_irqrestore(&info->lock,flags);
1712 }
1713}
1714
1715/* Signal remote device to throttle send data (our receive data)
1716 */
1717static void mgslpc_throttle(struct tty_struct * tty)
1718{
1719 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
1720 unsigned long flags;
1721
1722 if (debug_level >= DEBUG_LEVEL_INFO)
1723 printk("%s(%d):mgslpc_throttle(%s) entry\n",
1724 __FILE__,__LINE__, info->device_name );
1725
1726 if (mgslpc_paranoia_check(info, tty->name, "mgslpc_throttle"))
1727 return;
1728
1729 if (I_IXOFF(tty))
1730 mgslpc_send_xchar(tty, STOP_CHAR(tty));
1731
1732 if (tty->termios->c_cflag & CRTSCTS) {
1733 spin_lock_irqsave(&info->lock,flags);
1734 info->serial_signals &= ~SerialSignal_RTS;
1735 set_signals(info);
1736 spin_unlock_irqrestore(&info->lock,flags);
1737 }
1738}
1739
1740/* Signal remote device to stop throttling send data (our receive data)
1741 */
1742static void mgslpc_unthrottle(struct tty_struct * tty)
1743{
1744 MGSLPC_INFO *info = (MGSLPC_INFO *)tty->driver_data;
1745 unsigned long flags;
1746
1747 if (debug_level >= DEBUG_LEVEL_INFO)
1748 printk("%s(%d):mgslpc_unthrottle(%s) entry\n",
1749 __FILE__,__LINE__, info->device_name );
1750
1751 if (mgslpc_paranoia_check(info, tty->name, "mgslpc_unthrottle"))
1752 return;
1753
1754 if (I_IXOFF(tty)) {
1755 if (info->x_char)
1756 info->x_char = 0;
1757 else
1758 mgslpc_send_xchar(tty, START_CHAR(tty));
1759 }
1760
1761 if (tty->termios->c_cflag & CRTSCTS) {
1762 spin_lock_irqsave(&info->lock,flags);
1763 info->serial_signals |= SerialSignal_RTS;
1764 set_signals(info);
1765 spin_unlock_irqrestore(&info->lock,flags);
1766 }
1767}
1768
1769/* get the current serial statistics
1770 */
1771static int get_stats(MGSLPC_INFO * info, struct mgsl_icount __user *user_icount)
1772{
1773 int err;
1774 if (debug_level >= DEBUG_LEVEL_INFO)
1775 printk("get_params(%s)\n", info->device_name);
1776 if (!user_icount) {
1777 memset(&info->icount, 0, sizeof(info->icount));
1778 } else {
1779 COPY_TO_USER(err, user_icount, &info->icount, sizeof(struct mgsl_icount));
1780 if (err)
1781 return -EFAULT;
1782 }
1783 return 0;
1784}
1785
1786/* get the current serial parameters
1787 */
1788static int get_params(MGSLPC_INFO * info, MGSL_PARAMS __user *user_params)
1789{
1790 int err;
1791 if (debug_level >= DEBUG_LEVEL_INFO)
1792 printk("get_params(%s)\n", info->device_name);
1793 COPY_TO_USER(err,user_params, &info->params, sizeof(MGSL_PARAMS));
1794 if (err)
1795 return -EFAULT;
1796 return 0;
1797}
1798
1799/* set the serial parameters
1800 *
1801 * Arguments:
1802 *
1803 * info pointer to device instance data
1804 * new_params user buffer containing new serial params
1805 *
1806 * Returns: 0 if success, otherwise error code
1807 */
1808static int set_params(MGSLPC_INFO * info, MGSL_PARAMS __user *new_params, struct tty_struct *tty)
1809{
1810 unsigned long flags;
1811 MGSL_PARAMS tmp_params;
1812 int err;
1813
1814 if (debug_level >= DEBUG_LEVEL_INFO)
1815 printk("%s(%d):set_params %s\n", __FILE__,__LINE__,
1816 info->device_name );
1817 COPY_FROM_USER(err,&tmp_params, new_params, sizeof(MGSL_PARAMS));
1818 if (err) {
1819 if ( debug_level >= DEBUG_LEVEL_INFO )
1820 printk( "%s(%d):set_params(%s) user buffer copy failed\n",
1821 __FILE__,__LINE__,info->device_name);
1822 return -EFAULT;
1823 }
1824
1825 spin_lock_irqsave(&info->lock,flags);
1826 memcpy(&info->params,&tmp_params,sizeof(MGSL_PARAMS));
1827 spin_unlock_irqrestore(&info->lock,flags);
1828
1829 mgslpc_change_params(info, tty);
1830
1831 return 0;
1832}
1833
1834static int get_txidle(MGSLPC_INFO * info, int __user *idle_mode)
1835{
1836 int err;
1837 if (debug_level >= DEBUG_LEVEL_INFO)
1838 printk("get_txidle(%s)=%d\n", info->device_name, info->idle_mode);
1839 COPY_TO_USER(err,idle_mode, &info->idle_mode, sizeof(int));
1840 if (err)
1841 return -EFAULT;
1842 return 0;
1843}
1844
1845static int set_txidle(MGSLPC_INFO * info, int idle_mode)
1846{
1847 unsigned long flags;
1848 if (debug_level >= DEBUG_LEVEL_INFO)
1849 printk("set_txidle(%s,%d)\n", info->device_name, idle_mode);
1850 spin_lock_irqsave(&info->lock,flags);
1851 info->idle_mode = idle_mode;
1852 tx_set_idle(info);
1853 spin_unlock_irqrestore(&info->lock,flags);
1854 return 0;
1855}
1856
1857static int get_interface(MGSLPC_INFO * info, int __user *if_mode)
1858{
1859 int err;
1860 if (debug_level >= DEBUG_LEVEL_INFO)
1861 printk("get_interface(%s)=%d\n", info->device_name, info->if_mode);
1862 COPY_TO_USER(err,if_mode, &info->if_mode, sizeof(int));
1863 if (err)
1864 return -EFAULT;
1865 return 0;
1866}
1867
1868static int set_interface(MGSLPC_INFO * info, int if_mode)
1869{
1870 unsigned long flags;
1871 unsigned char val;
1872 if (debug_level >= DEBUG_LEVEL_INFO)
1873 printk("set_interface(%s,%d)\n", info->device_name, if_mode);
1874 spin_lock_irqsave(&info->lock,flags);
1875 info->if_mode = if_mode;
1876
1877 val = read_reg(info, PVR) & 0x0f;
1878 switch (info->if_mode)
1879 {
1880 case MGSL_INTERFACE_RS232: val |= PVR_RS232; break;
1881 case MGSL_INTERFACE_V35: val |= PVR_V35; break;
1882 case MGSL_INTERFACE_RS422: val |= PVR_RS422; break;
1883 }
1884 write_reg(info, PVR, val);
1885
1886 spin_unlock_irqrestore(&info->lock,flags);
1887 return 0;
1888}
1889
1890static int set_txenable(MGSLPC_INFO * info, int enable, struct tty_struct *tty)
1891{
1892 unsigned long flags;
1893
1894 if (debug_level >= DEBUG_LEVEL_INFO)
1895 printk("set_txenable(%s,%d)\n", info->device_name, enable);
1896
1897 spin_lock_irqsave(&info->lock,flags);
1898 if (enable) {
1899 if (!info->tx_enabled)
1900 tx_start(info, tty);
1901 } else {
1902 if (info->tx_enabled)
1903 tx_stop(info);
1904 }
1905 spin_unlock_irqrestore(&info->lock,flags);
1906 return 0;
1907}
1908
1909static int tx_abort(MGSLPC_INFO * info)
1910{
1911 unsigned long flags;
1912
1913 if (debug_level >= DEBUG_LEVEL_INFO)
1914 printk("tx_abort(%s)\n", info->device_name);
1915
1916 spin_lock_irqsave(&info->lock,flags);
1917 if (info->tx_active && info->tx_count &&
1918 info->params.mode == MGSL_MODE_HDLC) {
1919 /* clear data count so FIFO is not filled on next IRQ.
1920 * This results in underrun and abort transmission.
1921 */
1922 info->tx_count = info->tx_put = info->tx_get = 0;
1923 info->tx_aborting = true;
1924 }
1925 spin_unlock_irqrestore(&info->lock,flags);
1926 return 0;
1927}
1928
1929static int set_rxenable(MGSLPC_INFO * info, int enable)
1930{
1931 unsigned long flags;
1932
1933 if (debug_level >= DEBUG_LEVEL_INFO)
1934 printk("set_rxenable(%s,%d)\n", info->device_name, enable);
1935
1936 spin_lock_irqsave(&info->lock,flags);
1937 if (enable) {
1938 if (!info->rx_enabled)
1939 rx_start(info);
1940 } else {
1941 if (info->rx_enabled)
1942 rx_stop(info);
1943 }
1944 spin_unlock_irqrestore(&info->lock,flags);
1945 return 0;
1946}
1947
1948/* wait for specified event to occur
1949 *
1950 * Arguments: info pointer to device instance data
1951 * mask pointer to bitmask of events to wait for
1952 * Return Value: 0 if successful and bit mask updated with
1953 * of events triggerred,
1954 * otherwise error code
1955 */
1956static int wait_events(MGSLPC_INFO * info, int __user *mask_ptr)
1957{
1958 unsigned long flags;
1959 int s;
1960 int rc=0;
1961 struct mgsl_icount cprev, cnow;
1962 int events;
1963 int mask;
1964 struct _input_signal_events oldsigs, newsigs;
1965 DECLARE_WAITQUEUE(wait, current);
1966
1967 COPY_FROM_USER(rc,&mask, mask_ptr, sizeof(int));
1968 if (rc)
1969 return -EFAULT;
1970
1971 if …Large files files are truncated, but you can click here to view the full file