#include <linux/module.h>
#include <linux/init.h>
#include <linux/kernel.h> /* printk() */
#include <linux/slab.h> /* kmalloc() */
#include <linux/fs.h> /* everything... */
#include <linux/errno.h> /* error codes */
#include <linux/types.h> /* size_t */
#include <linux/fcntl.h> /* O_ACCMODE */
#include <asm/system.h> /* cli(), *_flags */
#include <asm/uaccess.h> /* copy_*_user */
#include <linux/ioctl.h>
#include <linux/device.h>
#include <linux/platform_device.h>
#include <linux/sysrq.h>
#include <linux/tty.h>
#include <linux/tty_flip.h>
#include <linux/serial_core.h>
#include <linux/serial.h>
#include <linux/delay.h>
#include <linux/clk.h>
#include <linux/console.h>
#include <asm/io.h>
#include <asm/irq.h>
#include <asm/hardware.h>
#include <asm/plat-s3c/regs-serial.h>
#include <asm/arch/regs-gpio.h>
#define DEV_NAME "gprs_uart" /* 设备名 */
/* 这里将串口的主设备号设为0,则串口设备编号由内核动态分配;你也可指定串口的设备编号 */
#define GPRS_UART_MAJOR 0 /* 主设备号 */
#define GPRS_UART_MINOR 0 /* 次设备号 */
#define GPRS_UART_FIFO_SIZE 16 /* 串口FIFO的大小 */
#define RXSTAT_DUMMY_READ (0x10000000)
#define MAP_SIZE (0x100) /* 要映射的串口IO内存区大小 */
/* 串口发送中断号 */
#define TX_IRQ(port) ((port)->irq + 1)
/* 串口接收中断号 */
#define RX_IRQ(port) ((port)->irq)
/* 允许串口接收字符的标志 */
#define tx_enabled(port) ((port)->unused[0])
/* 允许串口发送字符的标志 */
#define rx_enabled(port) ((port)->unused[1])
/* 获取寄存器地址 */
#define portaddr(port, reg) ((port)->membase + (reg))
/* 读8位宽的寄存器 */
#define rd_regb(port, reg) (ioread8(portaddr(port, reg)))
/* 读32位宽的寄存器 */
#define rd_regl(port, reg) (ioread32(portaddr(port, reg)))
/* 写8位宽的寄存器 */
#define wr_regb(port, reg, val) \
do { iowrite8(val, portaddr(port, reg)); } while(0)
/* 写32位宽的寄存器 */
#define wr_regl(port, reg, val) \
do { iowrite32(val, portaddr(port, reg)); } while(0)
/* 禁止串口发送数据 */
static void gprs_uart_stop_tx(struct uart_port *port)
{
if (tx_enabled(port)) /* 若串口已启动发送 */
{
disable_irq(TX_IRQ(port)); /* 禁止发送中断 */
tx_enabled(port) = 0; /* 设置串口为未启动发送 */
}
}
/* 使能串口发送数据 */
static void gprs_uart_start_tx(struct uart_port *port)
{
if (!tx_enabled(port)) /* 若串口未启动发送 */
{
enable_irq(TX_IRQ(port)); /* 使能发送中断 */
tx_enabled(port) = 1; /* 设置串口为已启动发送 */
}
}
/* 禁止串口接收数据 */
static void gprs_uart_stop_rx(struct uart_port *port)
{
if (rx_enabled(port)) /* 若串口已启动接收 */
{
disable_irq(RX_IRQ(port)); /* 禁止接收中断 */
rx_enabled(port) = 0; /* 设置串口为未启动接收 */
}
}
/* 使能modem的状态信号 */
static void gprs_uart_enable_ms(struct uart_port *port)
{
}
/* 串口的Tx FIFO缓存是否为空 */
static unsigned int gprs_uart_tx_empty(struct uart_port *port)
{
int ret = 1;
unsigned long ufstat = rd_regl(port, S3C2410_UFSTAT);
unsigned long ufcon = rd_regl(port, S3C2410_UFCON);
if (ufcon & S3C2410_UFCON_FIFOMODE) /* 若使能了FIFO */
{
if ((ufstat & S3C2410_UFSTAT_TXMASK) != 0 || /* 0 <FIFO <=15 */
(ufstat & S3C2410_UFSTAT_TXFULL)) /* FIFO满 */
ret = 0;
}
else /* 若未使能了FIFO,则判断发送缓存和发送移位寄存器是否均为空 */
{
ret = rd_regl(port, S3C2410_UTRSTAT) & S3C2410_UTRSTAT_TXE;
}
return ret;
}
/* 获取串口modem控制,因为uart2无modem控制,所以CTS、DSR直接返回有效 */
static unsigned int gprs_uart_get_mctrl(struct uart_port *port)
{
return (TIOCM_CTS | TIOCM_DSR | TIOCM_CAR);
}
/* 设置串口modem控制 */
static void gprs_uart_set_mctrl(struct uart_port *port, unsigned int mctrl)
{
}
/* 设置break信号 */
static void gprs_uart_break_ctl(struct uart_port *port, int break_state)
{
unsigned long flags;
unsigned int ucon;
spin_lock_irqsave(&port->lock, flags);
ucon = rd_regl(port, S3C2410_UCON);
if (break_state)
ucon |= S3C2410_UCON_SBREAK;
else
ucon &= ~S3C2410_UCON_SBREAK;
wr_regl(port, S3C2410_UCON, ucon);
spin_unlock_irqrestore(&port->lock, flags);
}
/* 返回Rx FIFO已存多少数据 */
static int gprs_uart_rx_fifocnt(unsigned long ufstat)
{
/* 若Rx FIFO已满,返回FIFO的大小 */
if (ufstat & S3C2410_UFSTAT_RXFULL)
return GPRS_UART_FIFO_SIZE;
/* 若FIFO未满,返回Rx FIFO已存了多少字节数据 */
return (ufstat & S3C2410_UFSTAT_RXMASK) >> S3C2410_UFSTAT_RXSHIFT;
}
#define S3C2410_UERSTAT_PARITY (0x1000)
/* 串口接收中断处理函数,获取串口接收到的数据,并将这些数据递交给行规则层 */
static irqreturn_t gprs_uart_rx_chars(int irq, void *dev_id)
{
struct uart_port *port = dev_id;
struct tty_struct *tty = port->info->tty;
unsigned int ufcon, ch, flag, ufstat, uerstat;
int max_count = 64;
/* 循环接收数据,最多一次中断接收64字节数据 */
while (max_count-- > 0)
{
ufcon = rd_regl(port, S3C2410_UFCON);
ufstat = rd_regl(port, S3C2410_UFSTAT);
/* 若Rx FIFO无数据了,跳出循环 */
if (gprs_uart_rx_fifocnt(ufstat) == 0)
break;
/* 读取Rx error状态寄存器 */
uerstat = rd_regl(port, S3C2410_UERSTAT);
/* 读取已接受到的数据 */
ch = rd_regb(port, S3C2410_URXH);
/* insert the character into the buffer */
/* 先将tty标志设为正常 */
flag = TTY_NORMAL;
/* 递增接收字符计数器 */
port->icount.rx++;
/* 判断是否存在Rx error
* if (unlikely(uerstat & S3C2410_UERSTAT_ANY))等同于
* if (uerstat & S3C2410_UERSTAT_ANY)
* 只是unlikely表示uerstat & S3C2410_UERSTAT_ANY的值为假的可能性大一些
* 另外还有一个likely(value)表示value的值为真的可能性更大一些
*/
if (unlikely(uerstat & S3C2410_UERSTAT_ANY))
{
/* 若break错误,递增icount.brk计算器 */
if (uerstat & S3C2410_UERSTAT_BREAK)
{
port->icount.brk++;
if (uart_handle_break(port))
goto ignore_char;
}
/* 若frame错误,递增icount.frame计算器 */
if (uerstat & S3C2410_UERSTAT_FRAME)
port->icount.frame++;
/* 若overrun错误,递增icount.overrun计算器 */
if (uerstat & S3C2410_UERSTAT_OVERRUN)
port->icount.overrun++;
/* 查看我们是否关心该Rx error
* port->read_status_mask保存着我们感兴趣的Rx error status
*/
uerstat &= port->read_status_mask;
/* 若我们关心该Rx error,则将flag设置为对应的error flag */
if (uerstat & S3C2410_UERSTAT_BREAK)
flag = TTY_BREAK;
else if (uerstat & S3C2410_UERSTAT_PARITY)
flag = TTY_PARITY;
else if (uerstat & ( S3C2410_UERSTAT_FRAME | S3C2410_UERSTAT_OVERRUN))
flag = TTY_FRAME;
}
/* 处理sys字符 */
if (uart_handle_sysrq_char(port, ch))
goto ignore_char;
/* 将接收到的字符插入到tty设备的flip缓冲 */
uart_insert_char(port, uerstat, S3C2410_UERSTAT_OVERRUN, ch, flag);
ignore_char:
continue;
}
/* 刷新tty设备的flip缓冲,将接受到的数据传给行规则层 */
tty_flip_buffer_push(tty);
return IRQ_HANDLED;
}
/* 串口发送中断处理函数,将用户空间的数据(保存在环形缓冲xmit里)发送出去 */
static irqreturn_t gprs_uart_tx_chars(int irq, void *dev_id)
{
struct uart_port *port = dev_id;
struct circ_buf *xmit = &port->info->xmit; /* 获取环线缓冲 */
int count = 256;
/* 若设置了xChar字符 */
if (port->x_char)
{
/* 将该xChar发送出去 */
wr_regb(port, S3C2410_UTXH, port->x_char);
/* 递增发送计数 */
port->icount.tx++;
/* 清除xChar */
port->x_char = 0;
/* 退出中断处理 */
goto out;
}
/* 如果没有更多的字符需要发送(环形缓冲为空),
* 或者uart Tx已停止,
* 则停止uart并退出中断处理函数
*/
if (uart_circ_empty(xmit) || uart_tx_stopped(port))
{
gprs_uart_stop_tx(port);
goto out;
}
/* 循环发送数据,直到环形缓冲为空,最多一次中断发送256字节数据 */
while (!uart_circ_empty(xmit) && count-- > 0)
{
/* 若Tx FIFO已满,退出循环 */
if (rd_regl(port, S3C2410_UFSTAT) & S3C2410_UFSTAT_TXFULL)
break;
/* 将要发送的数据写入Tx FIFO */
wr_regb(port, S3C2410_UTXH, xmit->buf[xmit->tail]);
/* 移向循环缓冲中下一要发送的数据 */
xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
port->icount.tx++;
}
/* 如果环形缓冲区中剩余的字符少于WAKEUP_CHARS,唤醒上层 */
if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
uart_write_wakeup(port);
/* 如果环形缓冲为空,则停止发送 */
if (uart_circ_empty(xmit))
gprs_uart_stop_tx(port);
out:
return IRQ_HANDLED;
}
/* 启动串口端口,在打开该驱动的设备文件时会调用该函数来申请串口中断,并设置串口为可接受,也可发送 */
static int gprs_uart_startup(struct uart_port *port)
{
unsigned long flags;
int ret;
const char *portname = to_platform_device(port->dev)->name;
/* 设置串口为不可接受,也不可发送 */
rx_enabled(port) = 0;
tx_enabled(port) = 0;
spin_lock_irqsave(&port->lock, flags);
/* 申请接收中断 */
ret = request_irq(RX_IRQ(port), gprs_uart_rx_chars, 0, portname, port);
if (ret != 0)
{
printk(KERN_ERR "cannot get irq %d\n", RX_IRQ(port));
return ret;
}
/* 设置串口为允许接收 */
rx_enabled(port) = 1;
/* 申请发送中断 */
ret = request_irq(TX_IRQ(port), gprs_uart_tx_chars, 0, portname, port);
if (ret)
{
printk(KERN_ERR "cannot get irq %d\n", TX_IRQ(port));
rx_enabled(port) = 0;
free_irq(RX_IRQ(port), port);
goto err;
}
/* 设置串口为允许发送 */
tx_enabled(port) = 1;
err:
spin_unlock_irqrestore(&port->lock, flags);
return ret;
}
/* 关闭串口,在关闭驱动的设备文件时会调用该函数,释放串口中断 */
static void gprs_uart_shutdown(struct uart_port *port)
{
rx_enabled(port) = 0; /* 设置串口为不允许接收 */
free_irq(RX_IRQ(port), port); /* 释放接收中断 */
tx_enabled(port) = 0; /* 设置串口为不允许发送 */
free_irq(TX_IRQ(port), port); /* 释放发送中断 */
}
/* 设置串口参数 */
static void gprs_uart_set_termios(struct uart_port *port,
struct ktermios *termios,
struct ktermios *old)
{
unsigned long flags;
unsigned int baud, quot;
unsigned int ulcon, ufcon = 0;
/* 不支持moden控制信号线
* HUPCL: 关闭时挂断moden
* CMSPAR: mark or space (stick) parity
* CLOCAL: 忽略任何moden控制线
*/
termios->c_cflag &= ~(HUPCL | CMSPAR);
termios->c_cflag |= CLOCAL;
/* 获取用户设置的串口波特率,并计算分频数(串口波特率除数quot) */
baud = uart_get_baud_rate(port, termios, old, 0, 115200*8);
if (baud == 38400 && (port->flags & UPF_SPD_MASK) == UPF_SPD_CUST)
quot = port->custom_divisor;
else
quot = port->uartclk / baud / 16 - 1;
/* 设置数据字长 */
switch (termios->c_cflag & CSIZE)
{
case CS5:
ulcon = S3C2410_LCON_CS5;
break;
case CS6:
ulcon = S3C2410_LCON_CS6;
break;
case CS7:
ulcon = S3C2410_LCON_CS7;
break;
case CS8:
default:
ulcon = S3C2410_LCON_CS8;
break;
}
/* 是否要求设置两个停止位(CSTOPB) */
if (termios->c_cflag & CSTOPB)
ulcon |= S3C2410_LCON_STOPB;
/* 是否使用奇偶检验 */
if (termios->c_cflag & PARENB)
{
if (termios->c_cflag & PARODD) /* 奇校验 */
ulcon |= S3C2410_LCON_PODD;
else /* 偶校验 */
ulcon |= S3C2410_LCON_PEVEN;
}
else /* 无校验 */
{
ulcon |= S3C2410_LCON_PNONE;
}
if (port->fifosize > 1)
ufcon |= S3C2410_UFCON_FIFOMODE | S3C2410_UFCON_RXTRIG8;
spin_lock_irqsave(&port->lock, flags);
/* 设置FIFO控制寄存器、线控制寄存器和波特率除数寄存器 */
wr_regl(port, S3C2410_UFCON, ufcon);
wr_regl(port, S3C2410_ULCON, ulcon);
&nb *博客内容为网友个人发布,仅代表博主个人观点,如有侵权请联系工作人员删除。
|