os_cpu_c.c

VC版式的 UCOSII ! 修改前人255任务的那个版本! 已经改为286u版! 可用VC6直接编过!

#include "INCLUDES.H"


OS_STK *OSTaskStkInit (void (*task)(void *pd), void *pdata, OS_STK *ptos, INT16U opt)
{
    INT32U *stk;							//console 下寄存器为32位宽
	
	
    opt    = opt;                           /* 'opt' is not used, prevent warning                      */
    stk    = (INT32U *)ptos;                /* Load stack pointer                                      */
    *--stk = (INT32U)pdata;         /* Simulate call to function with argument                 */                                    
	*--stk = (INT32U)0X00000000;	//子程序是从当前esp＋4处取得传入的参数，所以此处要空出4个字节
	*--stk = (INT32U)task;          /* Put pointer to task   on top of stack                   */
    *--stk = (INT32U)0x00000202;				/* EFL = 0X00000202												*/
	*--stk = (INT32U)0xAAAAAAAA;                /* EAX = 0xAAAAAAAA                                              */
    *--stk = (INT32U)0xCCCCCCCC;                /* ECX = 0xCCCCCCCC                                             */
    *--stk = (INT32U)0xDDDDDDDD;                /* EDX = 0xDDDDDDDD                                             */
    *--stk = (INT32U)0xBBBBBBBB;                /* EBX = 0xBBBBBBBB                                             */
    *--stk = (INT32U)0x00000000;                /* ESP = 0x00000000  esp可以任意，因为                                           */
    *--stk = (INT32U)0x11111111;                /* EBP = 0x11111111                                             */
    *--stk = (INT32U)0x22222222;                /* ESI = 0x22222222                                             */
    *--stk = (INT32U)0x33333333;                /* EDI = 0x33333333                                             */
	
    return ((OS_STK *)stk);
}


void OSStartHighRdy(void)
{
	OSTaskSwHook();
	OSRunning = TRUE;
	_asm{
		mov ebx, [OSTCBCur]	;//OSTCBCur结构的第一个参数就是esp
		mov esp, [ebx]		;//恢复堆栈
		
		popad		;//恢复所有通用寄存器，共8个
		popfd		;//恢复标志寄存器
		ret			;//ret 指令相当于pop eip 但保护模式下不容许使用eip
		;//永远都不返回
	}
}



void OSCtxSw(void)
{
	_asm{
		lea	 eax, nextstart	;//任务切换回来后从nextstart开始
		push eax
			pushfd				;//标志寄存器的值
		pushad				;//保存EAX -- EDI		
		mov ebx, [OSTCBCur]
			mov [ebx], esp		;//把堆栈入口的地址保存到当前TCB结构中
	}
	
	OSTaskSwHook();
	OSTCBCur = OSTCBHighRdy;	
	OSPrioCur = OSPrioHighRdy;
	
	_asm{
		mov ebx, [OSTCBCur]
		mov esp, [ebx]		;//得到OSTCBHighRdy的esp
		
		popad				;//恢复所有通用寄存器，共8个
		popfd				;//恢复标志寄存器
		ret					;//跳转到指定任务运行
	}
nextstart:			//任务切换回来的运行地址
	return;
}


extern CONTEXT Context;
extern HANDLE mainhandle;

void OSIntCtxSw(void)
{
	OS_STK *sp;
	OSTaskSwHook();
	
	
	sp = (OS_STK *)Context.Esp;	//得到主线程当前堆栈指针
	//在堆栈中保存相应寄存器。
	*--sp = Context.Eip;	//先保存eip
	*--sp = Context.EFlags;	//保存efl
	*--sp = Context.Eax;
	*--sp = Context.Ecx;
	*--sp = Context.Edx;
	*--sp = Context.Ebx;
	*--sp = Context.Esp;	//此时保存的esp是错误的，但OSTCBCur保存了正确的
	*--sp = Context.Ebp;
	*--sp = Context.Esi;
	*--sp = Context.Edi;	
	OSTCBCur->OSTCBStkPtr = (OS_STK *)sp;	//保存当前esp
	
	OSTCBCur = OSTCBHighRdy;		//得到当前就绪最高优先级任务的tcb
	OSPrioCur = OSPrioHighRdy;		//得到当前就绪任务最高优先级数
	sp = OSTCBHighRdy->OSTCBStkPtr;	//得到重新执行的任务的堆栈指针
	
	
	//恢复所有处理器的寄存器
	Context.Edi = *sp++;
	Context.Esi = *sp++;
	Context.Ebp = *sp++;
	Context.Esp = *sp++;		//此时上下文中得到的esp是不正确的
	Context.Ebx = *sp++;
	Context.Edx = *sp++;
	Context.Ecx = *sp++;
	Context.Eax = *sp++;
	Context.EFlags = *sp++; 
	Context.Eip = *sp++;
	
	Context.Esp = (unsigned long)sp;		//得到正确的esp
	
	SetThreadContext(mainhandle, &Context);	//保存主线程上下文
}




void OSInitHookBegin (void)
{
}

void OSInitHookEnd (void)
{
}

void OSTaskCreateHook (OS_TCB *ptcb)
{
    ptcb = ptcb;                       /* Prevent compiler warning                                     */
}

void OSTaskDelHook (OS_TCB *ptcb)
{
    ptcb = ptcb;                       /* Prevent compiler warning                                     */
}

void OSTaskSwHook (void)
{

}

void OSTaskStatHook (void)
{

}

void OSTCBInitHook (OS_TCB *ptcb)
{
    ptcb = ptcb;                                           /* Prevent Compiler warning                 */
}

void OSTimeTickHook (void)
{

}

void OSTaskIdleHook (void)
{
	Sleep(1);
}


void CALLBACK OSTickISR(unsigned int a,unsigned int b,unsigned long c,unsigned long d,unsigned long e)
{
	if(!FlagEn)
		return;	//如果当前中断被屏蔽则返回


	//挂起线程  --//中止主线程的运行，模拟中断产生.但没有保存寄存器
	SuspendThread(mainhandle);

	//得到主线程上下文，为切换任务做准备
	GetThreadContext(mainhandle, &Context);	

	OSIntNesting++;
	if (OSIntNesting == 1) 
	{
		OSTCBCur->OSTCBStkPtr = (OS_STK *)Context.Esp;	//保存当前esp
	}	
	OSTimeTick();		// ucos内部定时

	OSIntExit();		// 由于不能使用中断返回指令，所以此函数是要返回的
	

	ResumeThread(mainhandle);	//模拟中断返回，主线程得以继续执行
	
}