LED Fork

Dependencies:   mbed

Fork of RtosTest by Daniel Peter

Revision:
1:a33478a10fd0
Parent:
0:331db0b44b67
diff -r 331db0b44b67 -r a33478a10fd0 scmRTOS/Common/OS_Kernel.cpp
--- a/scmRTOS/Common/OS_Kernel.cpp	Tue Sep 21 19:48:05 2010 +0000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,115 +0,0 @@
-//******************************************************************************
-//*
-//*     FULLNAME:  Single-Chip Microcontroller Real-Time Operating System
-//*
-//*     NICKNAME:  scmRTOS
-//*
-//*     PURPOSE:  OS Kernel Source
-//*
-//*     Version: 3.10
-//*
-//*     $Revision: 256 $
-//*     $Date:: 2010-01-22 #$
-//*
-//*     Copyright (c) 2003-2010, Harry E. Zhurov
-//*
-//*     Permission is hereby granted, free of charge, to any person 
-//*     obtaining  a copy of this software and associated documentation 
-//*     files (the "Software"), to deal in the Software without restriction, 
-//*     including without limitation the rights to use, copy, modify, merge, 
-//*     publish, distribute, sublicense, and/or sell copies of the Software, 
-//*     and to permit persons to whom the Software is furnished to do so, 
-//*     subject to the following conditions:
-//*
-//*     The above copyright notice and this permission notice shall be included 
-//*     in all copies or substantial portions of the Software.
-//*
-//*     THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
-//*     EXPRESS  OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF 
-//*     MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. 
-//*     IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY 
-//*     CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, 
-//*     TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH 
-//*     THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-//*
-//*     =================================================================
-//*     See http://scmrtos.sourceforge.net for documentation, latest
-//*     information, license and contact details.
-//*     =================================================================
-//*
-//******************************************************************************
-
-#include "scmRTOS.h"
-
-using namespace OS;
-//------------------------------------------------------------------------------
-OS::TKernel OS::Kernel;
-
-//------------------------------------------------------------------------------
-#if scmRTOS_CONTEXT_SWITCH_SCHEME == 0
-void TKernel::Sched()
-{
-    byte NextPrty = GetHighPriority(ReadyProcessMap);
-    if(NextPrty != CurProcPriority)
-    {
-        TStackItem*  Next_SP = ProcessTable[NextPrty]->StackPointer;
-        TStackItem** Curr_SP_addr = &(ProcessTable[CurProcPriority]->StackPointer);
-        CurProcPriority = NextPrty;
-        OS_ContextSwitcher(Curr_SP_addr, Next_SP);
-    }
-}
-#else
-//------------------------------------------------------------------------------
-void TKernel::Sched()
-{
-    byte NextPrty = GetHighPriority(ReadyProcessMap);
-    if(NextPrty != CurProcPriority)
-    {
-        SchedProcPriority = NextPrty;
-    
-        RaiseContextSwitch();
-        do
-        {
-            EnableContextSwitch();
-            DUMMY_INSTR();
-            DisableContextSwitch();
-        } 
-        while(!IsContextSwitchDone());
-    }
-}
-//------------------------------------------------------------------------------
-TStackItem* OS_ContextSwitchHook(TStackItem* sp) { return OS::Kernel.ContextSwitchHook(sp); }
-//------------------------------------------------------------------------------
-#endif // scmRTOS_CONTEXT_SWITCH_SCHEME
-//------------------------------------------------------------------------------
-void TBaseProcess::Sleep(TTimeout timeout)
-{
-    TCritSect cs;
-
-    Kernel.ProcessTable[Kernel.CurProcPriority]->Timeout = timeout;
-    Kernel.SetProcessUnready(Kernel.CurProcPriority);
-    Kernel.Scheduler();
-}
-//------------------------------------------------------------------------------
-void OS::WakeUpProcess(TBaseProcess& p)
-{
-    TCritSect cs;
-
-    if(p.Timeout)
-    {
-        p.Timeout = 0;
-        Kernel.SetProcessReady(p.Priority);
-        Kernel.Scheduler();
-    }
-}
-//------------------------------------------------------------------------------
-void OS::ForceWakeUpProcess(TBaseProcess& p)
-{
-    TCritSect cs;
-
-    p.Timeout = 0;
-    Kernel.SetProcessReady(p.Priority);
-    Kernel.Scheduler();
-}
-//------------------------------------------------------------------------------
-