2 * linux/drivers/serial/pmac_zilog.c
4 * Driver for PowerMac Z85c30 based ESCC cell found in the
5 * "macio" ASICs of various PowerMac models
7 * Copyright (C) 2003 Ben. Herrenschmidt (benh@kernel.crashing.org)
9 * Derived from drivers/macintosh/macserial.c by Paul Mackerras
10 * and drivers/serial/sunzilog.c by David S. Miller
12 * Hrm... actually, I ripped most of sunzilog (Thanks David !) and
13 * adapted special tweaks needed for us. I don't think it's worth
14 * merging back those though. The DMA code still has to get in
15 * and once done, I expect that driver to remain fairly stable in
16 * the long term, unless we change the driver model again...
18 * This program is free software; you can redistribute it and/or modify
19 * it under the terms of the GNU General Public License as published by
20 * the Free Software Foundation; either version 2 of the License, or
21 * (at your option) any later version.
23 * This program is distributed in the hope that it will be useful,
24 * but WITHOUT ANY WARRANTY; without even the implied warranty of
25 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
26 * GNU General Public License for more details.
28 * You should have received a copy of the GNU General Public License
29 * along with this program; if not, write to the Free Software
30 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
32 * 2004-08-06 Harald Welte <laforge@gnumonks.org>
33 * - Enable BREAK interrupt
34 * - Add support for sysreq
36 * TODO: - Add DMA support
37 * - Defer port shutdown to a few seconds after close
38 * - maybe put something right into uap->clk_divisor
43 #undef USE_CTRL_O_SYSRQ
45 #include <linux/config.h>
46 #include <linux/module.h>
47 #include <linux/tty.h>
49 #include <linux/tty_flip.h>
50 #include <linux/major.h>
51 #include <linux/string.h>
52 #include <linux/fcntl.h>
54 #include <linux/kernel.h>
55 #include <linux/delay.h>
56 #include <linux/init.h>
57 #include <linux/console.h>
58 #include <linux/slab.h>
59 #include <linux/adb.h>
60 #include <linux/pmu.h>
61 #include <linux/bitops.h>
62 #include <linux/sysrq.h>
63 #include <asm/sections.h>
67 #include <asm/machdep.h>
68 #include <asm/pmac_feature.h>
69 #include <asm/dbdma.h>
70 #include <asm/macio.h>
71 #include <asm/semaphore.h>
73 #if defined (CONFIG_SERIAL_PMACZILOG_CONSOLE) && defined(CONFIG_MAGIC_SYSRQ)
77 #include <linux/serial.h>
78 #include <linux/serial_core.h>
80 #include "pmac_zilog.h"
82 /* Not yet implemented */
85 static char version
[] __initdata
= "pmac_zilog: 0.6 (Benjamin Herrenschmidt <benh@kernel.crashing.org>)";
86 MODULE_AUTHOR("Benjamin Herrenschmidt <benh@kernel.crashing.org>");
87 MODULE_DESCRIPTION("Driver for the PowerMac serial ports.");
88 MODULE_LICENSE("GPL");
90 #define PWRDBG(fmt, arg...) printk(KERN_DEBUG fmt , ## arg)
94 * For the sake of early serial console, we can do a pre-probe
95 * (optional) of the ports at rather early boot time.
97 static struct uart_pmac_port pmz_ports
[MAX_ZS_PORTS
];
98 static int pmz_ports_count
;
99 static DECLARE_MUTEX(pmz_irq_sem
);
101 static struct uart_driver pmz_uart_reg
= {
102 .owner
= THIS_MODULE
,
103 .driver_name
= "ttyS",
104 .devfs_name
= "tts/",
111 * Load all registers to reprogram the port
112 * This function must only be called when the TX is not busy. The UART
113 * port lock must be held and local interrupts disabled.
115 static void pmz_load_zsregs(struct uart_pmac_port
*uap
, u8
*regs
)
119 if (ZS_IS_ASLEEP(uap
))
122 /* Let pending transmits finish. */
123 for (i
= 0; i
< 1000; i
++) {
124 unsigned char stat
= read_zsreg(uap
, R1
);
136 /* Disable all interrupts. */
138 regs
[R1
] & ~(RxINT_MASK
| TxINT_ENAB
| EXT_INT_ENAB
));
140 /* Set parity, sync config, stop bits, and clock divisor. */
141 write_zsreg(uap
, R4
, regs
[R4
]);
143 /* Set misc. TX/RX control bits. */
144 write_zsreg(uap
, R10
, regs
[R10
]);
146 /* Set TX/RX controls sans the enable bits. */
147 write_zsreg(uap
, R3
, regs
[R3
] & ~RxENABLE
);
148 write_zsreg(uap
, R5
, regs
[R5
] & ~TxENABLE
);
150 /* now set R7 "prime" on ESCC */
151 write_zsreg(uap
, R15
, regs
[R15
] | EN85C30
);
152 write_zsreg(uap
, R7
, regs
[R7P
]);
154 /* make sure we use R7 "non-prime" on ESCC */
155 write_zsreg(uap
, R15
, regs
[R15
] & ~EN85C30
);
157 /* Synchronous mode config. */
158 write_zsreg(uap
, R6
, regs
[R6
]);
159 write_zsreg(uap
, R7
, regs
[R7
]);
161 /* Disable baud generator. */
162 write_zsreg(uap
, R14
, regs
[R14
] & ~BRENAB
);
164 /* Clock mode control. */
165 write_zsreg(uap
, R11
, regs
[R11
]);
167 /* Lower and upper byte of baud rate generator divisor. */
168 write_zsreg(uap
, R12
, regs
[R12
]);
169 write_zsreg(uap
, R13
, regs
[R13
]);
171 /* Now rewrite R14, with BRENAB (if set). */
172 write_zsreg(uap
, R14
, regs
[R14
]);
174 /* Reset external status interrupts. */
175 write_zsreg(uap
, R0
, RES_EXT_INT
);
176 write_zsreg(uap
, R0
, RES_EXT_INT
);
178 /* Rewrite R3/R5, this time without enables masked. */
179 write_zsreg(uap
, R3
, regs
[R3
]);
180 write_zsreg(uap
, R5
, regs
[R5
]);
182 /* Rewrite R1, this time without IRQ enabled masked. */
183 write_zsreg(uap
, R1
, regs
[R1
]);
185 /* Enable interrupts */
186 write_zsreg(uap
, R9
, regs
[R9
]);
190 * We do like sunzilog to avoid disrupting pending Tx
191 * Reprogram the Zilog channel HW registers with the copies found in the
192 * software state struct. If the transmitter is busy, we defer this update
193 * until the next TX complete interrupt. Else, we do it right now.
195 * The UART port lock must be held and local interrupts disabled.
197 static void pmz_maybe_update_regs(struct uart_pmac_port
*uap
)
199 if (!ZS_REGS_HELD(uap
)) {
200 if (ZS_TX_ACTIVE(uap
)) {
201 uap
->flags
|= PMACZILOG_FLAG_REGS_HELD
;
203 pmz_debug("pmz: maybe_update_regs: updating\n");
204 pmz_load_zsregs(uap
, uap
->curregs
);
209 static struct tty_struct
*pmz_receive_chars(struct uart_pmac_port
*uap
,
210 struct pt_regs
*regs
)
212 struct tty_struct
*tty
= NULL
;
213 unsigned char ch
, r1
, drop
, error
;
217 /* The interrupt can be enabled when the port isn't open, typically
218 * that happens when using one port is open and the other closed (stale
219 * interrupt) or when one port is used as a console.
221 if (!ZS_IS_OPEN(uap
)) {
222 pmz_debug("pmz: draining input\n");
223 /* Port is closed, drain input data */
225 if ((++loops
) > 1000)
227 (void)read_zsreg(uap
, R1
);
228 write_zsreg(uap
, R0
, ERR_RES
);
229 (void)read_zsdata(uap
);
230 ch
= read_zsreg(uap
, R0
);
231 if (!(ch
& Rx_CH_AV
))
237 /* Sanity check, make sure the old bug is no longer happening */
238 if (uap
->port
.info
== NULL
|| uap
->port
.info
->tty
== NULL
) {
240 (void)read_zsdata(uap
);
243 tty
= uap
->port
.info
->tty
;
249 if (unlikely(tty
->flip
.count
>= TTY_FLIPBUF_SIZE
)) {
250 /* Have to drop the lock here */
251 pmz_debug("pmz: flip overflow\n");
252 spin_unlock(&uap
->port
.lock
);
253 tty
->flip
.work
.func((void *)tty
);
254 spin_lock(&uap
->port
.lock
);
255 if (tty
->flip
.count
>= TTY_FLIPBUF_SIZE
)
257 if (ZS_IS_ASLEEP(uap
))
259 if (!ZS_IS_OPEN(uap
))
263 r1
= read_zsreg(uap
, R1
);
264 ch
= read_zsdata(uap
);
266 if (r1
& (PAR_ERR
| Rx_OVR
| CRC_ERR
)) {
267 write_zsreg(uap
, R0
, ERR_RES
);
271 ch
&= uap
->parity_mask
;
272 if (ch
== 0 && uap
->flags
& PMACZILOG_FLAG_BREAK
) {
273 uap
->flags
&= ~PMACZILOG_FLAG_BREAK
;
276 #if defined(CONFIG_MAGIC_SYSRQ) && defined(CONFIG_SERIAL_CORE_CONSOLE)
277 #ifdef USE_CTRL_O_SYSRQ
278 /* Handle the SysRq ^O Hack */
280 uap
->port
.sysrq
= jiffies
+ HZ
*5;
283 #endif /* USE_CTRL_O_SYSRQ */
284 if (uap
->port
.sysrq
) {
286 spin_unlock(&uap
->port
.lock
);
287 swallow
= uart_handle_sysrq_char(&uap
->port
, ch
, regs
);
288 spin_lock(&uap
->port
.lock
);
292 #endif /* CONFIG_MAGIC_SYSRQ && CONFIG_SERIAL_CORE_CONSOLE */
294 /* A real serial line, record the character and status. */
298 *tty
->flip
.char_buf_ptr
= ch
;
299 *tty
->flip
.flag_buf_ptr
= TTY_NORMAL
;
300 uap
->port
.icount
.rx
++;
302 if (r1
& (PAR_ERR
| Rx_OVR
| CRC_ERR
| BRK_ABRT
)) {
305 pmz_debug("pmz: got break !\n");
306 r1
&= ~(PAR_ERR
| CRC_ERR
);
307 uap
->port
.icount
.brk
++;
308 if (uart_handle_break(&uap
->port
))
311 else if (r1
& PAR_ERR
)
312 uap
->port
.icount
.parity
++;
313 else if (r1
& CRC_ERR
)
314 uap
->port
.icount
.frame
++;
316 uap
->port
.icount
.overrun
++;
317 r1
&= uap
->port
.read_status_mask
;
319 *tty
->flip
.flag_buf_ptr
= TTY_BREAK
;
320 else if (r1
& PAR_ERR
)
321 *tty
->flip
.flag_buf_ptr
= TTY_PARITY
;
322 else if (r1
& CRC_ERR
)
323 *tty
->flip
.flag_buf_ptr
= TTY_FRAME
;
326 if (uap
->port
.ignore_status_mask
== 0xff ||
327 (r1
& uap
->port
.ignore_status_mask
) == 0) {
328 tty
->flip
.flag_buf_ptr
++;
329 tty
->flip
.char_buf_ptr
++;
333 tty
->flip
.count
< TTY_FLIPBUF_SIZE
) {
334 *tty
->flip
.flag_buf_ptr
= TTY_OVERRUN
;
335 tty
->flip
.flag_buf_ptr
++;
336 tty
->flip
.char_buf_ptr
++;
340 /* We can get stuck in an infinite loop getting char 0 when the
341 * line is in a wrong HW state, we break that here.
342 * When that happens, I disable the receive side of the driver.
343 * Note that what I've been experiencing is a real irq loop where
344 * I'm getting flooded regardless of the actual port speed.
345 * Something stange is going on with the HW
347 if ((++loops
) > 1000)
349 ch
= read_zsreg(uap
, R0
);
350 if (!(ch
& Rx_CH_AV
))
356 uap
->curregs
[R1
] &= ~(EXT_INT_ENAB
| TxINT_ENAB
| RxINT_MASK
);
357 write_zsreg(uap
, R1
, uap
->curregs
[R1
]);
359 dev_err(&uap
->dev
->ofdev
.dev
, "pmz: rx irq flood !\n");
363 static void pmz_status_handle(struct uart_pmac_port
*uap
, struct pt_regs
*regs
)
365 unsigned char status
;
367 status
= read_zsreg(uap
, R0
);
368 write_zsreg(uap
, R0
, RES_EXT_INT
);
371 if (ZS_IS_OPEN(uap
) && ZS_WANTS_MODEM_STATUS(uap
)) {
372 if (status
& SYNC_HUNT
)
373 uap
->port
.icount
.dsr
++;
375 /* The Zilog just gives us an interrupt when DCD/CTS/etc. change.
376 * But it does not tell us which bit has changed, we have to keep
377 * track of this ourselves.
378 * The CTS input is inverted for some reason. -- paulus
380 if ((status
^ uap
->prev_status
) & DCD
)
381 uart_handle_dcd_change(&uap
->port
,
383 if ((status
^ uap
->prev_status
) & CTS
)
384 uart_handle_cts_change(&uap
->port
,
387 wake_up_interruptible(&uap
->port
.info
->delta_msr_wait
);
390 if (status
& BRK_ABRT
)
391 uap
->flags
|= PMACZILOG_FLAG_BREAK
;
393 uap
->prev_status
= status
;
396 static void pmz_transmit_chars(struct uart_pmac_port
*uap
)
398 struct circ_buf
*xmit
;
400 if (ZS_IS_ASLEEP(uap
))
402 if (ZS_IS_CONS(uap
)) {
403 unsigned char status
= read_zsreg(uap
, R0
);
405 /* TX still busy? Just wait for the next TX done interrupt.
407 * It can occur because of how we do serial console writes. It would
408 * be nice to transmit console writes just like we normally would for
409 * a TTY line. (ie. buffered and TX interrupt driven). That is not
410 * easy because console writes cannot sleep. One solution might be
411 * to poll on enough port->xmit space becomming free. -DaveM
413 if (!(status
& Tx_BUF_EMP
))
417 uap
->flags
&= ~PMACZILOG_FLAG_TX_ACTIVE
;
419 if (ZS_REGS_HELD(uap
)) {
420 pmz_load_zsregs(uap
, uap
->curregs
);
421 uap
->flags
&= ~PMACZILOG_FLAG_REGS_HELD
;
424 if (ZS_TX_STOPPED(uap
)) {
425 uap
->flags
&= ~PMACZILOG_FLAG_TX_STOPPED
;
429 if (uap
->port
.x_char
) {
430 uap
->flags
|= PMACZILOG_FLAG_TX_ACTIVE
;
431 write_zsdata(uap
, uap
->port
.x_char
);
433 uap
->port
.icount
.tx
++;
434 uap
->port
.x_char
= 0;
438 if (uap
->port
.info
== NULL
)
440 xmit
= &uap
->port
.info
->xmit
;
441 if (uart_circ_empty(xmit
)) {
442 uart_write_wakeup(&uap
->port
);
445 if (uart_tx_stopped(&uap
->port
))
448 uap
->flags
|= PMACZILOG_FLAG_TX_ACTIVE
;
449 write_zsdata(uap
, xmit
->buf
[xmit
->tail
]);
452 xmit
->tail
= (xmit
->tail
+ 1) & (UART_XMIT_SIZE
- 1);
453 uap
->port
.icount
.tx
++;
455 if (uart_circ_chars_pending(xmit
) < WAKEUP_CHARS
)
456 uart_write_wakeup(&uap
->port
);
461 write_zsreg(uap
, R0
, RES_Tx_P
);
465 /* Hrm... we register that twice, fixme later.... */
466 static irqreturn_t
pmz_interrupt(int irq
, void *dev_id
, struct pt_regs
*regs
)
468 struct uart_pmac_port
*uap
= dev_id
;
469 struct uart_pmac_port
*uap_a
;
470 struct uart_pmac_port
*uap_b
;
472 struct tty_struct
*tty
;
475 uap_a
= pmz_get_port_A(uap
);
478 spin_lock(&uap_a
->port
.lock
);
479 r3
= read_zsreg(uap_a
, R3
);
482 pmz_debug("irq, r3: %x\n", r3
);
486 if (r3
& (CHAEXT
| CHATxIP
| CHARxIP
)) {
487 write_zsreg(uap_a
, R0
, RES_H_IUS
);
490 pmz_status_handle(uap_a
, regs
);
492 tty
= pmz_receive_chars(uap_a
, regs
);
494 pmz_transmit_chars(uap_a
);
497 spin_unlock(&uap_a
->port
.lock
);
499 tty_flip_buffer_push(tty
);
501 if (uap_b
->node
== NULL
)
504 spin_lock(&uap_b
->port
.lock
);
506 if (r3
& (CHBEXT
| CHBTxIP
| CHBRxIP
)) {
507 write_zsreg(uap_b
, R0
, RES_H_IUS
);
510 pmz_status_handle(uap_b
, regs
);
512 tty
= pmz_receive_chars(uap_b
, regs
);
514 pmz_transmit_chars(uap_b
);
517 spin_unlock(&uap_b
->port
.lock
);
519 tty_flip_buffer_push(tty
);
523 pmz_debug("irq done.\n");
529 * Peek the status register, lock not held by caller
531 static inline u8
pmz_peek_status(struct uart_pmac_port
*uap
)
536 spin_lock_irqsave(&uap
->port
.lock
, flags
);
537 status
= read_zsreg(uap
, R0
);
538 spin_unlock_irqrestore(&uap
->port
.lock
, flags
);
544 * Check if transmitter is empty
545 * The port lock is not held.
547 static unsigned int pmz_tx_empty(struct uart_port
*port
)
549 struct uart_pmac_port
*uap
= to_pmz(port
);
550 unsigned char status
;
552 if (ZS_IS_ASLEEP(uap
) || uap
->node
== NULL
)
555 status
= pmz_peek_status(to_pmz(port
));
556 if (status
& Tx_BUF_EMP
)
562 * Set Modem Control (RTS & DTR) bits
563 * The port lock is held and interrupts are disabled.
564 * Note: Shall we really filter out RTS on external ports or
565 * should that be dealt at higher level only ?
567 static void pmz_set_mctrl(struct uart_port
*port
, unsigned int mctrl
)
569 struct uart_pmac_port
*uap
= to_pmz(port
);
570 unsigned char set_bits
, clear_bits
;
572 /* Do nothing for irda for now... */
575 /* We get called during boot with a port not up yet */
576 if (ZS_IS_ASLEEP(uap
) ||
577 !(ZS_IS_OPEN(uap
) || ZS_IS_CONS(uap
)))
580 set_bits
= clear_bits
= 0;
582 if (ZS_IS_INTMODEM(uap
)) {
583 if (mctrl
& TIOCM_RTS
)
588 if (mctrl
& TIOCM_DTR
)
593 /* NOTE: Not subject to 'transmitter active' rule. */
594 uap
->curregs
[R5
] |= set_bits
;
595 uap
->curregs
[R5
] &= ~clear_bits
;
596 if (ZS_IS_ASLEEP(uap
))
598 write_zsreg(uap
, R5
, uap
->curregs
[R5
]);
599 pmz_debug("pmz_set_mctrl: set bits: %x, clear bits: %x -> %x\n",
600 set_bits
, clear_bits
, uap
->curregs
[R5
]);
605 * Get Modem Control bits (only the input ones, the core will
606 * or that with a cached value of the control ones)
607 * The port lock is held and interrupts are disabled.
609 static unsigned int pmz_get_mctrl(struct uart_port
*port
)
611 struct uart_pmac_port
*uap
= to_pmz(port
);
612 unsigned char status
;
615 if (ZS_IS_ASLEEP(uap
) || uap
->node
== NULL
)
618 status
= read_zsreg(uap
, R0
);
623 if (status
& SYNC_HUNT
)
632 * Stop TX side. Dealt like sunzilog at next Tx interrupt,
633 * though for DMA, we will have to do a bit more.
634 * The port lock is held and interrupts are disabled.
636 static void pmz_stop_tx(struct uart_port
*port
)
638 to_pmz(port
)->flags
|= PMACZILOG_FLAG_TX_STOPPED
;
643 * The port lock is held and interrupts are disabled.
645 static void pmz_start_tx(struct uart_port
*port
)
647 struct uart_pmac_port
*uap
= to_pmz(port
);
648 unsigned char status
;
650 pmz_debug("pmz: start_tx()\n");
652 uap
->flags
|= PMACZILOG_FLAG_TX_ACTIVE
;
653 uap
->flags
&= ~PMACZILOG_FLAG_TX_STOPPED
;
655 if (ZS_IS_ASLEEP(uap
) || uap
->node
== NULL
)
658 status
= read_zsreg(uap
, R0
);
660 /* TX busy? Just wait for the TX done interrupt. */
661 if (!(status
& Tx_BUF_EMP
))
664 /* Send the first character to jump-start the TX done
665 * IRQ sending engine.
668 write_zsdata(uap
, port
->x_char
);
673 struct circ_buf
*xmit
= &port
->info
->xmit
;
675 write_zsdata(uap
, xmit
->buf
[xmit
->tail
]);
677 xmit
->tail
= (xmit
->tail
+ 1) & (UART_XMIT_SIZE
- 1);
680 if (uart_circ_chars_pending(xmit
) < WAKEUP_CHARS
)
681 uart_write_wakeup(&uap
->port
);
683 pmz_debug("pmz: start_tx() done.\n");
687 * Stop Rx side, basically disable emitting of
688 * Rx interrupts on the port. We don't disable the rx
689 * side of the chip proper though
690 * The port lock is held.
692 static void pmz_stop_rx(struct uart_port
*port
)
694 struct uart_pmac_port
*uap
= to_pmz(port
);
696 if (ZS_IS_ASLEEP(uap
) || uap
->node
== NULL
)
699 pmz_debug("pmz: stop_rx()()\n");
701 /* Disable all RX interrupts. */
702 uap
->curregs
[R1
] &= ~RxINT_MASK
;
703 pmz_maybe_update_regs(uap
);
705 pmz_debug("pmz: stop_rx() done.\n");
709 * Enable modem status change interrupts
710 * The port lock is held.
712 static void pmz_enable_ms(struct uart_port
*port
)
714 struct uart_pmac_port
*uap
= to_pmz(port
);
715 unsigned char new_reg
;
717 if (ZS_IS_IRDA(uap
) || uap
->node
== NULL
)
719 new_reg
= uap
->curregs
[R15
] | (DCDIE
| SYNCIE
| CTSIE
);
720 if (new_reg
!= uap
->curregs
[R15
]) {
721 uap
->curregs
[R15
] = new_reg
;
723 if (ZS_IS_ASLEEP(uap
))
725 /* NOTE: Not subject to 'transmitter active' rule. */
726 write_zsreg(uap
, R15
, uap
->curregs
[R15
]);
731 * Control break state emission
732 * The port lock is not held.
734 static void pmz_break_ctl(struct uart_port
*port
, int break_state
)
736 struct uart_pmac_port
*uap
= to_pmz(port
);
737 unsigned char set_bits
, clear_bits
, new_reg
;
740 if (uap
->node
== NULL
)
742 set_bits
= clear_bits
= 0;
747 clear_bits
|= SND_BRK
;
749 spin_lock_irqsave(&port
->lock
, flags
);
751 new_reg
= (uap
->curregs
[R5
] | set_bits
) & ~clear_bits
;
752 if (new_reg
!= uap
->curregs
[R5
]) {
753 uap
->curregs
[R5
] = new_reg
;
755 /* NOTE: Not subject to 'transmitter active' rule. */
756 if (ZS_IS_ASLEEP(uap
))
758 write_zsreg(uap
, R5
, uap
->curregs
[R5
]);
761 spin_unlock_irqrestore(&port
->lock
, flags
);
765 * Turn power on or off to the SCC and associated stuff
766 * (port drivers, modem, IR port, etc.)
767 * Returns the number of milliseconds we should wait before
768 * trying to use the port.
770 static int pmz_set_scc_power(struct uart_pmac_port
*uap
, int state
)
776 rc
= pmac_call_feature(
777 PMAC_FTR_SCC_ENABLE
, uap
->node
, uap
->port_type
, 1);
778 pmz_debug("port power on result: %d\n", rc
);
779 if (ZS_IS_INTMODEM(uap
)) {
780 rc
= pmac_call_feature(
781 PMAC_FTR_MODEM_ENABLE
, uap
->node
, 0, 1);
782 delay
= 2500; /* wait for 2.5s before using */
783 pmz_debug("modem power result: %d\n", rc
);
786 /* TODO: Make that depend on a timer, don't power down
789 if (ZS_IS_INTMODEM(uap
)) {
790 rc
= pmac_call_feature(
791 PMAC_FTR_MODEM_ENABLE
, uap
->node
, 0, 0);
792 pmz_debug("port power off result: %d\n", rc
);
794 pmac_call_feature(PMAC_FTR_SCC_ENABLE
, uap
->node
, uap
->port_type
, 0);
800 * FixZeroBug....Works around a bug in the SCC receving channel.
801 * Inspired from Darwin code, 15 Sept. 2000 -DanM
803 * The following sequence prevents a problem that is seen with O'Hare ASICs
804 * (most versions -- also with some Heathrow and Hydra ASICs) where a zero
805 * at the input to the receiver becomes 'stuck' and locks up the receiver.
806 * This problem can occur as a result of a zero bit at the receiver input
807 * coincident with any of the following events:
809 * The SCC is initialized (hardware or software).
810 * A framing error is detected.
811 * The clocking option changes from synchronous or X1 asynchronous
812 * clocking to X16, X32, or X64 asynchronous clocking.
813 * The decoding mode is changed among NRZ, NRZI, FM0, or FM1.
815 * This workaround attempts to recover from the lockup condition by placing
816 * the SCC in synchronous loopback mode with a fast clock before programming
817 * any of the asynchronous modes.
819 static void pmz_fix_zero_bug_scc(struct uart_pmac_port
*uap
)
821 write_zsreg(uap
, 9, ZS_IS_CHANNEL_A(uap
) ? CHRA
: CHRB
);
824 write_zsreg(uap
, 9, (ZS_IS_CHANNEL_A(uap
) ? CHRA
: CHRB
) | NV
);
827 write_zsreg(uap
, 4, X1CLK
| MONSYNC
);
828 write_zsreg(uap
, 3, Rx8
);
829 write_zsreg(uap
, 5, Tx8
| RTS
);
830 write_zsreg(uap
, 9, NV
); /* Didn't we already do this? */
831 write_zsreg(uap
, 11, RCBR
| TCBR
);
832 write_zsreg(uap
, 12, 0);
833 write_zsreg(uap
, 13, 0);
834 write_zsreg(uap
, 14, (LOOPBAK
| BRSRC
));
835 write_zsreg(uap
, 14, (LOOPBAK
| BRSRC
| BRENAB
));
836 write_zsreg(uap
, 3, Rx8
| RxENABLE
);
837 write_zsreg(uap
, 0, RES_EXT_INT
);
838 write_zsreg(uap
, 0, RES_EXT_INT
);
839 write_zsreg(uap
, 0, RES_EXT_INT
); /* to kill some time */
841 /* The channel should be OK now, but it is probably receiving
843 * Switch to asynchronous mode, disable the receiver,
844 * and discard everything in the receive buffer.
846 write_zsreg(uap
, 9, NV
);
847 write_zsreg(uap
, 4, X16CLK
| SB_MASK
);
848 write_zsreg(uap
, 3, Rx8
);
850 while (read_zsreg(uap
, 0) & Rx_CH_AV
) {
851 (void)read_zsreg(uap
, 8);
852 write_zsreg(uap
, 0, RES_EXT_INT
);
853 write_zsreg(uap
, 0, ERR_RES
);
858 * Real startup routine, powers up the hardware and sets up
859 * the SCC. Returns a delay in ms where you need to wait before
860 * actually using the port, this is typically the internal modem
861 * powerup delay. This routine expect the lock to be taken.
863 static int __pmz_startup(struct uart_pmac_port
*uap
)
867 memset(&uap
->curregs
, 0, sizeof(uap
->curregs
));
869 /* Power up the SCC & underlying hardware (modem/irda) */
870 pwr_delay
= pmz_set_scc_power(uap
, 1);
872 /* Nice buggy HW ... */
873 pmz_fix_zero_bug_scc(uap
);
875 /* Reset the channel */
876 uap
->curregs
[R9
] = 0;
877 write_zsreg(uap
, 9, ZS_IS_CHANNEL_A(uap
) ? CHRA
: CHRB
);
880 write_zsreg(uap
, 9, 0);
883 /* Clear the interrupt registers */
884 write_zsreg(uap
, R1
, 0);
885 write_zsreg(uap
, R0
, ERR_RES
);
886 write_zsreg(uap
, R0
, ERR_RES
);
887 write_zsreg(uap
, R0
, RES_H_IUS
);
888 write_zsreg(uap
, R0
, RES_H_IUS
);
890 /* Setup some valid baud rate */
891 uap
->curregs
[R4
] = X16CLK
| SB1
;
892 uap
->curregs
[R3
] = Rx8
;
893 uap
->curregs
[R5
] = Tx8
| RTS
;
894 if (!ZS_IS_IRDA(uap
))
895 uap
->curregs
[R5
] |= DTR
;
896 uap
->curregs
[R12
] = 0;
897 uap
->curregs
[R13
] = 0;
898 uap
->curregs
[R14
] = BRENAB
;
900 /* Clear handshaking, enable BREAK interrupts */
901 uap
->curregs
[R15
] = BRKIE
;
903 /* Master interrupt enable */
904 uap
->curregs
[R9
] |= NV
| MIE
;
906 pmz_load_zsregs(uap
, uap
->curregs
);
908 /* Enable receiver and transmitter. */
909 write_zsreg(uap
, R3
, uap
->curregs
[R3
] |= RxENABLE
);
910 write_zsreg(uap
, R5
, uap
->curregs
[R5
] |= TxENABLE
);
912 /* Remember status for DCD/CTS changes */
913 uap
->prev_status
= read_zsreg(uap
, R0
);
919 static void pmz_irda_reset(struct uart_pmac_port
*uap
)
921 uap
->curregs
[R5
] |= DTR
;
922 write_zsreg(uap
, R5
, uap
->curregs
[R5
]);
925 uap
->curregs
[R5
] &= ~DTR
;
926 write_zsreg(uap
, R5
, uap
->curregs
[R5
]);
932 * This is the "normal" startup routine, using the above one
933 * wrapped with the lock and doing a schedule delay
935 static int pmz_startup(struct uart_port
*port
)
937 struct uart_pmac_port
*uap
= to_pmz(port
);
941 pmz_debug("pmz: startup()\n");
943 if (ZS_IS_ASLEEP(uap
))
945 if (uap
->node
== NULL
)
950 uap
->flags
|= PMACZILOG_FLAG_IS_OPEN
;
952 /* A console is never powered down. Else, power up and
953 * initialize the chip
955 if (!ZS_IS_CONS(uap
)) {
956 spin_lock_irqsave(&port
->lock
, flags
);
957 pwr_delay
= __pmz_startup(uap
);
958 spin_unlock_irqrestore(&port
->lock
, flags
);
961 pmz_get_port_A(uap
)->flags
|= PMACZILOG_FLAG_IS_IRQ_ON
;
962 if (request_irq(uap
->port
.irq
, pmz_interrupt
, SA_SHIRQ
, "PowerMac Zilog", uap
)) {
963 dev_err(&uap
->dev
->ofdev
.dev
,
964 "Unable to register zs interrupt handler.\n");
965 pmz_set_scc_power(uap
, 0);
972 /* Right now, we deal with delay by blocking here, I'll be
975 if (pwr_delay
!= 0) {
976 pmz_debug("pmz: delaying %d ms\n", pwr_delay
);
980 /* IrDA reset is done now */
984 /* Enable interrupts emission from the chip */
985 spin_lock_irqsave(&port
->lock
, flags
);
986 uap
->curregs
[R1
] |= INT_ALL_Rx
| TxINT_ENAB
;
987 if (!ZS_IS_EXTCLK(uap
))
988 uap
->curregs
[R1
] |= EXT_INT_ENAB
;
989 write_zsreg(uap
, R1
, uap
->curregs
[R1
]);
990 spin_unlock_irqrestore(&port
->lock
, flags
);
992 pmz_debug("pmz: startup() done.\n");
997 static void pmz_shutdown(struct uart_port
*port
)
999 struct uart_pmac_port
*uap
= to_pmz(port
);
1000 unsigned long flags
;
1002 pmz_debug("pmz: shutdown()\n");
1004 if (uap
->node
== NULL
)
1009 /* Release interrupt handler */
1010 free_irq(uap
->port
.irq
, uap
);
1012 spin_lock_irqsave(&port
->lock
, flags
);
1014 uap
->flags
&= ~PMACZILOG_FLAG_IS_OPEN
;
1016 if (!ZS_IS_OPEN(uap
->mate
))
1017 pmz_get_port_A(uap
)->flags
&= ~PMACZILOG_FLAG_IS_IRQ_ON
;
1019 /* Disable interrupts */
1020 if (!ZS_IS_ASLEEP(uap
)) {
1021 uap
->curregs
[R1
] &= ~(EXT_INT_ENAB
| TxINT_ENAB
| RxINT_MASK
);
1022 write_zsreg(uap
, R1
, uap
->curregs
[R1
]);
1026 if (ZS_IS_CONS(uap
) || ZS_IS_ASLEEP(uap
)) {
1027 spin_unlock_irqrestore(&port
->lock
, flags
);
1032 /* Disable receiver and transmitter. */
1033 uap
->curregs
[R3
] &= ~RxENABLE
;
1034 uap
->curregs
[R5
] &= ~TxENABLE
;
1036 /* Disable all interrupts and BRK assertion. */
1037 uap
->curregs
[R5
] &= ~SND_BRK
;
1038 pmz_maybe_update_regs(uap
);
1040 /* Shut the chip down */
1041 pmz_set_scc_power(uap
, 0);
1043 spin_unlock_irqrestore(&port
->lock
, flags
);
1047 pmz_debug("pmz: shutdown() done.\n");
1050 /* Shared by TTY driver and serial console setup. The port lock is held
1051 * and local interrupts are disabled.
1053 static void pmz_convert_to_zs(struct uart_pmac_port
*uap
, unsigned int cflag
,
1054 unsigned int iflag
, unsigned long baud
)
1059 /* Switch to external clocking for IrDA high clock rates. That
1060 * code could be re-used for Midi interfaces with different
1063 if (baud
>= 115200 && ZS_IS_IRDA(uap
)) {
1064 uap
->curregs
[R4
] = X1CLK
;
1065 uap
->curregs
[R11
] = RCTRxCP
| TCTRxCP
;
1066 uap
->curregs
[R14
] = 0; /* BRG off */
1067 uap
->curregs
[R12
] = 0;
1068 uap
->curregs
[R13
] = 0;
1069 uap
->flags
|= PMACZILOG_FLAG_IS_EXTCLK
;
1072 case ZS_CLOCK
/16: /* 230400 */
1073 uap
->curregs
[R4
] = X16CLK
;
1074 uap
->curregs
[R11
] = 0;
1075 uap
->curregs
[R14
] = 0;
1077 case ZS_CLOCK
/32: /* 115200 */
1078 uap
->curregs
[R4
] = X32CLK
;
1079 uap
->curregs
[R11
] = 0;
1080 uap
->curregs
[R14
] = 0;
1083 uap
->curregs
[R4
] = X16CLK
;
1084 uap
->curregs
[R11
] = TCBR
| RCBR
;
1085 brg
= BPS_TO_BRG(baud
, ZS_CLOCK
/ 16);
1086 uap
->curregs
[R12
] = (brg
& 255);
1087 uap
->curregs
[R13
] = ((brg
>> 8) & 255);
1088 uap
->curregs
[R14
] = BRENAB
;
1090 uap
->flags
&= ~PMACZILOG_FLAG_IS_EXTCLK
;
1093 /* Character size, stop bits, and parity. */
1094 uap
->curregs
[3] &= ~RxN_MASK
;
1095 uap
->curregs
[5] &= ~TxN_MASK
;
1097 switch (cflag
& CSIZE
) {
1099 uap
->curregs
[3] |= Rx5
;
1100 uap
->curregs
[5] |= Tx5
;
1101 uap
->parity_mask
= 0x1f;
1104 uap
->curregs
[3] |= Rx6
;
1105 uap
->curregs
[5] |= Tx6
;
1106 uap
->parity_mask
= 0x3f;
1109 uap
->curregs
[3] |= Rx7
;
1110 uap
->curregs
[5] |= Tx7
;
1111 uap
->parity_mask
= 0x7f;
1115 uap
->curregs
[3] |= Rx8
;
1116 uap
->curregs
[5] |= Tx8
;
1117 uap
->parity_mask
= 0xff;
1120 uap
->curregs
[4] &= ~(SB_MASK
);
1122 uap
->curregs
[4] |= SB2
;
1124 uap
->curregs
[4] |= SB1
;
1126 uap
->curregs
[4] |= PAR_ENAB
;
1128 uap
->curregs
[4] &= ~PAR_ENAB
;
1129 if (!(cflag
& PARODD
))
1130 uap
->curregs
[4] |= PAR_EVEN
;
1132 uap
->curregs
[4] &= ~PAR_EVEN
;
1134 uap
->port
.read_status_mask
= Rx_OVR
;
1136 uap
->port
.read_status_mask
|= CRC_ERR
| PAR_ERR
;
1137 if (iflag
& (BRKINT
| PARMRK
))
1138 uap
->port
.read_status_mask
|= BRK_ABRT
;
1140 uap
->port
.ignore_status_mask
= 0;
1142 uap
->port
.ignore_status_mask
|= CRC_ERR
| PAR_ERR
;
1143 if (iflag
& IGNBRK
) {
1144 uap
->port
.ignore_status_mask
|= BRK_ABRT
;
1146 uap
->port
.ignore_status_mask
|= Rx_OVR
;
1149 if ((cflag
& CREAD
) == 0)
1150 uap
->port
.ignore_status_mask
= 0xff;
1155 * Set the irda codec on the imac to the specified baud rate.
1157 static void pmz_irda_setup(struct uart_pmac_port
*uap
, unsigned long *baud
)
1185 /* The FIR modes aren't really supported at this point, how
1186 * do we select the speed ? via the FCR on KeyLargo ?
1200 /* Wait for transmitter to drain */
1202 while ((read_zsreg(uap
, R0
) & Tx_BUF_EMP
) == 0
1203 || (read_zsreg(uap
, R1
) & ALL_SNT
) == 0) {
1205 dev_err(&uap
->dev
->ofdev
.dev
, "transmitter didn't drain\n");
1211 /* Drain the receiver too */
1213 (void)read_zsdata(uap
);
1214 (void)read_zsdata(uap
);
1215 (void)read_zsdata(uap
);
1217 while (read_zsreg(uap
, R0
) & Rx_CH_AV
) {
1221 dev_err(&uap
->dev
->ofdev
.dev
, "receiver didn't drain\n");
1226 /* Switch to command mode */
1227 uap
->curregs
[R5
] |= DTR
;
1228 write_zsreg(uap
, R5
, uap
->curregs
[R5
]);
1232 /* Switch SCC to 19200 */
1233 pmz_convert_to_zs(uap
, CS8
, 0, 19200);
1234 pmz_load_zsregs(uap
, uap
->curregs
);
1237 /* Write get_version command byte */
1238 write_zsdata(uap
, 1);
1240 while ((read_zsreg(uap
, R0
) & Rx_CH_AV
) == 0) {
1242 dev_err(&uap
->dev
->ofdev
.dev
,
1243 "irda_setup timed out on get_version byte\n");
1248 version
= read_zsdata(uap
);
1251 dev_info(&uap
->dev
->ofdev
.dev
, "IrDA: dongle version %d not supported\n",
1256 /* Send speed mode */
1257 write_zsdata(uap
, cmdbyte
);
1259 while ((read_zsreg(uap
, R0
) & Rx_CH_AV
) == 0) {
1261 dev_err(&uap
->dev
->ofdev
.dev
,
1262 "irda_setup timed out on speed mode byte\n");
1267 t
= read_zsdata(uap
);
1269 dev_err(&uap
->dev
->ofdev
.dev
,
1270 "irda_setup speed mode byte = %x (%x)\n", t
, cmdbyte
);
1272 dev_info(&uap
->dev
->ofdev
.dev
, "IrDA setup for %ld bps, dongle version: %d\n",
1275 (void)read_zsdata(uap
);
1276 (void)read_zsdata(uap
);
1277 (void)read_zsdata(uap
);
1280 /* Switch back to data mode */
1281 uap
->curregs
[R5
] &= ~DTR
;
1282 write_zsreg(uap
, R5
, uap
->curregs
[R5
]);
1285 (void)read_zsdata(uap
);
1286 (void)read_zsdata(uap
);
1287 (void)read_zsdata(uap
);
1291 static void __pmz_set_termios(struct uart_port
*port
, struct termios
*termios
,
1292 struct termios
*old
)
1294 struct uart_pmac_port
*uap
= to_pmz(port
);
1297 pmz_debug("pmz: set_termios()\n");
1299 if (ZS_IS_ASLEEP(uap
))
1302 memcpy(&uap
->termios_cache
, termios
, sizeof(struct termios
));
1304 /* XXX Check which revs of machines actually allow 1 and 4Mb speeds
1305 * on the IR dongle. Note that the IRTTY driver currently doesn't know
1306 * about the FIR mode and high speed modes. So these are unused. For
1307 * implementing proper support for these, we should probably add some
1308 * DMA as well, at least on the Rx side, which isn't a simple thing
1311 if (ZS_IS_IRDA(uap
)) {
1312 /* Calc baud rate */
1313 baud
= uart_get_baud_rate(port
, termios
, old
, 1200, 4000000);
1314 pmz_debug("pmz: switch IRDA to %ld bauds\n", baud
);
1315 /* Cet the irda codec to the right rate */
1316 pmz_irda_setup(uap
, &baud
);
1317 /* Set final baud rate */
1318 pmz_convert_to_zs(uap
, termios
->c_cflag
, termios
->c_iflag
, baud
);
1319 pmz_load_zsregs(uap
, uap
->curregs
);
1322 baud
= uart_get_baud_rate(port
, termios
, old
, 1200, 230400);
1323 pmz_convert_to_zs(uap
, termios
->c_cflag
, termios
->c_iflag
, baud
);
1324 /* Make sure modem status interrupts are correctly configured */
1325 if (UART_ENABLE_MS(&uap
->port
, termios
->c_cflag
)) {
1326 uap
->curregs
[R15
] |= DCDIE
| SYNCIE
| CTSIE
;
1327 uap
->flags
|= PMACZILOG_FLAG_MODEM_STATUS
;
1329 uap
->curregs
[R15
] &= ~(DCDIE
| SYNCIE
| CTSIE
);
1330 uap
->flags
&= ~PMACZILOG_FLAG_MODEM_STATUS
;
1333 /* Load registers to the chip */
1334 pmz_maybe_update_regs(uap
);
1336 uart_update_timeout(port
, termios
->c_cflag
, baud
);
1338 pmz_debug("pmz: set_termios() done.\n");
1341 /* The port lock is not held. */
1342 static void pmz_set_termios(struct uart_port
*port
, struct termios
*termios
,
1343 struct termios
*old
)
1345 struct uart_pmac_port
*uap
= to_pmz(port
);
1346 unsigned long flags
;
1348 spin_lock_irqsave(&port
->lock
, flags
);
1350 /* Disable IRQs on the port */
1351 uap
->curregs
[R1
] &= ~(EXT_INT_ENAB
| TxINT_ENAB
| RxINT_MASK
);
1352 write_zsreg(uap
, R1
, uap
->curregs
[R1
]);
1354 /* Setup new port configuration */
1355 __pmz_set_termios(port
, termios
, old
);
1357 /* Re-enable IRQs on the port */
1358 if (ZS_IS_OPEN(uap
)) {
1359 uap
->curregs
[R1
] |= INT_ALL_Rx
| TxINT_ENAB
;
1360 if (!ZS_IS_EXTCLK(uap
))
1361 uap
->curregs
[R1
] |= EXT_INT_ENAB
;
1362 write_zsreg(uap
, R1
, uap
->curregs
[R1
]);
1364 spin_unlock_irqrestore(&port
->lock
, flags
);
1367 static const char *pmz_type(struct uart_port
*port
)
1369 struct uart_pmac_port
*uap
= to_pmz(port
);
1371 if (ZS_IS_IRDA(uap
))
1372 return "Z85c30 ESCC - Infrared port";
1373 else if (ZS_IS_INTMODEM(uap
))
1374 return "Z85c30 ESCC - Internal modem";
1375 return "Z85c30 ESCC - Serial port";
1378 /* We do not request/release mappings of the registers here, this
1379 * happens at early serial probe time.
1381 static void pmz_release_port(struct uart_port
*port
)
1385 static int pmz_request_port(struct uart_port
*port
)
1390 /* These do not need to do anything interesting either. */
1391 static void pmz_config_port(struct uart_port
*port
, int flags
)
1395 /* We do not support letting the user mess with the divisor, IRQ, etc. */
1396 static int pmz_verify_port(struct uart_port
*port
, struct serial_struct
*ser
)
1401 static struct uart_ops pmz_pops
= {
1402 .tx_empty
= pmz_tx_empty
,
1403 .set_mctrl
= pmz_set_mctrl
,
1404 .get_mctrl
= pmz_get_mctrl
,
1405 .stop_tx
= pmz_stop_tx
,
1406 .start_tx
= pmz_start_tx
,
1407 .stop_rx
= pmz_stop_rx
,
1408 .enable_ms
= pmz_enable_ms
,
1409 .break_ctl
= pmz_break_ctl
,
1410 .startup
= pmz_startup
,
1411 .shutdown
= pmz_shutdown
,
1412 .set_termios
= pmz_set_termios
,
1414 .release_port
= pmz_release_port
,
1415 .request_port
= pmz_request_port
,
1416 .config_port
= pmz_config_port
,
1417 .verify_port
= pmz_verify_port
,
1421 * Setup one port structure after probing, HW is down at this point,
1422 * Unlike sunzilog, we don't need to pre-init the spinlock as we don't
1423 * register our console before uart_add_one_port() is called
1425 static int __init
pmz_init_port(struct uart_pmac_port
*uap
)
1427 struct device_node
*np
= uap
->node
;
1429 struct slot_names_prop
{
1434 struct resource r_ports
, r_rxdma
, r_txdma
;
1437 * Request & map chip registers
1439 if (of_address_to_resource(np
, 0, &r_ports
))
1441 uap
->port
.mapbase
= r_ports
.start
;
1442 uap
->port
.membase
= ioremap(uap
->port
.mapbase
, 0x1000);
1444 uap
->control_reg
= uap
->port
.membase
;
1445 uap
->data_reg
= uap
->control_reg
+ 0x10;
1448 * Request & map DBDMA registers
1451 if (of_address_to_resource(np
, 1, &r_txdma
) == 0 &&
1452 of_address_to_resource(np
, 2, &r_rxdma
) == 0)
1453 uap
->flags
|= PMACZILOG_FLAG_HAS_DMA
;
1455 memset(&r_txdma
, 0, sizeof(struct resource
));
1456 memset(&r_rxdma
, 0, sizeof(struct resource
));
1458 if (ZS_HAS_DMA(uap
)) {
1459 uap
->tx_dma_regs
= ioremap(r_txdma
.start
, 0x100);
1460 if (uap
->tx_dma_regs
== NULL
) {
1461 uap
->flags
&= ~PMACZILOG_FLAG_HAS_DMA
;
1464 uap
->rx_dma_regs
= ioremap(r_rxdma
.start
, 0x100);
1465 if (uap
->rx_dma_regs
== NULL
) {
1466 iounmap(uap
->tx_dma_regs
);
1467 uap
->tx_dma_regs
= NULL
;
1468 uap
->flags
&= ~PMACZILOG_FLAG_HAS_DMA
;
1471 uap
->tx_dma_irq
= np
->intrs
[1].line
;
1472 uap
->rx_dma_irq
= np
->intrs
[2].line
;
1479 if (device_is_compatible(np
, "cobalt"))
1480 uap
->flags
|= PMACZILOG_FLAG_IS_INTMODEM
;
1481 conn
= get_property(np
, "AAPL,connector", &len
);
1482 if (conn
&& (strcmp(conn
, "infrared") == 0))
1483 uap
->flags
|= PMACZILOG_FLAG_IS_IRDA
;
1484 uap
->port_type
= PMAC_SCC_ASYNC
;
1485 /* 1999 Powerbook G3 has slot-names property instead */
1486 slots
= (struct slot_names_prop
*)get_property(np
, "slot-names", &len
);
1487 if (slots
&& slots
->count
> 0) {
1488 if (strcmp(slots
->name
, "IrDA") == 0)
1489 uap
->flags
|= PMACZILOG_FLAG_IS_IRDA
;
1490 else if (strcmp(slots
->name
, "Modem") == 0)
1491 uap
->flags
|= PMACZILOG_FLAG_IS_INTMODEM
;
1493 if (ZS_IS_IRDA(uap
))
1494 uap
->port_type
= PMAC_SCC_IRDA
;
1495 if (ZS_IS_INTMODEM(uap
)) {
1496 struct device_node
* i2c_modem
= find_devices("i2c-modem");
1498 char* mid
= get_property(i2c_modem
, "modem-id", NULL
);
1499 if (mid
) switch(*mid
) {
1506 uap
->port_type
= PMAC_SCC_I2S1
;
1508 printk(KERN_INFO
"pmac_zilog: i2c-modem detected, id: %d\n",
1511 printk(KERN_INFO
"pmac_zilog: serial modem detected\n");
1516 * Init remaining bits of "port" structure
1518 uap
->port
.iotype
= SERIAL_IO_MEM
;
1519 uap
->port
.irq
= np
->intrs
[0].line
;
1520 uap
->port
.uartclk
= ZS_CLOCK
;
1521 uap
->port
.fifosize
= 1;
1522 uap
->port
.ops
= &pmz_pops
;
1523 uap
->port
.type
= PORT_PMAC_ZILOG
;
1524 uap
->port
.flags
= 0;
1526 /* Setup some valid baud rate information in the register
1527 * shadows so we don't write crap there before baud rate is
1528 * first initialized.
1530 pmz_convert_to_zs(uap
, CS8
, 0, 9600);
1536 * Get rid of a port on module removal
1538 static void pmz_dispose_port(struct uart_pmac_port
*uap
)
1540 struct device_node
*np
;
1543 iounmap(uap
->rx_dma_regs
);
1544 iounmap(uap
->tx_dma_regs
);
1545 iounmap(uap
->control_reg
);
1548 memset(uap
, 0, sizeof(struct uart_pmac_port
));
1552 * Called upon match with an escc node in the devive-tree.
1554 static int pmz_attach(struct macio_dev
*mdev
, const struct of_device_id
*match
)
1558 /* Iterate the pmz_ports array to find a matching entry
1560 for (i
= 0; i
< MAX_ZS_PORTS
; i
++)
1561 if (pmz_ports
[i
].node
== mdev
->ofdev
.node
) {
1562 struct uart_pmac_port
*uap
= &pmz_ports
[i
];
1565 dev_set_drvdata(&mdev
->ofdev
.dev
, uap
);
1566 if (macio_request_resources(uap
->dev
, "pmac_zilog"))
1567 printk(KERN_WARNING
"%s: Failed to request resource"
1568 ", port still active\n",
1571 uap
->flags
|= PMACZILOG_FLAG_RSRC_REQUESTED
;
1578 * That one should not be called, macio isn't really a hotswap device,
1579 * we don't expect one of those serial ports to go away...
1581 static int pmz_detach(struct macio_dev
*mdev
)
1583 struct uart_pmac_port
*uap
= dev_get_drvdata(&mdev
->ofdev
.dev
);
1588 if (uap
->flags
& PMACZILOG_FLAG_RSRC_REQUESTED
) {
1589 macio_release_resources(uap
->dev
);
1590 uap
->flags
&= ~PMACZILOG_FLAG_RSRC_REQUESTED
;
1592 dev_set_drvdata(&mdev
->ofdev
.dev
, NULL
);
1599 static int pmz_suspend(struct macio_dev
*mdev
, pm_message_t pm_state
)
1601 struct uart_pmac_port
*uap
= dev_get_drvdata(&mdev
->ofdev
.dev
);
1602 struct uart_state
*state
;
1603 unsigned long flags
;
1606 printk("HRM... pmz_suspend with NULL uap\n");
1610 if (pm_state
.event
== mdev
->ofdev
.dev
.power
.power_state
.event
)
1613 pmz_debug("suspend, switching to state %d\n", pm_state
);
1615 state
= pmz_uart_reg
.state
+ uap
->port
.line
;
1620 spin_lock_irqsave(&uap
->port
.lock
, flags
);
1622 if (ZS_IS_OPEN(uap
) || ZS_IS_CONS(uap
)) {
1623 /* Disable receiver and transmitter. */
1624 uap
->curregs
[R3
] &= ~RxENABLE
;
1625 uap
->curregs
[R5
] &= ~TxENABLE
;
1627 /* Disable all interrupts and BRK assertion. */
1628 uap
->curregs
[R1
] &= ~(EXT_INT_ENAB
| TxINT_ENAB
| RxINT_MASK
);
1629 uap
->curregs
[R5
] &= ~SND_BRK
;
1630 pmz_load_zsregs(uap
, uap
->curregs
);
1631 uap
->flags
|= PMACZILOG_FLAG_IS_ASLEEP
;
1635 spin_unlock_irqrestore(&uap
->port
.lock
, flags
);
1637 if (ZS_IS_OPEN(uap
) || ZS_IS_OPEN(uap
->mate
))
1638 if (ZS_IS_ASLEEP(uap
->mate
) && ZS_IS_IRQ_ON(pmz_get_port_A(uap
))) {
1639 pmz_get_port_A(uap
)->flags
&= ~PMACZILOG_FLAG_IS_IRQ_ON
;
1640 disable_irq(uap
->port
.irq
);
1643 if (ZS_IS_CONS(uap
))
1644 uap
->port
.cons
->flags
&= ~CON_ENABLED
;
1646 /* Shut the chip down */
1647 pmz_set_scc_power(uap
, 0);
1652 pmz_debug("suspend, switching complete\n");
1654 mdev
->ofdev
.dev
.power
.power_state
= pm_state
;
1660 static int pmz_resume(struct macio_dev
*mdev
)
1662 struct uart_pmac_port
*uap
= dev_get_drvdata(&mdev
->ofdev
.dev
);
1663 struct uart_state
*state
;
1664 unsigned long flags
;
1670 if (mdev
->ofdev
.dev
.power
.power_state
.event
== PM_EVENT_ON
)
1673 pmz_debug("resume, switching to state 0\n");
1675 state
= pmz_uart_reg
.state
+ uap
->port
.line
;
1680 spin_lock_irqsave(&uap
->port
.lock
, flags
);
1681 if (!ZS_IS_OPEN(uap
) && !ZS_IS_CONS(uap
)) {
1682 spin_unlock_irqrestore(&uap
->port
.lock
, flags
);
1685 pwr_delay
= __pmz_startup(uap
);
1687 /* Take care of config that may have changed while asleep */
1688 __pmz_set_termios(&uap
->port
, &uap
->termios_cache
, NULL
);
1690 if (ZS_IS_OPEN(uap
)) {
1691 /* Enable interrupts */
1692 uap
->curregs
[R1
] |= INT_ALL_Rx
| TxINT_ENAB
;
1693 if (!ZS_IS_EXTCLK(uap
))
1694 uap
->curregs
[R1
] |= EXT_INT_ENAB
;
1695 write_zsreg(uap
, R1
, uap
->curregs
[R1
]);
1698 spin_unlock_irqrestore(&uap
->port
.lock
, flags
);
1700 if (ZS_IS_CONS(uap
))
1701 uap
->port
.cons
->flags
|= CON_ENABLED
;
1703 /* Re-enable IRQ on the controller */
1704 if (ZS_IS_OPEN(uap
) && !ZS_IS_IRQ_ON(pmz_get_port_A(uap
))) {
1705 pmz_get_port_A(uap
)->flags
|= PMACZILOG_FLAG_IS_IRQ_ON
;
1706 enable_irq(uap
->port
.irq
);
1713 /* Right now, we deal with delay by blocking here, I'll be
1716 if (pwr_delay
!= 0) {
1717 pmz_debug("pmz: delaying %d ms\n", pwr_delay
);
1721 pmz_debug("resume, switching complete\n");
1723 mdev
->ofdev
.dev
.power
.power_state
.event
= PM_EVENT_ON
;
1729 * Probe all ports in the system and build the ports array, we register
1730 * with the serial layer at this point, the macio-type probing is only
1731 * used later to "attach" to the sysfs tree so we get power management
1734 static int __init
pmz_probe(void)
1736 struct device_node
*node_p
, *node_a
, *node_b
, *np
;
1741 * Find all escc chips in the system
1743 node_p
= of_find_node_by_name(NULL
, "escc");
1746 * First get channel A/B node pointers
1748 * TODO: Add routines with proper locking to do that...
1750 node_a
= node_b
= NULL
;
1751 for (np
= NULL
; (np
= of_get_next_child(node_p
, np
)) != NULL
;) {
1752 if (strncmp(np
->name
, "ch-a", 4) == 0)
1753 node_a
= of_node_get(np
);
1754 else if (strncmp(np
->name
, "ch-b", 4) == 0)
1755 node_b
= of_node_get(np
);
1757 if (!node_a
&& !node_b
) {
1758 of_node_put(node_a
);
1759 of_node_put(node_b
);
1760 printk(KERN_ERR
"pmac_zilog: missing node %c for escc %s\n",
1761 (!node_a
) ? 'a' : 'b', node_p
->full_name
);
1766 * Fill basic fields in the port structures
1768 pmz_ports
[count
].mate
= &pmz_ports
[count
+1];
1769 pmz_ports
[count
+1].mate
= &pmz_ports
[count
];
1770 pmz_ports
[count
].flags
= PMACZILOG_FLAG_IS_CHANNEL_A
;
1771 pmz_ports
[count
].node
= node_a
;
1772 pmz_ports
[count
+1].node
= node_b
;
1773 pmz_ports
[count
].port
.line
= count
;
1774 pmz_ports
[count
+1].port
.line
= count
+1;
1777 * Setup the ports for real
1779 rc
= pmz_init_port(&pmz_ports
[count
]);
1780 if (rc
== 0 && node_b
!= NULL
)
1781 rc
= pmz_init_port(&pmz_ports
[count
+1]);
1783 of_node_put(node_a
);
1784 of_node_put(node_b
);
1785 memset(&pmz_ports
[count
], 0, sizeof(struct uart_pmac_port
));
1786 memset(&pmz_ports
[count
+1], 0, sizeof(struct uart_pmac_port
));
1791 node_p
= of_find_node_by_name(node_p
, "escc");
1793 pmz_ports_count
= count
;
1798 #ifdef CONFIG_SERIAL_PMACZILOG_CONSOLE
1800 static void pmz_console_write(struct console
*con
, const char *s
, unsigned int count
);
1801 static int __init
pmz_console_setup(struct console
*co
, char *options
);
1803 static struct console pmz_console
= {
1805 .write
= pmz_console_write
,
1806 .device
= uart_console_device
,
1807 .setup
= pmz_console_setup
,
1808 .flags
= CON_PRINTBUFFER
,
1810 .data
= &pmz_uart_reg
,
1813 #define PMACZILOG_CONSOLE &pmz_console
1814 #else /* CONFIG_SERIAL_PMACZILOG_CONSOLE */
1815 #define PMACZILOG_CONSOLE (NULL)
1816 #endif /* CONFIG_SERIAL_PMACZILOG_CONSOLE */
1819 * Register the driver, console driver and ports with the serial
1822 static int __init
pmz_register(void)
1826 pmz_uart_reg
.nr
= pmz_ports_count
;
1827 pmz_uart_reg
.cons
= PMACZILOG_CONSOLE
;
1828 pmz_uart_reg
.minor
= 64;
1831 * Register this driver with the serial core
1833 rc
= uart_register_driver(&pmz_uart_reg
);
1838 * Register each port with the serial core
1840 for (i
= 0; i
< pmz_ports_count
; i
++) {
1841 struct uart_pmac_port
*uport
= &pmz_ports
[i
];
1842 /* NULL node may happen on wallstreet */
1843 if (uport
->node
!= NULL
)
1844 rc
= uart_add_one_port(&pmz_uart_reg
, &uport
->port
);
1852 struct uart_pmac_port
*uport
= &pmz_ports
[i
];
1853 uart_remove_one_port(&pmz_uart_reg
, &uport
->port
);
1855 uart_unregister_driver(&pmz_uart_reg
);
1859 static struct of_device_id pmz_match
[] =
1869 MODULE_DEVICE_TABLE (of
, pmz_match
);
1871 static struct macio_driver pmz_driver
=
1873 .name
= "pmac_zilog",
1874 .match_table
= pmz_match
,
1875 .probe
= pmz_attach
,
1876 .remove
= pmz_detach
,
1877 .suspend
= pmz_suspend
,
1878 .resume
= pmz_resume
,
1881 static int __init
init_pmz(void)
1884 printk(KERN_INFO
"%s\n", version
);
1887 * First, we need to do a direct OF-based probe pass. We
1888 * do that because we want serial console up before the
1889 * macio stuffs calls us back, and since that makes it
1890 * easier to pass the proper number of channels to
1891 * uart_register_driver()
1893 if (pmz_ports_count
== 0)
1897 * Bail early if no port found
1899 if (pmz_ports_count
== 0)
1903 * Now we register with the serial layer
1905 rc
= pmz_register();
1908 "pmac_zilog: Error registering serial device, disabling pmac_zilog.\n"
1909 "pmac_zilog: Did another serial driver already claim the minors?\n");
1910 /* effectively "pmz_unprobe()" */
1911 for (i
=0; i
< pmz_ports_count
; i
++)
1912 pmz_dispose_port(&pmz_ports
[i
]);
1917 * Then we register the macio driver itself
1919 return macio_register_driver(&pmz_driver
);
1922 static void __exit
exit_pmz(void)
1926 /* Get rid of macio-driver (detach from macio) */
1927 macio_unregister_driver(&pmz_driver
);
1929 for (i
= 0; i
< pmz_ports_count
; i
++) {
1930 struct uart_pmac_port
*uport
= &pmz_ports
[i
];
1931 if (uport
->node
!= NULL
) {
1932 uart_remove_one_port(&pmz_uart_reg
, &uport
->port
);
1933 pmz_dispose_port(uport
);
1936 /* Unregister UART driver */
1937 uart_unregister_driver(&pmz_uart_reg
);
1940 #ifdef CONFIG_SERIAL_PMACZILOG_CONSOLE
1943 * Print a string to the serial port trying not to disturb
1944 * any possible real use of the port...
1946 static void pmz_console_write(struct console
*con
, const char *s
, unsigned int count
)
1948 struct uart_pmac_port
*uap
= &pmz_ports
[con
->index
];
1949 unsigned long flags
;
1952 if (ZS_IS_ASLEEP(uap
))
1954 spin_lock_irqsave(&uap
->port
.lock
, flags
);
1956 /* Turn of interrupts and enable the transmitter. */
1957 write_zsreg(uap
, R1
, uap
->curregs
[1] & ~TxINT_ENAB
);
1958 write_zsreg(uap
, R5
, uap
->curregs
[5] | TxENABLE
| RTS
| DTR
);
1960 for (i
= 0; i
< count
; i
++) {
1961 /* Wait for the transmit buffer to empty. */
1962 while ((read_zsreg(uap
, R0
) & Tx_BUF_EMP
) == 0)
1964 write_zsdata(uap
, s
[i
]);
1966 while ((read_zsreg(uap
, R0
) & Tx_BUF_EMP
) == 0)
1968 write_zsdata(uap
, R13
);
1972 /* Restore the values in the registers. */
1973 write_zsreg(uap
, R1
, uap
->curregs
[1]);
1974 /* Don't disable the transmitter. */
1976 spin_unlock_irqrestore(&uap
->port
.lock
, flags
);
1980 * Setup the serial console
1982 static int __init
pmz_console_setup(struct console
*co
, char *options
)
1984 struct uart_pmac_port
*uap
;
1985 struct uart_port
*port
;
1990 unsigned long pwr_delay
;
1993 * XServe's default to 57600 bps
1995 if (machine_is_compatible("RackMac1,1")
1996 || machine_is_compatible("RackMac1,2")
1997 || machine_is_compatible("MacRISC4"))
2001 * Check whether an invalid uart number has been specified, and
2002 * if so, search for the first available port that does have
2005 if (co
->index
>= pmz_ports_count
)
2007 uap
= &pmz_ports
[co
->index
];
2008 if (uap
->node
== NULL
)
2013 * Mark port as beeing a console
2015 uap
->flags
|= PMACZILOG_FLAG_IS_CONS
;
2018 * Temporary fix for uart layer who didn't setup the spinlock yet
2020 spin_lock_init(&port
->lock
);
2023 * Enable the hardware
2025 pwr_delay
= __pmz_startup(uap
);
2030 uart_parse_options(options
, &baud
, &parity
, &bits
, &flow
);
2032 return uart_set_options(port
, co
, baud
, parity
, bits
, flow
);
2035 static int __init
pmz_console_init(void)
2040 /* TODO: Autoprobe console based on OF */
2041 /* pmz_console.index = i; */
2042 register_console(&pmz_console
);
2047 console_initcall(pmz_console_init
);
2048 #endif /* CONFIG_SERIAL_PMACZILOG_CONSOLE */
2050 module_init(init_pmz
);
2051 module_exit(exit_pmz
);