modem.c

移植uCOS-II到ARM7代码应用举例,希望大家可以帮助

/****************************************Copyright (c)**************************************************
**                               广州周立功单片机发展有限公司
**                                     研    究    所
**                                        产品一部 
**
**                                 http://www.zlgmcu.com
**
**--------------文件信息--------------------------------------------------------------------------------
**文   件   名: modem.c
**创   建   人: 陈明计
**最后修改日期: 2004年4月23日
**描        述: μCOS-II下LPC2000的Modem底层驱动 
**              
**--------------历史版本信息----------------------------------------------------------------------------
** 创建人: 陈明计
** 版  本: v1.0
** 日　期: 2004年2月23日
** 描　述: 原始版本
**
**------------------------------------------------------------------------------------------------------
** 修改人:
** 版  本:
** 日　期:
** 描　述:
**
**--------------当前版本修订------------------------------------------------------------------------------
** 修改人: 
** 日　期: 
** 描　述: 
**
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/

#define IN_MODEM
#include "config.h"

extern const char SerivePhone[];

static OS_EVENT *ModemSem, *Uart1Send;
static uint16 ModemState;
static uint32 ModemGetBuf[3000];

NetHardDrivesSocket ModemDrive;
uint16 ModeFlag;

/*********************************************************************************************************
** 函数名称: UART1Init
** 功能描述: 初始化UART0 
** 输　入: bps：波特率
**
** 输　出:TRUE  :成功
**        FALSE:失败
** 全局变量: Uart0Sem
** 调用模块: OSSemCreate
**
** 作　者: 陈明计
** 日　期: 2004年4月23日
**-------------------------------------------------------------------------------------------------------
** 修改人: 
** 日　期: 
********************************************************************************************************/
        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);
}

/*********************************************************************************************************
** 函数名称: GetModemState
** 功能描述: 获取MODEM状态
** 输　入: 无
**        
** 输　出: MODEM状态
** 全局变量: 无
** 调用模块: 无
**
** 作　者: 陈明计
** 日　期: 2004年4月23日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint16 GetModemState(void)
{
    return ModemState;
} 

/*********************************************************************************************************
** 函数名称: ModemPutch
** 功能描述: 发送多个字节数据
** 输　入: Data:发送数据存储位置
**        NByte:发送数据个数
** 输　出:无
** 全局变量: 无
** 调用模块: UART0Putch
**
** 作　者: 陈明计
** 日　期: 2004年2月25日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint8 ModemPutch(char Data)
{
    uint8 err;
    OSSemPend(ModemSem, 0, &err);
    OSSemPend(Uart1Send, 0, &err);
    U1THR = Data;
    OSSemPost(ModemSem);
    return TRUE;
} 

/*********************************************************************************************************
** 函数名称: ModemWrite
** 功能描述: 发送多个字节数据
** 输　入: Data:发送数据存储位置
**        NByte:发送数据个数
** 输　出:无
** 全局变量: MODEM状态
** 调用模块: OSSemPend
**
** 作　者: 陈明计
** 日　期: 2004年4月23日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint16 ModemWrite(char *Data, uint16 NByte)
{
    uint8 err,i;
    
    OSSemPend(ModemSem, 0, &err);
    while (NByte > 0)
    {
        OSSemPend(Uart1Send, 0, &err);
        for (i = 0; i < 16; i++)
        {
            U1THR = *Data++;
            NByte--;
            if (NByte == 0)
            {
                break;
            }
        }
    }
    OSSemPost(ModemSem);
    return ModemState;
} 

/*********************************************************************************************************
** 函数名称: ModemGetch
** 功能描述: 接收一个字节
** 输　入: Rt:字符指针，返回的数据存储在这个指针指向的变量中
** 输　出: NO_ERR:没有错误
** 全局变量: 无
** 调用模块: 无
**
** 作　者: 陈明计
** 日　期: 2004年4月23日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint8 ModemGetch(uint8 *Rt)
{
    while(QueueRead(Rt,ModemGetBuf) != QUEUE_OK)
    {
        OSTimeDly(4);
    }
    return NO_ERR;
} 

/*********************************************************************************************************
** 函数名称: ModemDialUp
** 功能描述: 通过modem拨号 
** 输　入: 电话号码
**
** 输　出: TRUE:成功
**        FALSE:失败
** 全局变量: ModemState
** 调用模块: ModemWrite,OSTimeDly
**
** 作　者: 陈明计
** 日　期: 2004年4月23日
**-------------------------------------------------------------------------------------------------------
** 修改人: 
** 日　期: 
**-------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint8 ModemDialUp(char Number[])
{
    char *cp;
    uint8 i;
    
    if (ModemState == NET_HARD_CLOSE)
    {
        QueueFlush(ModemGetBuf);

        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 == NET_HARD_OPEN)
            {
                return TRUE;
            }
        }
    }
    return FALSE;
}

/*********************************************************************************************************
** 函数名称: ModemOpen
** 功能描述: 建立链接 
** 输　入: 无
**
** 输　出: TRUE:成功
**        FALSE:失败
** 全局变量: SerivePhone
** 调用模块: ModemDialUp
**
** 作　者: 陈明计
** 日　期: 2004年4月23日
**-------------------------------------------------------------------------------------------------------