开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 中间件编程 > 查看源码
modem.c
资源名称：COSIIMODEMommunication.rar　[点击查看]
上传用户：zddz2006
上传日期：2020-12-03
资源大小：261k
文件大小：14k
源码类别：

中间件编程

开发平台：

Visual C++

modem.c：源码内容
  1. /****************************************Copyright (c)**************************************************
  2. **                               广州周立功单片机发展有限公司
  3. **                                     研    究    所
  4. **                                        产品一部 
  5. **
  6. **                                 http://www.zlgmcu.com
  7. **
  8. **--------------文件信息--------------------------------------------------------------------------------
  9. **文   件   名: uart0.c
  10. **创   建   人: 陈明计
  11. **最后修改日期: 2003年7月4日
  12. **描        述: μCOS-II下LPC2000的Modem底层驱动 
  13. **              
  14. **--------------历史版本信息----------------------------------------------------------------------------
  15. ** 创建人: 陈明计
  16. ** 版  本: v1.0
  17. ** 日　期: 2004年2月25日
  18. ** 描　述: 原始版本
  19. **
  20. **------------------------------------------------------------------------------------------------------
  21. ** 修改人:
  22. ** 版  本:
  23. ** 日　期:
  24. ** 描　述:
  25. **
  26. **--------------当前版本修订------------------------------------------------------------------------------
  27. ** 修改人: 
  28. ** 日　期: 
  29. ** 描　述: 
  30. **
  31. **------------------------------------------------------------------------------------------------------
  32. ********************************************************************************************************/
  34. #define IN_MODEM
  35. #include "config.h"
  36. static OS_EVENT *ModemSem, *Uart1Send, *Uart1Get;
  37. static uint8 ModemState;
  39. /*********************************************************************************************************
  40. ** 函数名称: UART1Init
  41. ** 功能描述: 初始化UART0 
  42. ** 输　入: bps：波特率
  43. **
  44. ** 输　出:TRUE  :成功
  45. **        FALSE:失败
  46. ** 全局变量: Uart0Sem
  47. ** 调用模块: OSSemCreate
  48. **
  49. ** 作　者: 陈明计
  50. ** 日　期: 2004年2月25日
  51. **-------------------------------------------------------------------------------------------------------
  52. ** 修改人: 
  53. ** 日　期: 
  54. **-------------------------------------------------------------------------------------------------------
  55. ** 修改人: 陈明计
  56. ** 日　期: 
  57. **------------------------------------------------------------------------------------------------------
  58. ********************************************************************************************************/
  59.         void UART1Init(uint32 bps)
  60. {
  61.     uint16 Fdiv;
  62.     
  63.     PINSEL0 = (PINSEL0 & 0x0000ffff) | 0x55550000;  /* 选择管脚为UART0 */
  65.     U1LCR = 0x80;                                   /* 允许访问分频因子寄存器 */
  66.     Fdiv = (Fpclk / 16) / bps;                      /* 设置波特率 */
  67.     U1DLM = Fdiv / 256;
  68. U1DLL = Fdiv % 256;
  69.     U1LCR = 0x03;                                   /* 禁止访问分频因子寄存器 */
  70.                                                     /* 且设置为8,1,n */
  71. U1IER = 0x0f;                                   /* 允许接收和发送中断 */
  72.     U1FCR = 0x87;                                   /* 初始化FIFO */
  73.     U1MCR = 0x03;
  74.     Uart1Send = OSSemCreate(1);
  75.     Uart1Get = OSSemCreate(0);
  77. }
  79. /*********************************************************************************************************
  80. ** 函数名称: GetModemState
  81. ** 功能描述: 获取MODEM状态
  82. ** 输　入: 无
  83. **        
  84. ** 输　出: MODEM状态
  85. ** 全局变量: 无
  86. ** 调用模块: 无
  87. **
  88. ** 作　者: 陈明计
  89. ** 日　期: 2004年2月25日
  90. **-------------------------------------------------------------------------------------------------------
  91. ** 修改人:
  92. ** 日　期:
  93. **------------------------------------------------------------------------------------------------------
  94. ********************************************************************************************************/
  95.         uint8 GetModemState(void)
  96. {
  97.     return ModemState;
  98. } 
  100. /*********************************************************************************************************
  101. ** 函数名称: ModemWrite
  102. ** 功能描述: 发送多个字节数据
  103. ** 输　入: Data:发送数据存储位置
  104. **        NByte:发送数据个数
  105. ** 输　出:无
  106. ** 全局变量: 无
  107. ** 调用模块: UART0Putch
  108. **
  109. ** 作　者: 陈明计
  110. ** 日　期: 2004年2月25日
  111. **-------------------------------------------------------------------------------------------------------
  112. ** 修改人:
  113. ** 日　期:
  114. **------------------------------------------------------------------------------------------------------
  115. ********************************************************************************************************/
  116.         uint8 ModemWrite(char *Data, uint16 NByte)
  117. {
  118.     uint8 err,i;
  119.     
  120.     OSSemPend(ModemSem, 0, &err);
  121.     while (NByte > 0)
  122.     {
  123.         OSSemPend(Uart1Send, 0, &err);
  124.         for (i = 0; i < 8; i++)
  125.         {
  126.             U1THR = *Data++;
  127.             NByte--;
  128.             if (NByte == 0)
  129.             {
  130.                 break;
  131.             }
  132.         }
  133.     }
  134.     OSSemPost(ModemSem);
  135.     return ModemState;
  136. } 
  138. /*********************************************************************************************************
  139. ** 函数名称: UART0Getch
  140. ** 功能描述: 接收一个字节
  141. ** 输　入: 无
  142. ** 输　出: 接收到的数据
  143. ** 全局变量: 无
  144. ** 调用模块: 无
  145. **
  146. ** 作　者: 陈明计
  147. ** 日　期: 2004年2月25日
  148. **-------------------------------------------------------------------------------------------------------
  149. ** 修改人:
  150. ** 日　期:
  151. **------------------------------------------------------------------------------------------------------
  152. ********************************************************************************************************/
  153.         uint8 ModemGetch(void)
  154. {
  155.     uint8 rt;
  157.     OS_ENTER_CRITICAL();
  158.     while ((U1LSR & 0x00000001) == 0)
  159.     {                                           /* 没有收到数据 */
  160.         U1IER = U1IER | 0x01;                   /* 允许接收中断 */
  161.         OSSemPend(Uart1Get, 0, &rt);
  162.     }
  163.     rt = U1RBR;                                 /* 读取收到的数据 */
  164.     OS_EXIT_CRITICAL();
  166.     return rt;
  167. } 
  168. /*********************************************************************************************************
  169. ** 函数名称: ModemDialUp
  170. ** 功能描述: 通过modem拨号 
  171. ** 输　入: 电话号码
  172. **
  173. ** 输　出: modem状态
  174. **
  175. ** 全局变量: ModemState
  176. ** 调用模块: ModemWrite,OSTimeDly
  177. **
  178. ** 作　者: 陈明计
  179. ** 日　期: 2004年2月25日
  180. **-------------------------------------------------------------------------------------------------------
  181. ** 修改人: 
  182. ** 日　期: 
  183. **-------------------------------------------------------------------------------------------------------
  184. ********************************************************************************************************/
  185.         uint8 ModemDialUp(char Number[])
  186. {
  187.     char *cp;
  188.     uint8 i;
  189.     uint8 err;
  190.     
  191.     if (ModemState == MODEM_CLOSE)
  192.     {
  193.         while ((U1LSR & 0x00000001) != 0)
  194.         {
  195.             err = U1RBR;
  196.         }
  197.         ModemWrite("ATD", 3);
  198.         i = 0;
  199.         cp = Number;
  200.         while (*cp++ != 0)
  201.         {
  202.             i++;
  203.         }
  204.         ModemWrite(Number, i);
  205.         ModemWrite("rn", 2);
  207.         U1IER = U1IER | 0x01;                   /* 允许接收中断 */
  208.         for (i = 0; i < 120; i++)
  209.         {
  210.             OSTimeDly(OS_TICKS_PER_SEC);
  211.             if (ModemState == MODEM_CONNECT)
  212.             {
  213.                 break;
  214.             }
  215.         }
  216.     }
  217.     return ModemState;
  218. }
  219. /*********************************************************************************************************
  220. ** 函数名称: ModemDialDown
  221. ** 功能描述: 挂断modem 
  222. ** 输　入: 无
  223. **
  224. ** 输　出: modem状态
  225. **
  226. ** 全局变量: ModemState
  227. ** 调用模块: OSTimeDly
  228. **
  229. ** 作　者: 陈明计
  230. ** 日　期: 2004年2月25日
  231. **-------------------------------------------------------------------------------------------------------
  232. ** 修改人: 
  233. ** 日　期: 
  234. **-------------------------------------------------------------------------------------------------------
  235. ********************************************************************************************************/
  236.         uint8 ModemDialDown(void)
  237. {
  238.     U1MCR = 0x02;
  239.     OSTimeDly(OS_TICKS_PER_SEC / 10);
  240.     U1MCR = 0x03;
  241.     OSTimeDly(OS_TICKS_PER_SEC / 10);
  242.     return ModemState;
  243. }
  245. /*********************************************************************************************************
  246. ** 函数名称: ModemCommand
  247. ** 功能描述: 向modem发送命令 
  248. ** 输　入: 命令字符串
  249. **
  250. ** 输　出: modem状态
  251. **
  252. ** 全局变量: ModemState
  253. ** 调用模块: ModemWrite,ModemGetch,
  254. **
  255. ** 作　者: 陈明计
  256. ** 日　期: 2004年2月25日
  257. **-------------------------------------------------------------------------------------------------------
  258. ** 修改人: 
  259. ** 日　期: 
  260. **-------------------------------------------------------------------------------------------------------
  261. ********************************************************************************************************/
  262.         uint8 ModemCommand(char *Command)
  263. {
  264.     char *cp;
  265.     uint8 i,err;
  266.     
  267.     if (ModemState == MODEM_CLOSE)
  268.     {
  269.         while ((U1LSR & 0x00000001) != 0)
  270.         {
  271.             err = U1RBR;
  272.         }
  273.         
  274.         cp = Command;
  275.         i = 0;
  276.         while(*cp++ != 0)
  277.         {
  278.             i++;
  279.         }
  280.         ModemWrite(Command, i);
  281.         ModemWrite("rn", 2);
  282.         i = ModemGetch();
  283.         if (i == 'A' || i == 'a')
  284.         {
  285.             while (1)
  286.             {
  287.                 err = i;
  288.                 i = ModemGetch();
  289.                 if (err == 'O' || err == 'o')
  290.                 if (i == 'K' || i == 'k')
  291.                 {
  292.                     i = ModemGetch();
  293.                     i = ModemGetch();
  294.                     break;
  295.                 }
  296.             }
  297.         }
  298.         else
  299.         {
  300.             while (1)
  301.             {
  302.                 if (i == '0')
  303.                 {
  304.                     break;
  305.                 }
  306.                 i = ModemGetch();
  307.                 i = ModemGetch();
  308.             }
  309.         }
  310.     }
  311.     return ModemState;
  312. }
  313. /*********************************************************************************************************
  314. ** 函数名称: ModemInit
  315. ** 功能描述: 初始化Modem 
  316. ** 输　入: 波特率
  317. **
  318. ** 输　出: modem状态
  319. **
  320. ** 全局变量: ModemState
  321. ** 调用模块: UART1Init,OSTimeDly,ModemCommand,
  322. **
  323. ** 作　者: 陈明计
  324. ** 日　期: 2004年2月25日
  325. **-------------------------------------------------------------------------------------------------------
  326. ** 修改人: 
  327. ** 日　期: 
  328. **-------------------------------------------------------------------------------------------------------
  329. ********************************************************************************************************/
  330.         uint8 ModemInit(uint32 bps)
  331. {
  332.     ModemState = MODEM_CLOSE;
  333.     UART1Init(bps);
  334.     ModemSem = OSSemCreate(1);
  335.     if (ModemSem != NULL)
  336.     {
  337.         if ((U1MSR & 0x30) != 0x30)
  338.         {
  339.             OSTimeDly(OS_TICKS_PER_SEC);
  340.             if ((U1MSR & 0x30) != 0x30)
  341.             {
  342.                 ModemState = NOT_FIND_MODEM;
  343.             }
  344.         }
  345.         if (ModemState == MODEM_CLOSE)
  346.         {
  347.             ModemCommand("ATE0");
  348.             ModemCommand("ATV0");
  349.             ModemCommand("AT&C1");
  350.             ModemCommand("AT&D2");
  351.             ModemCommand("AT&R0");
  352.             ModemCommand("AT&S0");
  353.             ModemCommand("ATS0=2");
  354.         }
  355.     }
  356.     else
  357.     {
  358.         ModemState = NOT_INIT_MODEM;
  359.     }
  360.     return ModemState;
  361. }
  363. /*********************************************************************************************************
  364. ** 函数名称: UART1_Exception
  365. ** 功能描述: UART1中断服务程序
  366. ** 输　入: 无
  367. **
  368. ** 输　出: 无
  369. **         
  370. ** 全局变量: ModemState
  371. ** 调用模块: OSSemPost
  372. **
  373. ** 作　者: 陈明计
  374. ** 日　期: 2004年2月25日
  375. **-------------------------------------------------------------------------------------------------------
  376. ** 修改人:
  377. ** 日　期:
  378. **------------------------------------------------------------------------------------------------------
  379. ********************************************************************************************************/
  380.         void UART1_Exception(void)
  381. {
  382.     uint8 IIR, temp;
  383.     
  384.     OS_ENTER_CRITICAL();
  385.     while(((IIR = U1IIR) & 0x01) == 0)
  386.     {                                                   /* 有中断未处理完 */
  387.         switch (IIR & 0x0e)
  388.         {
  389.             case 0x00:                                  /* Modem状态变化 中断    */
  390.                 if ((U1MSR & 0x80) != 0)
  391.                 {
  392.                     ModemState = MODEM_CONNECT;
  393.                 }
  394.                 else
  395.                 {
  396.                     ModemState = MODEM_CLOSE;
  397.                 }
  398.                 if ((U1MSR & 0x40) != 0)
  399.                 {
  400.                     ModemState = MODEM_RING;
  401.                 }
  402.                 if ((U1MSR & 0x30) != 0x30)
  403.                 {
  404.                     ModemState = NOT_FIND_MODEM;
  405.                 }
  406.                 break;
  407.             case 0x02:                                  /* THRE中断    */
  408.                 OSSemPost(Uart1Send);
  409.                 break;
  410.             case 0x04:                                  /* 接收数据可用 */
  411.                 OSSemPost(Uart1Get);
  412.                 U1IER &= (~0x01);                       /* 禁止接收及字符超时中断 */
  413.                 break;
  414.             case 0x06:                                  /* 接收线状态   */
  415.                 temp = U1LSR;
  416.                 break;
  417.             case 0x0c:                                  /* 字符超时指示 */
  418.                 OSSemPost(Uart1Get);
  419.                 U1IER &= (~0x01);                       /* 禁止接收及字符超时中断 */
  420.                 break;
  421.             default :
  422.                 break;
  423.         }
  424.     } 
  425.     VICVectAddr = 0;            // 通知中断控制器中断结束
  426.     OS_EXIT_CRITICAL();
  427. }
  429. /*********************************************************************************************************
  430. **                            End Of File
  431. ********************************************************************************************************/