1#include <linux/module.h>
2#include <linux/init.h>
3#include <linux/console.h>
4#include <linux/platform_device.h>
5#include <linux/serial_core.h>
6#include <linux/tty_flip.h>
7#include <linux/of.h>
8#include <linux/gpio.h>
9#include <linux/of_irq.h>
10#include <linux/of_address.h>
11#include <hwregs/ser_defs.h>
12
13#define DRV_NAME "etraxfs-uart"
14#define UART_NR CONFIG_ETRAX_SERIAL_PORTS
15
16#define MODIFY_REG(instance, reg, var)				\
17	do {							\
18		if (REG_RD_INT(ser, instance, reg) !=		\
19		    REG_TYPE_CONV(int, reg_ser_##reg, var))	\
20			REG_WR(ser, instance, reg, var);	\
21	} while (0)
22
23struct uart_cris_port {
24	struct uart_port port;
25
26	int initialized;
27	int irq;
28
29	void __iomem *regi_ser;
30
31	struct gpio_desc *dtr_pin;
32	struct gpio_desc *dsr_pin;
33	struct gpio_desc *ri_pin;
34	struct gpio_desc *cd_pin;
35
36	int write_ongoing;
37};
38
39static struct uart_driver etraxfs_uart_driver;
40static struct uart_port *console_port;
41static int console_baud = 115200;
42static struct uart_cris_port *etraxfs_uart_ports[UART_NR];
43
44static void cris_serial_port_init(struct uart_port *port, int line);
45static void etraxfs_uart_stop_rx(struct uart_port *port);
46static inline void etraxfs_uart_start_tx_bottom(struct uart_port *port);
47
48#ifdef CONFIG_SERIAL_ETRAXFS_CONSOLE
49static void
50cris_console_write(struct console *co, const char *s, unsigned int count)
51{
52	struct uart_cris_port *up;
53	int i;
54	reg_ser_r_stat_din stat;
55	reg_ser_rw_tr_dma_en tr_dma_en, old;
56
57	up = etraxfs_uart_ports[co->index];
58
59	if (!up)
60		return;
61
62	/* Switch to manual mode. */
63	tr_dma_en = old = REG_RD(ser, up->regi_ser, rw_tr_dma_en);
64	if (tr_dma_en.en == regk_ser_yes) {
65		tr_dma_en.en = regk_ser_no;
66		REG_WR(ser, up->regi_ser, rw_tr_dma_en, tr_dma_en);
67	}
68
69	/* Send data. */
70	for (i = 0; i < count; i++) {
71		/* LF -> CRLF */
72		if (s[i] == '\n') {
73			do {
74				stat = REG_RD(ser, up->regi_ser, r_stat_din);
75			} while (!stat.tr_rdy);
76			REG_WR_INT(ser, up->regi_ser, rw_dout, '\r');
77		}
78		/* Wait until transmitter is ready and send. */
79		do {
80			stat = REG_RD(ser, up->regi_ser, r_stat_din);
81		} while (!stat.tr_rdy);
82		REG_WR_INT(ser, up->regi_ser, rw_dout, s[i]);
83	}
84
85	/* Restore mode. */
86	if (tr_dma_en.en != old.en)
87		REG_WR(ser, up->regi_ser, rw_tr_dma_en, old);
88}
89
90static int __init
91cris_console_setup(struct console *co, char *options)
92{
93	struct uart_port *port;
94	int baud = 115200;
95	int bits = 8;
96	int parity = 'n';
97	int flow = 'n';
98
99	if (co->index < 0 || co->index >= UART_NR)
100		co->index = 0;
101	port = &etraxfs_uart_ports[co->index]->port;
102	console_port = port;
103
104	co->flags |= CON_CONSDEV;
105
106	if (options)
107		uart_parse_options(options, &baud, &parity, &bits, &flow);
108	console_baud = baud;
109	cris_serial_port_init(port, co->index);
110	uart_set_options(port, co, baud, parity, bits, flow);
111
112	return 0;
113}
114
115static struct tty_driver *cris_console_device(struct console *co, int *index)
116{
117	struct uart_driver *p = co->data;
118	*index = co->index;
119	return p->tty_driver;
120}
121
122static struct console cris_console = {
123	.name = "ttyS",
124	.write = cris_console_write,
125	.device = cris_console_device,
126	.setup = cris_console_setup,
127	.flags = CON_PRINTBUFFER,
128	.index = -1,
129	.data = &etraxfs_uart_driver,
130};
131#endif /* CONFIG_SERIAL_ETRAXFS_CONSOLE */
132
133static struct uart_driver etraxfs_uart_driver = {
134	.owner = THIS_MODULE,
135	.driver_name = "serial",
136	.dev_name = "ttyS",
137	.major = TTY_MAJOR,
138	.minor = 64,
139	.nr = UART_NR,
140#ifdef CONFIG_SERIAL_ETRAXFS_CONSOLE
141	.cons = &cris_console,
142#endif /* CONFIG_SERIAL_ETRAXFS_CONSOLE */
143};
144
145static inline int crisv32_serial_get_rts(struct uart_cris_port *up)
146{
147	void __iomem *regi_ser = up->regi_ser;
148	/*
149	 * Return what the user has controlled rts to or
150	 * what the pin is? (if auto_rts is used it differs during tx)
151	 */
152	reg_ser_r_stat_din rstat = REG_RD(ser, regi_ser, r_stat_din);
153
154	return !(rstat.rts_n == regk_ser_active);
155}
156
157/*
158 * A set = 0 means 3.3V on the pin, bitvalue: 0=active, 1=inactive
159 *                                            0=0V    , 1=3.3V
160 */
161static inline void crisv32_serial_set_rts(struct uart_cris_port *up,
162					  int set, int force)
163{
164	void __iomem *regi_ser = up->regi_ser;
165
166	unsigned long flags;
167	reg_ser_rw_rec_ctrl rec_ctrl;
168
169	local_irq_save(flags);
170	rec_ctrl = REG_RD(ser, regi_ser, rw_rec_ctrl);
171
172	if (set)
173		rec_ctrl.rts_n = regk_ser_active;
174	else
175		rec_ctrl.rts_n = regk_ser_inactive;
176	REG_WR(ser, regi_ser, rw_rec_ctrl, rec_ctrl);
177	local_irq_restore(flags);
178}
179
180static inline int crisv32_serial_get_cts(struct uart_cris_port *up)
181{
182	void __iomem *regi_ser = up->regi_ser;
183	reg_ser_r_stat_din rstat = REG_RD(ser, regi_ser, r_stat_din);
184
185	return (rstat.cts_n == regk_ser_active);
186}
187
188/*
189 * Send a single character for XON/XOFF purposes.  We do it in this separate
190 * function instead of the alternative support port.x_char, in the ...start_tx
191 * function, so we don't mix up this case with possibly enabling transmission
192 * of queued-up data (in case that's disabled after *receiving* an XOFF or
193 * negative CTS).  This function is used for both DMA and non-DMA case; see HW
194 * docs specifically blessing sending characters manually when DMA for
195 * transmission is enabled and running.  We may be asked to transmit despite
196 * the transmitter being disabled by a ..._stop_tx call so we need to enable
197 * it temporarily but restore the state afterwards.
198 */
199static void etraxfs_uart_send_xchar(struct uart_port *port, char ch)
200{
201	struct uart_cris_port *up = (struct uart_cris_port *)port;
202	reg_ser_rw_dout dout = { .data = ch };
203	reg_ser_rw_ack_intr ack_intr = { .tr_rdy = regk_ser_yes };
204	reg_ser_r_stat_din rstat;
205	reg_ser_rw_tr_ctrl prev_tr_ctrl, tr_ctrl;
206	void __iomem *regi_ser = up->regi_ser;
207	unsigned long flags;
208
209	/*
210	 * Wait for tr_rdy in case a character is already being output.  Make
211	 * sure we have integrity between the register reads and the writes
212	 * below, but don't busy-wait with interrupts off and the port lock
213	 * taken.
214	 */
215	spin_lock_irqsave(&port->lock, flags);
216	do {
217		spin_unlock_irqrestore(&port->lock, flags);
218		spin_lock_irqsave(&port->lock, flags);
219		prev_tr_ctrl = tr_ctrl = REG_RD(ser, regi_ser, rw_tr_ctrl);
220		rstat = REG_RD(ser, regi_ser, r_stat_din);
221	} while (!rstat.tr_rdy);
222
223	/*
224	 * Ack an interrupt if one was just issued for the previous character
225	 * that was output.  This is required for non-DMA as the interrupt is
226	 * used as the only indicator that the transmitter is ready and it
227	 * isn't while this x_char is being transmitted.
228	 */
229	REG_WR(ser, regi_ser, rw_ack_intr, ack_intr);
230
231	/* Enable the transmitter in case it was disabled. */
232	tr_ctrl.stop = 0;
233	REG_WR(ser, regi_ser, rw_tr_ctrl, tr_ctrl);
234
235	/*
236	 * Finally, send the blessed character; nothing should stop it now,
237	 * except for an xoff-detected state, which we'll handle below.
238	 */
239	REG_WR(ser, regi_ser, rw_dout, dout);
240	up->port.icount.tx++;
241
242	/* There might be an xoff state to clear. */
243	rstat = REG_RD(ser, up->regi_ser, r_stat_din);
244
245	/*
246	 * Clear any xoff state that *may* have been there to
247	 * inhibit transmission of the character.
248	 */
249	if (rstat.xoff_detect) {
250		reg_ser_rw_xoff_clr xoff_clr = { .clr = 1 };
251		reg_ser_rw_tr_dma_en tr_dma_en;
252
253		REG_WR(ser, regi_ser, rw_xoff_clr, xoff_clr);
254		tr_dma_en = REG_RD(ser, regi_ser, rw_tr_dma_en);
255
256		/*
257		 * If we had an xoff state but cleared it, instead sneak in a
258		 * disabled state for the transmitter, after the character we
259		 * sent.  Thus we keep the port disabled, just as if the xoff
260		 * state was still in effect (or actually, as if stop_tx had
261		 * been called, as we stop DMA too).
262		 */
263		prev_tr_ctrl.stop = 1;
264
265		tr_dma_en.en = 0;
266		REG_WR(ser, regi_ser, rw_tr_dma_en, tr_dma_en);
267	}
268
269	/* Restore "previous" enabled/disabled state of the transmitter. */
270	REG_WR(ser, regi_ser, rw_tr_ctrl, prev_tr_ctrl);
271
272	spin_unlock_irqrestore(&port->lock, flags);
273}
274
275/*
276 * Do not spin_lock_irqsave or disable interrupts by other means here; it's
277 * already done by the caller.
278 */
279static void etraxfs_uart_start_tx(struct uart_port *port)
280{
281	struct uart_cris_port *up = (struct uart_cris_port *)port;
282
283	/* we have already done below if a write is ongoing */
284	if (up->write_ongoing)
285		return;
286
287	/* Signal that write is ongoing */
288	up->write_ongoing = 1;
289
290	etraxfs_uart_start_tx_bottom(port);
291}
292
293static inline void etraxfs_uart_start_tx_bottom(struct uart_port *port)
294{
295	struct uart_cris_port *up = (struct uart_cris_port *)port;
296	void __iomem *regi_ser = up->regi_ser;
297	reg_ser_rw_tr_ctrl tr_ctrl;
298	reg_ser_rw_intr_mask intr_mask;
299
300	tr_ctrl = REG_RD(ser, regi_ser, rw_tr_ctrl);
301	tr_ctrl.stop = regk_ser_no;
302	REG_WR(ser, regi_ser, rw_tr_ctrl, tr_ctrl);
303	intr_mask = REG_RD(ser, regi_ser, rw_intr_mask);
304	intr_mask.tr_rdy = regk_ser_yes;
305	REG_WR(ser, regi_ser, rw_intr_mask, intr_mask);
306}
307
308/*
309 * This function handles both the DMA and non-DMA case by ordering the
310 * transmitter to stop of after the current character.  We don't need to wait
311 * for any such character to be completely transmitted; we do that where it
312 * matters, like in etraxfs_uart_set_termios.  Don't busy-wait here; see
313 * Documentation/serial/driver: this function is called within
314 * spin_lock_irq{,save} and thus separate ones would be disastrous (when SMP).
315 * There's no documented need to set the txd pin to any particular value;
316 * break setting is controlled solely by etraxfs_uart_break_ctl.
317 */
318static void etraxfs_uart_stop_tx(struct uart_port *port)
319{
320	struct uart_cris_port *up = (struct uart_cris_port *)port;
321	void __iomem *regi_ser = up->regi_ser;
322	reg_ser_rw_tr_ctrl tr_ctrl;
323	reg_ser_rw_intr_mask intr_mask;
324	reg_ser_rw_tr_dma_en tr_dma_en = {0};
325	reg_ser_rw_xoff_clr xoff_clr = {0};
326
327	/*
328	 * For the non-DMA case, we'd get a tr_rdy interrupt that we're not
329	 * interested in as we're not transmitting any characters.  For the
330	 * DMA case, that interrupt is already turned off, but no reason to
331	 * waste code on conditionals here.
332	 */
333	intr_mask = REG_RD(ser, regi_ser, rw_intr_mask);
334	intr_mask.tr_rdy = regk_ser_no;
335	REG_WR(ser, regi_ser, rw_intr_mask, intr_mask);
336
337	tr_ctrl = REG_RD(ser, regi_ser, rw_tr_ctrl);
338	tr_ctrl.stop = 1;
339	REG_WR(ser, regi_ser, rw_tr_ctrl, tr_ctrl);
340
341	/*
342	 * Always clear possible hardware xoff-detected state here, no need to
343	 * unnecessary consider mctrl settings and when they change.  We clear
344	 * it here rather than in start_tx: both functions are called as the
345	 * effect of XOFF processing, but start_tx is also called when upper
346	 * levels tell the driver that there are more characters to send, so
347	 * avoid adding code there.
348	 */
349	xoff_clr.clr = 1;
350	REG_WR(ser, regi_ser, rw_xoff_clr, xoff_clr);
351
352	/*
353	 * Disable transmitter DMA, so that if we're in XON/XOFF, we can send
354	 * those single characters without also giving go-ahead for queued up
355	 * DMA data.
356	 */
357	tr_dma_en.en = 0;
358	REG_WR(ser, regi_ser, rw_tr_dma_en, tr_dma_en);
359
360	/*
361	 * Make sure that write_ongoing is reset when stopping tx.
362	 */
363	up->write_ongoing = 0;
364}
365
366static void etraxfs_uart_stop_rx(struct uart_port *port)
367{
368	struct uart_cris_port *up = (struct uart_cris_port *)port;
369	void __iomem *regi_ser = up->regi_ser;
370	reg_ser_rw_rec_ctrl rec_ctrl = REG_RD(ser, regi_ser, rw_rec_ctrl);
371
372	rec_ctrl.en = regk_ser_no;
373	REG_WR(ser, regi_ser, rw_rec_ctrl, rec_ctrl);
374}
375
376static void etraxfs_uart_enable_ms(struct uart_port *port)
377{
378}
379
380static void check_modem_status(struct uart_cris_port *up)
381{
382}
383
384static unsigned int etraxfs_uart_tx_empty(struct uart_port *port)
385{
386	struct uart_cris_port *up = (struct uart_cris_port *)port;
387	unsigned long flags;
388	unsigned int ret;
389	reg_ser_r_stat_din rstat = {0};
390
391	spin_lock_irqsave(&up->port.lock, flags);
392
393	rstat = REG_RD(ser, up->regi_ser, r_stat_din);
394	ret = rstat.tr_empty ? TIOCSER_TEMT : 0;
395
396	spin_unlock_irqrestore(&up->port.lock, flags);
397	return ret;
398}
399static unsigned int etraxfs_uart_get_mctrl(struct uart_port *port)
400{
401	struct uart_cris_port *up = (struct uart_cris_port *)port;
402	unsigned int ret;
403
404	ret = 0;
405	if (crisv32_serial_get_rts(up))
406		ret |= TIOCM_RTS;
407	/* DTR is active low */
408	if (up->dtr_pin && !gpiod_get_raw_value(up->dtr_pin))
409		ret |= TIOCM_DTR;
410	/* CD is active low */
411	if (up->cd_pin && !gpiod_get_raw_value(up->cd_pin))
412		ret |= TIOCM_CD;
413	/* RI is active low */
414	if (up->ri_pin && !gpiod_get_raw_value(up->ri_pin))
415		ret |= TIOCM_RI;
416	/* DSR is active low */
417	if (up->dsr_pin && !gpiod_get_raw_value(up->dsr_pin))
418		ret |= TIOCM_DSR;
419	if (crisv32_serial_get_cts(up))
420		ret |= TIOCM_CTS;
421	return ret;
422}
423
424static void etraxfs_uart_set_mctrl(struct uart_port *port, unsigned int mctrl)
425{
426	struct uart_cris_port *up = (struct uart_cris_port *)port;
427
428	crisv32_serial_set_rts(up, mctrl & TIOCM_RTS ? 1 : 0, 0);
429	/* DTR is active low */
430	if (up->dtr_pin)
431		gpiod_set_raw_value(up->dtr_pin, mctrl & TIOCM_DTR ? 0 : 1);
432	/* RI is active low */
433	if (up->ri_pin)
434		gpiod_set_raw_value(up->ri_pin, mctrl & TIOCM_RNG ? 0 : 1);
435	/* CD is active low */
436	if (up->cd_pin)
437		gpiod_set_raw_value(up->cd_pin, mctrl & TIOCM_CD ? 0 : 1);
438}
439
440static void etraxfs_uart_break_ctl(struct uart_port *port, int break_state)
441{
442	struct uart_cris_port *up = (struct uart_cris_port *)port;
443	unsigned long flags;
444	reg_ser_rw_tr_ctrl tr_ctrl;
445	reg_ser_rw_tr_dma_en tr_dma_en;
446	reg_ser_rw_intr_mask intr_mask;
447
448	spin_lock_irqsave(&up->port.lock, flags);
449	tr_ctrl = REG_RD(ser, up->regi_ser, rw_tr_ctrl);
450	tr_dma_en = REG_RD(ser, up->regi_ser, rw_tr_dma_en);
451	intr_mask = REG_RD(ser, up->regi_ser, rw_intr_mask);
452
453	if (break_state != 0) { /* Send break */
454		/*
455		 * We need to disable DMA (if used) or tr_rdy interrupts if no
456		 * DMA.  No need to make this conditional on use of DMA;
457		 * disabling will be a no-op for the other mode.
458		 */
459		intr_mask.tr_rdy = regk_ser_no;
460		tr_dma_en.en = 0;
461
462		/*
463		 * Stop transmission and set the txd pin to 0 after the
464		 * current character.  The txd setting will take effect after
465		 * any current transmission has completed.
466		 */
467		tr_ctrl.stop = 1;
468		tr_ctrl.txd = 0;
469	} else {
470		/* Re-enable the serial interrupt. */
471		intr_mask.tr_rdy = regk_ser_yes;
472
473		tr_ctrl.stop = 0;
474		tr_ctrl.txd = 1;
475	}
476	REG_WR(ser, up->regi_ser, rw_tr_ctrl, tr_ctrl);
477	REG_WR(ser, up->regi_ser, rw_tr_dma_en, tr_dma_en);
478	REG_WR(ser, up->regi_ser, rw_intr_mask, intr_mask);
479
480	spin_unlock_irqrestore(&up->port.lock, flags);
481}
482
483static void
484transmit_chars_no_dma(struct uart_cris_port *up)
485{
486	int max_count;
487	struct circ_buf *xmit = &up->port.state->xmit;
488
489	void __iomem *regi_ser = up->regi_ser;
490	reg_ser_r_stat_din rstat;
491	reg_ser_rw_ack_intr ack_intr = { .tr_rdy = regk_ser_yes };
492
493	if (uart_circ_empty(xmit) || uart_tx_stopped(&up->port)) {
494		/* No more to send, so disable the interrupt. */
495		reg_ser_rw_intr_mask intr_mask;
496
497		intr_mask = REG_RD(ser, regi_ser, rw_intr_mask);
498		intr_mask.tr_rdy = 0;
499		intr_mask.tr_empty = 0;
500		REG_WR(ser, regi_ser, rw_intr_mask, intr_mask);
501		up->write_ongoing = 0;
502		return;
503	}
504
505	/* If the serport is fast, we send up to max_count bytes before
506	   exiting the loop.  */
507	max_count = 64;
508	do {
509		reg_ser_rw_dout dout = { .data = xmit->buf[xmit->tail] };
510
511		REG_WR(ser, regi_ser, rw_dout, dout);
512		REG_WR(ser, regi_ser, rw_ack_intr, ack_intr);
513		xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE-1);
514		up->port.icount.tx++;
515		if (xmit->head == xmit->tail)
516			break;
517		rstat = REG_RD(ser, regi_ser, r_stat_din);
518	} while ((--max_count > 0) && rstat.tr_rdy);
519
520	if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
521		uart_write_wakeup(&up->port);
522}
523
524static void receive_chars_no_dma(struct uart_cris_port *up)
525{
526	reg_ser_rs_stat_din stat_din;
527	reg_ser_r_stat_din rstat;
528	struct tty_port *port;
529	struct uart_icount *icount;
530	int max_count = 16;
531	char flag;
532	reg_ser_rw_ack_intr ack_intr = { 0 };
533
534	rstat = REG_RD(ser, up->regi_ser, r_stat_din);
535	icount = &up->port.icount;
536	port = &up->port.state->port;
537
538	do {
539		stat_din = REG_RD(ser, up->regi_ser, rs_stat_din);
540
541		flag = TTY_NORMAL;
542		ack_intr.dav = 1;
543		REG_WR(ser, up->regi_ser, rw_ack_intr, ack_intr);
544		icount->rx++;
545
546		if (stat_din.framing_err | stat_din.par_err | stat_din.orun) {
547			if (stat_din.data == 0x00 &&
548			    stat_din.framing_err) {
549				/* Most likely a break. */
550				flag = TTY_BREAK;
551				icount->brk++;
552			} else if (stat_din.par_err) {
553				flag = TTY_PARITY;
554				icount->parity++;
555			} else if (stat_din.orun) {
556				flag = TTY_OVERRUN;
557				icount->overrun++;
558			} else if (stat_din.framing_err) {
559				flag = TTY_FRAME;
560				icount->frame++;
561			}
562		}
563
564		/*
565		 * If this becomes important, we probably *could* handle this
566		 * gracefully by keeping track of the unhandled character.
567		 */
568		if (!tty_insert_flip_char(port, stat_din.data, flag))
569			panic("%s: No tty buffer space", __func__);
570		rstat = REG_RD(ser, up->regi_ser, r_stat_din);
571	} while (rstat.dav && (max_count-- > 0));
572	spin_unlock(&up->port.lock);
573	tty_flip_buffer_push(port);
574	spin_lock(&up->port.lock);
575}
576
577static irqreturn_t
578ser_interrupt(int irq, void *dev_id)
579{
580	struct uart_cris_port *up = (struct uart_cris_port *)dev_id;
581	void __iomem *regi_ser;
582	int handled = 0;
583
584	spin_lock(&up->port.lock);
585
586	regi_ser = up->regi_ser;
587
588	if (regi_ser) {
589		reg_ser_r_masked_intr masked_intr;
590
591		masked_intr = REG_RD(ser, regi_ser, r_masked_intr);
592		/*
593		 * Check what interrupts are active before taking
594		 * actions. If DMA is used the interrupt shouldn't
595		 * be enabled.
596		 */
597		if (masked_intr.dav) {
598			receive_chars_no_dma(up);
599			handled = 1;
600		}
601		check_modem_status(up);
602
603		if (masked_intr.tr_rdy) {
604			transmit_chars_no_dma(up);
605			handled = 1;
606		}
607	}
608	spin_unlock(&up->port.lock);
609	return IRQ_RETVAL(handled);
610}
611
612#ifdef CONFIG_CONSOLE_POLL
613static int etraxfs_uart_get_poll_char(struct uart_port *port)
614{
615	reg_ser_rs_stat_din stat;
616	reg_ser_rw_ack_intr ack_intr = { 0 };
617	struct uart_cris_port *up = (struct uart_cris_port *)port;
618
619	do {
620		stat = REG_RD(ser, up->regi_ser, rs_stat_din);
621	} while (!stat.dav);
622
623	/* Ack the data_avail interrupt. */
624	ack_intr.dav = 1;
625	REG_WR(ser, up->regi_ser, rw_ack_intr, ack_intr);
626
627	return stat.data;
628}
629
630static void etraxfs_uart_put_poll_char(struct uart_port *port,
631					unsigned char c)
632{
633	reg_ser_r_stat_din stat;
634	struct uart_cris_port *up = (struct uart_cris_port *)port;
635
636	do {
637		stat = REG_RD(ser, up->regi_ser, r_stat_din);
638	} while (!stat.tr_rdy);
639	REG_WR_INT(ser, up->regi_ser, rw_dout, c);
640}
641#endif /* CONFIG_CONSOLE_POLL */
642
643static int etraxfs_uart_startup(struct uart_port *port)
644{
645	struct uart_cris_port *up = (struct uart_cris_port *)port;
646	unsigned long flags;
647	reg_ser_rw_intr_mask ser_intr_mask = {0};
648
649	ser_intr_mask.dav = regk_ser_yes;
650
651	if (request_irq(etraxfs_uart_ports[port->line]->irq, ser_interrupt,
652			0, DRV_NAME, etraxfs_uart_ports[port->line]))
653		panic("irq ser%d", port->line);
654
655	spin_lock_irqsave(&up->port.lock, flags);
656
657	REG_WR(ser, up->regi_ser, rw_intr_mask, ser_intr_mask);
658
659	etraxfs_uart_set_mctrl(&up->port, up->port.mctrl);
660
661	spin_unlock_irqrestore(&up->port.lock, flags);
662
663	return 0;
664}
665
666static void etraxfs_uart_shutdown(struct uart_port *port)
667{
668	struct uart_cris_port *up = (struct uart_cris_port *)port;
669	unsigned long flags;
670
671	spin_lock_irqsave(&up->port.lock, flags);
672
673	etraxfs_uart_stop_tx(port);
674	etraxfs_uart_stop_rx(port);
675
676	free_irq(etraxfs_uart_ports[port->line]->irq,
677		 etraxfs_uart_ports[port->line]);
678
679	etraxfs_uart_set_mctrl(&up->port, up->port.mctrl);
680
681	spin_unlock_irqrestore(&up->port.lock, flags);
682
683}
684
685static void
686etraxfs_uart_set_termios(struct uart_port *port, struct ktermios *termios,
687			 struct ktermios *old)
688{
689	struct uart_cris_port *up = (struct uart_cris_port *)port;
690	unsigned long flags;
691	reg_ser_rw_xoff xoff;
692	reg_ser_rw_xoff_clr xoff_clr = {0};
693	reg_ser_rw_tr_ctrl tx_ctrl = {0};
694	reg_ser_rw_tr_dma_en tx_dma_en = {0};
695	reg_ser_rw_rec_ctrl rx_ctrl = {0};
696	reg_ser_rw_tr_baud_div tx_baud_div = {0};
697	reg_ser_rw_rec_baud_div rx_baud_div = {0};
698	int baud;
699
700	if (old &&
701	    termios->c_cflag == old->c_cflag &&
702	    termios->c_iflag == old->c_iflag)
703		return;
704
705	/* Tx: 8 bit, no/even parity, 1 stop bit, no cts. */
706	tx_ctrl.base_freq = regk_ser_f29_493;
707	tx_ctrl.en = 0;
708	tx_ctrl.stop = 0;
709	tx_ctrl.auto_rts = regk_ser_no;
710	tx_ctrl.txd = 1;
711	tx_ctrl.auto_cts = 0;
712	/* Rx: 8 bit, no/even parity. */
713	rx_ctrl.dma_err = regk_ser_stop;
714	rx_ctrl.sampling = regk_ser_majority;
715	rx_ctrl.timeout = 1;
716
717	rx_ctrl.rts_n = regk_ser_inactive;
718
719	/* Common for tx and rx: 8N1. */
720	tx_ctrl.data_bits = regk_ser_bits8;
721	rx_ctrl.data_bits = regk_ser_bits8;
722	tx_ctrl.par = regk_ser_even;
723	rx_ctrl.par = regk_ser_even;
724	tx_ctrl.par_en = regk_ser_no;
725	rx_ctrl.par_en = regk_ser_no;
726
727	tx_ctrl.stop_bits = regk_ser_bits1;
728
729	/*
730	 * Change baud-rate and write it to the hardware.
731	 *
732	 * baud_clock = base_freq / (divisor*8)
733	 * divisor = base_freq / (baud_clock * 8)
734	 * base_freq is either:
735	 * off, ext, 29.493MHz, 32.000 MHz, 32.768 MHz or 100 MHz
736	 * 20.493MHz is used for standard baudrates
737	 */
738
739	/*
740	 * For the console port we keep the original baudrate here.  Not very
741	 * beautiful.
742	 */
743	if ((port != console_port) || old)
744		baud = uart_get_baud_rate(port, termios, old, 0,
745					  port->uartclk / 8);
746	else
747		baud = console_baud;
748
749	tx_baud_div.div = 29493000 / (8 * baud);
750	/* Rx uses same as tx. */
751	rx_baud_div.div = tx_baud_div.div;
752	rx_ctrl.base_freq = tx_ctrl.base_freq;
753
754	if ((termios->c_cflag & CSIZE) == CS7) {
755		/* Set 7 bit mode. */
756		tx_ctrl.data_bits = regk_ser_bits7;
757		rx_ctrl.data_bits = regk_ser_bits7;
758	}
759
760	if (termios->c_cflag & CSTOPB) {
761		/* Set 2 stop bit mode. */
762		tx_ctrl.stop_bits = regk_ser_bits2;
763	}
764
765	if (termios->c_cflag & PARENB) {
766		/* Enable parity. */
767		tx_ctrl.par_en = regk_ser_yes;
768		rx_ctrl.par_en = regk_ser_yes;
769	}
770
771	if (termios->c_cflag & CMSPAR) {
772		if (termios->c_cflag & PARODD) {
773			/* Set mark parity if PARODD and CMSPAR. */
774			tx_ctrl.par = regk_ser_mark;
775			rx_ctrl.par = regk_ser_mark;
776		} else {
777			tx_ctrl.par = regk_ser_space;
778			rx_ctrl.par = regk_ser_space;
779		}
780	} else {
781		if (termios->c_cflag & PARODD) {
782			/* Set odd parity. */
783		       tx_ctrl.par = regk_ser_odd;
784		       rx_ctrl.par = regk_ser_odd;
785		}
786	}
787
788	if (termios->c_cflag & CRTSCTS) {
789		/* Enable automatic CTS handling. */
790		tx_ctrl.auto_cts = regk_ser_yes;
791	}
792
793	/* Make sure the tx and rx are enabled. */
794	tx_ctrl.en = regk_ser_yes;
795	rx_ctrl.en = regk_ser_yes;
796
797	spin_lock_irqsave(&port->lock, flags);
798
799	tx_dma_en.en = 0;
800	REG_WR(ser, up->regi_ser, rw_tr_dma_en, tx_dma_en);
801
802	/* Actually write the control regs (if modified) to the hardware. */
803	uart_update_timeout(port, termios->c_cflag, port->uartclk/8);
804	MODIFY_REG(up->regi_ser, rw_rec_baud_div, rx_baud_div);
805	MODIFY_REG(up->regi_ser, rw_rec_ctrl, rx_ctrl);
806
807	MODIFY_REG(up->regi_ser, rw_tr_baud_div, tx_baud_div);
808	MODIFY_REG(up->regi_ser, rw_tr_ctrl, tx_ctrl);
809
810	tx_dma_en.en = 0;
811	REG_WR(ser, up->regi_ser, rw_tr_dma_en, tx_dma_en);
812
813	xoff = REG_RD(ser, up->regi_ser, rw_xoff);
814
815	if (up->port.state && up->port.state->port.tty &&
816	    (up->port.state->port.tty->termios.c_iflag & IXON)) {
817		xoff.chr = STOP_CHAR(up->port.state->port.tty);
818		xoff.automatic = regk_ser_yes;
819	} else
820		xoff.automatic = regk_ser_no;
821
822	MODIFY_REG(up->regi_ser, rw_xoff, xoff);
823
824	/*
825	 * Make sure we don't start in an automatically shut-off state due to
826	 * a previous early exit.
827	 */
828	xoff_clr.clr = 1;
829	REG_WR(ser, up->regi_ser, rw_xoff_clr, xoff_clr);
830
831	etraxfs_uart_set_mctrl(&up->port, up->port.mctrl);
832	spin_unlock_irqrestore(&up->port.lock, flags);
833}
834
835static const char *
836etraxfs_uart_type(struct uart_port *port)
837{
838	return "CRISv32";
839}
840
841static void etraxfs_uart_release_port(struct uart_port *port)
842{
843}
844
845static int etraxfs_uart_request_port(struct uart_port *port)
846{
847	return 0;
848}
849
850static void etraxfs_uart_config_port(struct uart_port *port, int flags)
851{
852	struct uart_cris_port *up = (struct uart_cris_port *)port;
853
854	up->port.type = PORT_CRIS;
855}
856
857static const struct uart_ops etraxfs_uart_pops = {
858	.tx_empty = etraxfs_uart_tx_empty,
859	.set_mctrl = etraxfs_uart_set_mctrl,
860	.get_mctrl = etraxfs_uart_get_mctrl,
861	.stop_tx = etraxfs_uart_stop_tx,
862	.start_tx = etraxfs_uart_start_tx,
863	.send_xchar = etraxfs_uart_send_xchar,
864	.stop_rx = etraxfs_uart_stop_rx,
865	.enable_ms = etraxfs_uart_enable_ms,
866	.break_ctl = etraxfs_uart_break_ctl,
867	.startup = etraxfs_uart_startup,
868	.shutdown = etraxfs_uart_shutdown,
869	.set_termios = etraxfs_uart_set_termios,
870	.type = etraxfs_uart_type,
871	.release_port = etraxfs_uart_release_port,
872	.request_port = etraxfs_uart_request_port,
873	.config_port = etraxfs_uart_config_port,
874#ifdef CONFIG_CONSOLE_POLL
875	.poll_get_char = etraxfs_uart_get_poll_char,
876	.poll_put_char = etraxfs_uart_put_poll_char,
877#endif
878};
879
880static void cris_serial_port_init(struct uart_port *port, int line)
881{
882	struct uart_cris_port *up = (struct uart_cris_port *)port;
883
884	if (up->initialized)
885		return;
886	up->initialized = 1;
887	port->line = line;
888	spin_lock_init(&port->lock);
889	port->ops = &etraxfs_uart_pops;
890	port->irq = up->irq;
891	port->iobase = (unsigned long) up->regi_ser;
892	port->uartclk = 29493000;
893
894	/*
895	 * We can't fit any more than 255 here (unsigned char), though
896	 * actually UART_XMIT_SIZE characters could be pending output.
897	 * At time of this writing, the definition of "fifosize" is here the
898	 * amount of characters that can be pending output after a start_tx call
899	 * until tx_empty returns 1: see serial_core.c:uart_wait_until_sent.
900	 * This matters for timeout calculations unfortunately, but keeping
901	 * larger amounts at the DMA wouldn't win much so let's just play nice.
902	 */
903	port->fifosize = 255;
904	port->flags = UPF_BOOT_AUTOCONF;
905}
906
907static int etraxfs_uart_probe(struct platform_device *pdev)
908{
909	struct device_node *np = pdev->dev.of_node;
910	struct uart_cris_port *up;
911	int dev_id;
912
913	if (!np)
914		return -ENODEV;
915
916	dev_id = of_alias_get_id(np, "serial");
917	if (dev_id < 0)
918		dev_id = 0;
919
920	if (dev_id >= UART_NR)
921		return -EINVAL;
922
923	if (etraxfs_uart_ports[dev_id])
924		return -EBUSY;
925
926	up = devm_kzalloc(&pdev->dev, sizeof(struct uart_cris_port),
927			  GFP_KERNEL);
928	if (!up)
929		return -ENOMEM;
930
931	up->irq = irq_of_parse_and_map(np, 0);
932	up->regi_ser = of_iomap(np, 0);
933	up->dtr_pin = devm_gpiod_get_optional(&pdev->dev, "dtr");
934	up->dsr_pin = devm_gpiod_get_optional(&pdev->dev, "dsr");
935	up->ri_pin = devm_gpiod_get_optional(&pdev->dev, "ri");
936	up->cd_pin = devm_gpiod_get_optional(&pdev->dev, "cd");
937	up->port.dev = &pdev->dev;
938	cris_serial_port_init(&up->port, dev_id);
939
940	etraxfs_uart_ports[dev_id] = up;
941	platform_set_drvdata(pdev, &up->port);
942	uart_add_one_port(&etraxfs_uart_driver, &up->port);
943
944	return 0;
945}
946
947static int etraxfs_uart_remove(struct platform_device *pdev)
948{
949	struct uart_port *port;
950
951	port = platform_get_drvdata(pdev);
952	uart_remove_one_port(&etraxfs_uart_driver, port);
953	etraxfs_uart_ports[pdev->id] = NULL;
954
955	return 0;
956}
957
958static const struct of_device_id etraxfs_uart_dt_ids[] = {
959	{ .compatible = "axis,etraxfs-uart" },
960	{ /* sentinel */ }
961};
962
963MODULE_DEVICE_TABLE(of, etraxfs_uart_dt_ids);
964
965static struct platform_driver etraxfs_uart_platform_driver = {
966	.driver = {
967		.name   = DRV_NAME,
968		.of_match_table	= of_match_ptr(etraxfs_uart_dt_ids),
969	},
970	.probe          = etraxfs_uart_probe,
971	.remove         = etraxfs_uart_remove,
972};
973
974static int __init etraxfs_uart_init(void)
975{
976	int ret;
977
978	ret = uart_register_driver(&etraxfs_uart_driver);
979	if (ret)
980		return ret;
981
982	ret = platform_driver_register(&etraxfs_uart_platform_driver);
983	if (ret)
984		uart_unregister_driver(&etraxfs_uart_driver);
985
986	return ret;
987}
988
989static void __exit etraxfs_uart_exit(void)
990{
991	platform_driver_unregister(&etraxfs_uart_platform_driver);
992	uart_unregister_driver(&etraxfs_uart_driver);
993}
994
995module_init(etraxfs_uart_init);
996module_exit(etraxfs_uart_exit);
997