modem.c
上传用户:zddz2006
上传日期:2020-12-03
资源大小:261k
文件大小:14k
- /****************************************Copyright (c)**************************************************
- ** 广州周立功单片机发展有限公司
- ** 研 究 所
- ** 产品一部
- **
- ** http://www.zlgmcu.com
- **
- **--------------文件信息--------------------------------------------------------------------------------
- **文 件 名: uart0.c
- **创 建 人: 陈明计
- **最后修改日期: 2003年7月4日
- **描 述: μCOS-II下LPC2000的Modem底层驱动
- **
- **--------------历史版本信息----------------------------------------------------------------------------
- ** 创建人: 陈明计
- ** 版 本: v1.0
- ** 日 期: 2004年2月25日
- ** 描 述: 原始版本
- **
- **------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 版 本:
- ** 日 期:
- ** 描 述:
- **
- **--------------当前版本修订------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- ** 描 述:
- **
- **------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- #define IN_MODEM
- #include "config.h"
- static OS_EVENT *ModemSem, *Uart1Send, *Uart1Get;
- static uint8 ModemState;
- /*********************************************************************************************************
- ** 函数名称: UART1Init
- ** 功能描述: 初始化UART0
- ** 输 入: bps:波特率
- **
- ** 输 出:TRUE :成功
- ** FALSE:失败
- ** 全局变量: Uart0Sem
- ** 调用模块: OSSemCreate
- **
- ** 作 者: 陈明计
- ** 日 期: 2004年2月25日
- **-------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- **-------------------------------------------------------------------------------------------------------
- ** 修改人: 陈明计
- ** 日 期:
- **------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- void UART1Init(uint32 bps)
- {
- uint16 Fdiv;
-
- PINSEL0 = (PINSEL0 & 0x0000ffff) | 0x55550000; /* 选择管脚为UART0 */
- U1LCR = 0x80; /* 允许访问分频因子寄存器 */
- Fdiv = (Fpclk / 16) / bps; /* 设置波特率 */
- U1DLM = Fdiv / 256;
- U1DLL = Fdiv % 256;
- U1LCR = 0x03; /* 禁止访问分频因子寄存器 */
- /* 且设置为8,1,n */
- U1IER = 0x0f; /* 允许接收和发送中断 */
- U1FCR = 0x87; /* 初始化FIFO */
- U1MCR = 0x03;
- Uart1Send = OSSemCreate(1);
- Uart1Get = OSSemCreate(0);
- }
- /*********************************************************************************************************
- ** 函数名称: GetModemState
- ** 功能描述: 获取MODEM状态
- ** 输 入: 无
- **
- ** 输 出: MODEM状态
- ** 全局变量: 无
- ** 调用模块: 无
- **
- ** 作 者: 陈明计
- ** 日 期: 2004年2月25日
- **-------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- **------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- uint8 GetModemState(void)
- {
- return ModemState;
- }
- /*********************************************************************************************************
- ** 函数名称: ModemWrite
- ** 功能描述: 发送多个字节数据
- ** 输 入: Data:发送数据存储位置
- ** NByte:发送数据个数
- ** 输 出:无
- ** 全局变量: 无
- ** 调用模块: UART0Putch
- **
- ** 作 者: 陈明计
- ** 日 期: 2004年2月25日
- **-------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- **------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- uint8 ModemWrite(char *Data, uint16 NByte)
- {
- uint8 err,i;
-
- OSSemPend(ModemSem, 0, &err);
- while (NByte > 0)
- {
- OSSemPend(Uart1Send, 0, &err);
- for (i = 0; i < 8; i++)
- {
- U1THR = *Data++;
- NByte--;
- if (NByte == 0)
- {
- break;
- }
- }
- }
- OSSemPost(ModemSem);
- return ModemState;
- }
- /*********************************************************************************************************
- ** 函数名称: UART0Getch
- ** 功能描述: 接收一个字节
- ** 输 入: 无
- ** 输 出: 接收到的数据
- ** 全局变量: 无
- ** 调用模块: 无
- **
- ** 作 者: 陈明计
- ** 日 期: 2004年2月25日
- **-------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- **------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- uint8 ModemGetch(void)
- {
- uint8 rt;
- OS_ENTER_CRITICAL();
- while ((U1LSR & 0x00000001) == 0)
- { /* 没有收到数据 */
- U1IER = U1IER | 0x01; /* 允许接收中断 */
- OSSemPend(Uart1Get, 0, &rt);
- }
- rt = U1RBR; /* 读取收到的数据 */
- OS_EXIT_CRITICAL();
- return rt;
- }
- /*********************************************************************************************************
- ** 函数名称: ModemDialUp
- ** 功能描述: 通过modem拨号
- ** 输 入: 电话号码
- **
- ** 输 出: modem状态
- **
- ** 全局变量: ModemState
- ** 调用模块: ModemWrite,OSTimeDly
- **
- ** 作 者: 陈明计
- ** 日 期: 2004年2月25日
- **-------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- **-------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- uint8 ModemDialUp(char Number[])
- {
- char *cp;
- uint8 i;
- uint8 err;
-
- if (ModemState == MODEM_CLOSE)
- {
- while ((U1LSR & 0x00000001) != 0)
- {
- err = U1RBR;
- }
- ModemWrite("ATD", 3);
- i = 0;
- cp = Number;
- while (*cp++ != 0)
- {
- i++;
- }
- ModemWrite(Number, i);
- ModemWrite("rn", 2);
- U1IER = U1IER | 0x01; /* 允许接收中断 */
- for (i = 0; i < 120; i++)
- {
- OSTimeDly(OS_TICKS_PER_SEC);
- if (ModemState == MODEM_CONNECT)
- {
- break;
- }
- }
- }
- return ModemState;
- }
- /*********************************************************************************************************
- ** 函数名称: ModemDialDown
- ** 功能描述: 挂断modem
- ** 输 入: 无
- **
- ** 输 出: modem状态
- **
- ** 全局变量: ModemState
- ** 调用模块: OSTimeDly
- **
- ** 作 者: 陈明计
- ** 日 期: 2004年2月25日
- **-------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- **-------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- uint8 ModemDialDown(void)
- {
- U1MCR = 0x02;
- OSTimeDly(OS_TICKS_PER_SEC / 10);
- U1MCR = 0x03;
- OSTimeDly(OS_TICKS_PER_SEC / 10);
- return ModemState;
- }
- /*********************************************************************************************************
- ** 函数名称: ModemCommand
- ** 功能描述: 向modem发送命令
- ** 输 入: 命令字符串
- **
- ** 输 出: modem状态
- **
- ** 全局变量: ModemState
- ** 调用模块: ModemWrite,ModemGetch,
- **
- ** 作 者: 陈明计
- ** 日 期: 2004年2月25日
- **-------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- **-------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- uint8 ModemCommand(char *Command)
- {
- char *cp;
- uint8 i,err;
-
- if (ModemState == MODEM_CLOSE)
- {
- while ((U1LSR & 0x00000001) != 0)
- {
- err = U1RBR;
- }
-
- cp = Command;
- i = 0;
- while(*cp++ != 0)
- {
- i++;
- }
- ModemWrite(Command, i);
- ModemWrite("rn", 2);
- i = ModemGetch();
- if (i == 'A' || i == 'a')
- {
- while (1)
- {
- err = i;
- i = ModemGetch();
- if (err == 'O' || err == 'o')
- if (i == 'K' || i == 'k')
- {
- i = ModemGetch();
- i = ModemGetch();
- break;
- }
- }
- }
- else
- {
- while (1)
- {
- if (i == '0')
- {
- break;
- }
- i = ModemGetch();
- i = ModemGetch();
- }
- }
- }
- return ModemState;
- }
- /*********************************************************************************************************
- ** 函数名称: ModemInit
- ** 功能描述: 初始化Modem
- ** 输 入: 波特率
- **
- ** 输 出: modem状态
- **
- ** 全局变量: ModemState
- ** 调用模块: UART1Init,OSTimeDly,ModemCommand,
- **
- ** 作 者: 陈明计
- ** 日 期: 2004年2月25日
- **-------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- **-------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- uint8 ModemInit(uint32 bps)
- {
- ModemState = MODEM_CLOSE;
- UART1Init(bps);
- ModemSem = OSSemCreate(1);
- if (ModemSem != NULL)
- {
- if ((U1MSR & 0x30) != 0x30)
- {
- OSTimeDly(OS_TICKS_PER_SEC);
- if ((U1MSR & 0x30) != 0x30)
- {
- ModemState = NOT_FIND_MODEM;
- }
- }
- if (ModemState == MODEM_CLOSE)
- {
- ModemCommand("ATE0");
- ModemCommand("ATV0");
- ModemCommand("AT&C1");
- ModemCommand("AT&D2");
- ModemCommand("AT&R0");
- ModemCommand("AT&S0");
- ModemCommand("ATS0=2");
- }
- }
- else
- {
- ModemState = NOT_INIT_MODEM;
- }
- return ModemState;
- }
- /*********************************************************************************************************
- ** 函数名称: UART1_Exception
- ** 功能描述: UART1中断服务程序
- ** 输 入: 无
- **
- ** 输 出: 无
- **
- ** 全局变量: ModemState
- ** 调用模块: OSSemPost
- **
- ** 作 者: 陈明计
- ** 日 期: 2004年2月25日
- **-------------------------------------------------------------------------------------------------------
- ** 修改人:
- ** 日 期:
- **------------------------------------------------------------------------------------------------------
- ********************************************************************************************************/
- void UART1_Exception(void)
- {
- uint8 IIR, temp;
-
- OS_ENTER_CRITICAL();
- while(((IIR = U1IIR) & 0x01) == 0)
- { /* 有中断未处理完 */
- switch (IIR & 0x0e)
- {
- case 0x00: /* Modem状态变化 中断 */
- if ((U1MSR & 0x80) != 0)
- {
- ModemState = MODEM_CONNECT;
- }
- else
- {
- ModemState = MODEM_CLOSE;
- }
- if ((U1MSR & 0x40) != 0)
- {
- ModemState = MODEM_RING;
- }
- if ((U1MSR & 0x30) != 0x30)
- {
- ModemState = NOT_FIND_MODEM;
- }
- break;
- case 0x02: /* THRE中断 */
- OSSemPost(Uart1Send);
- break;
- case 0x04: /* 接收数据可用 */
- OSSemPost(Uart1Get);
- U1IER &= (~0x01); /* 禁止接收及字符超时中断 */
- break;
- case 0x06: /* 接收线状态 */
- temp = U1LSR;
- break;
- case 0x0c: /* 字符超时指示 */
- OSSemPost(Uart1Get);
- U1IER &= (~0x01); /* 禁止接收及字符超时中断 */
- break;
- default :
- break;
- }
- }
- VICVectAddr = 0; // 通知中断控制器中断结束
- OS_EXIT_CRITICAL();
- }
- /*********************************************************************************************************
- ** End Of File
- ********************************************************************************************************/