os_core.c

在嵌入系统中使用RTOS是大势所趋。原因主要是现在在大多数情况下编程效率比执行效率重要（单片机便宜嘛）。本文件适用于51单片机

/*********************************************************************************************************
**				                               Small RTOS(51)
**                                   The Real-Time Kernel(For Keil c51)
**
**                                  (c) Copyright 2002-2003, chenmingji
**                                           All Rights Reserved
**
**                                                  V1.12.1
**
**
**--------------文件信息--------------------------------------------------------------------------------
**文   件   名: OS_CORE.C
**创   建   人: 陈明计
**最后修改日期: 2003年2月5日
**描        述: Small RTOS(51)与CPU无关的核心代码
**
**--------------历史版本信息----------------------------------------------------------------------------
** 创建人: 陈明计
** 版  本: V0.50
** 日　期: 2002年2月22日
** 描　述: 原始版本
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V0.51
** 日　期: 2002年3月10日
** 描　述: 修改函数OSWait使其占用资源更少，兼容性更好
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V0.52
** 日　期: 2002年5月9日
** 描　述: 更正函数OSWait的返回值错误
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V0.60
** 日　期: 2002年5月10日
** 描　述: 使所有函数在keil c51可以重入
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V1.00
** 日　期: 2002年6月20日
** 描　述: 使用户可以进行更多的配置
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V1.10
** 日　期: 2002年9月1日
** 描　述: 根据当前版本进行一些必要改变
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年9月4日
** 版  本: V1.10.1
** 描　述: 更正OSTimeTick的Bug，它在keil c51中不会有问题，但移植的其它系统可能出错。
**         统一了一下格式。
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V1.10.2
** 日　期: 2002年9月9日
** 描　述: 更正OSWait()的Bug，这个Bug造成在OSWait()以K_TMO为参数时，在极端情况下
**         可能锁死任务。
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V1.10.4
** 日　期: 2002年10月5日
** 描　述: 显示初始化变量OSTaskID和OSNextTaskID
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V1.10.5
** 日　期: 2002年10月19日
** 描　述: 修改函数OSIntExit()和OSSched()在允许中断管理代码的BUG，它在用户
**         程序逻辑不太正常时可能引起系统崩溃。更正2002年9月9日修订带来的
**         新Bug。
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V1.11.0
** 日　期: 2002年12月2日
** 描　述: 根据新版本需求更改开、关中断代码，增加注释；更正OSWait()的Bug，
**         这个Bug造成在OSWait()以（K_TMO|K_SIG）为参数时，在极端情况下
**         可能锁死任务。
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V1.12.0
** 日　期: 2003年1月23日
** 描　述: 用户可以使用全部16个任务，增加代码可靠性
**
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 版  本: V1.12.1
** 日　期: 2003年1月23日
** 描　述: 修正OSIntSendSignal()的bug
**
**--------------当前版本修订------------------------------------------------------------------------------
** 修改人: 
** 日　期:
** 描　述:
**
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/

#define  IN_OS_CORE
#include "config.h"

#if EN_OS_INT_ENTER > 0
uint8 OSIntNesting;
#endif

uint8 data OSTaskID = 0;
uint8 data OSNextTaskID = 0;

uint8 OSWaitTick[OS_MAX_TASKS];
#if OS_MAX_TASKS < 9
uint8 OSTaskRuning = 0xff;
#else
uint16 OSTaskRuning = 0xffff;
#endif

uint8 const OSMapTbl[] = {0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80, 0x00};
uint8 data Os_Enter_Sum = 0;


void  OSSched(void);

/*********************************************************************************************************
** 函数名称: OSIntSendSignal
** 功能描述: 中断中给指定任务发送信号,既使指定任务就绪
** 输　入: TaskId : 任务ID
** 输　出: 无
** 全局变量: OSTaskRuning
** 调用模块: 无
**
** 作　者: 陈明计
** 日　期: 2002年6月20日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年9月1日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年9月4日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年12月30日
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年2月5日
**------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        void OSIntSendSignal(uint8 TaskId)

{
    if (TaskId < OS_MAX_TASKS)
    {
        OS_ENTER_CRITICAL();
#if OS_MAX_TASKS < 9
        OSTaskRuning |= OSMapTbl[TaskId];
#else
        if (TaskId < 8)
        {
            ((uint8 *)(&OSTaskRuning))[LOW_BYTE] |= OSMapTbl[TaskId];
        }
        else
        {
            ((uint8 *)(&OSTaskRuning))[HIGH_BYTE] |= OSMapTbl[TaskId & 0x07];
        }
#endif
        OS_EXIT_CRITICAL();
    }
}

/*********************************************************************************************************
** 函数名称: OSSendSignal
** 功能描述: 任务中给指定任务发送信号,既使指定任务就绪
** 输　入: TaskId : 任务ID
** 输　出: 无
** 全局变量: 无
** 调用模块: OSSched,OSIntSendSignal
**
** 作　者: 陈明计
** 日　期: 2002年6月20日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年9月1日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**-------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        void OSSendSignal(uint8 TaskId)

{
    OSIntSendSignal(TaskId);
    OSSched();                                              //开始任务切换
}

/*********************************************************************************************************
** 函数名称: OSClearSignal
** 功能描述: 清除指定任务信号,既使指定任务休眠
** 输　入: TaskId : 任务ID
** 输　出: 无
** 全局变量: OSTaskRuning
** 调用模块: 无
**
** 作　者: 陈明计
** 日　期: 2002年6月20日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年9月1日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年9月4日
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年12月30日
**------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**-------------------------------------------------------------------------------------------------------
********************************************************************************************************/

        void OSClearSignal(uint8 TaskId)
{
    if (TaskId < OS_MAX_TASKS)
    {
        OS_ENTER_CRITICAL();
#if OS_MAX_TASKS < 9
        OSTaskRuning &= ~OSMapTbl[TaskId];
#else
        if (TaskId < 8)
        {
            ((uint8 *)(&OSTaskRuning))[LOW_BYTE] &= ~OSMapTbl[TaskId];
        }
        else
        {
            ((uint8 *)(&OSTaskRuning))[HIGH_BYTE] &= ~OSMapTbl[TaskId & 0x07];
        }
#endif
        OS_EXIT_CRITICAL();
    }
}

/*********************************************************************************************************
** 函数名称: OSIntExit
** 功能描述: 中断退出处理函数,在此进行中断后的任务切换
** 输　入: 无
** 输　出: 无
** 全局变量: OSIntNesting,OSNextTaskID
** 调用模块: OSIntCtxSw
**
** 作　者: 陈明计
** 日　期: 2002年6月20日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年9月1日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年9月4日
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年10月19日
**------------------------------------------------------------------------------------------------------
** 修改人: 陈明计
** 日　期: 2002年12月2日
**------------------------------------------------------------------------------------------------------