?? modem.c
字號:
/****************************************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("\r\n", 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("\r\n", 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
********************************************************************************************************/
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -