📄 os_core.lst
字号:
C51 COMPILER V7.02b OS_CORE 07/08/2007 20:25:02 PAGE 1
C51 COMPILER V7.02b, COMPILATION OF MODULE OS_CORE
OBJECT MODULE PLACED IN OS_CORE.OBJ
COMPILER INVOKED BY: C:\Keil\C51\BIN\C51.EXE OS_CORE.C LARGE BROWSE DEBUG OBJECTEXTEND
stmt level source
1 /*
2 *********************************************************************************************************
3 * uC/OS-II
4 * The Real-Time Kernel
5 * CORE FUNCTIONS
6 *
7 * (c) Copyright 1992-1998, Jean J. Labrosse, Plantation, FL
8 * All Rights Reserved
9 *
10 * V2.00
11 *
12 * File : OS_CORE.C
13 * By : Jean J. Labrosse
14 *********************************************************************************************************
15 */
16 #define OS_GLOBALS
17 #include "INCLUDES.H"
18 /*
19 *********************************************************************************************************
20 * LOCAL GLOBAL VARIABLES
21 *********************************************************************************************************
22 */
23
24 static INT8U OSIntExitY;
25 /*$PAGE*/
26 /*
27 *********************************************************************************************************
28 * MAPPING TABLE TO MAP BIT POSITION TO BIT MASK
29 *
30 * Note: Index into table is desired bit position, 0..7
31 * Indexed value corresponds to bit mask
32 *********************************************************************************************************
33 */
34 INT8U const code OSMapTbl[] = {0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80};
35
36 /*
37 *********************************************************************************************************
38 * PRIORITY RESOLUTION TABLE
39 *
40 * Note: Index into table is bit pattern to resolve highest priority
41 * Indexed value corresponds to highest priority bit position (i.e. 0..7)
42 *********************************************************************************************************
43 */
44
45 INT8U const code OSUnMapTbl[] = {
46 0, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
47 4, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
48 5, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
49 4, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
50 6, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
51 4, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
52 5, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
53 4, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
54 7, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
55 4, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
C51 COMPILER V7.02b OS_CORE 07/08/2007 20:25:02 PAGE 2
56 5, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
57 4, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
58 6, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
59 4, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
60 5, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0,
61 4, 0, 1, 0, 2, 0, 1, 0, 3, 0, 1, 0, 2, 0, 1, 0
62 };
63
64 //事件时一个任务进入就绪状态
65 #if (OS_Q_EN && (OS_MAX_QS >= 2)) || OS_MBOX_EN || OS_Sem_EN
66 void OSEventTaskRdy (OS_EVENT *pevent, void *msg, INT8U msk)reentrant
67 {
68 1 OS_TCB *ptcb;
69 1 INT8U x;
70 1 INT8U y;
71 1 INT8U bitx;
72 1 INT8U bity;
73 1 INT8U prio;
74 1
75 1
76 1 y = OSUnMapTbl[pevent->OSEventGrp]; /* Find highest prio. task waiting for message */
77 1 bity = OSMapTbl[y];
78 1 x = OSUnMapTbl[pevent->OSEventTbl[y]];
79 1 bitx = OSMapTbl[x];
80 1 prio = (INT8U)((y << 3) + x); /* Find priority of task getting the msg */
81 1 if ((pevent->OSEventTbl[y] &= ~bitx) == 0) { /* Remove this task from the waiting list */
82 2 pevent->OSEventGrp &= ~bity;
83 2 }
84 1 ptcb = OSTCBPrioTbl[prio]; /* Point to this task's OS_TCB */
85 1 ptcb->OSTCBDly = 0; /* Prevent OSTimeTick() from readying task */
86 1 ptcb->OSTCBEventPtr = (OS_EVENT *)0; /* Unlink ECB from this task */
87 1 #if (OS_Q_EN && (OS_MAX_QS >= 2)) || OS_MBOX_EN
ptcb->OSTCBMsg = msg; /* Send message directly to waiting task */
#else
90 1 msg = msg; /* Prevent compiler warning if not used */
-
91 1 #endif
92 1 ptcb->OSTCBStat &= ~msk; /* Clear bit associated with event type */
93 1 if (ptcb->OSTCBStat == OS_STAT_RDY) { /* See if task is ready (could be susp'd) */
94 2 OSRdyGrp |= bity; /* Put task in the ready to run list */
95 2 OSRdyTbl[y] |= bitx;
96 2 }
97 1 }
98 #endif
99
100 //任务等待事件发生
101 #if (OS_Q_EN && (OS_MAX_QS >= 2)) || OS_MBOX_EN || OS_Sem_EN
102 void OSEventTaskWait (OS_EVENT *pevent)reentrant
103 {
104 1 OSTCBCur->OSTCBEventPtr = pevent; /* control block in TCB */
105 1 if ((OSRdyTbl[OSTCBCur->OSTCBY] &= ~OSTCBCur->OSTCBBitX) == 0) { /* Task no longer ready */
106 2 OSRdyGrp &= ~OSTCBCur->OSTCBBitY;
107 2 }
108 1 pevent->OSEventTbl[OSTCBCur->OSTCBY] |= OSTCBCur->OSTCBBitX; /* Put task in waiting list */
109 1 pevent->OSEventGrp |= OSTCBCur->OSTCBBitY;
110 1 }
111 #endif
112
113 //等到超时而使一个任务进入就绪状态
114 #if (OS_Q_EN && (OS_MAX_QS >= 2)) || OS_MBOX_EN || OS_Sem_EN
115 void OSEventTO (OS_EVENT *pevent)reentrant
116 {
C51 COMPILER V7.02b OS_CORE 07/08/2007 20:25:02 PAGE 3
117 1 if ((pevent->OSEventTbl[OSTCBCur->OSTCBY] &= ~OSTCBCur->OSTCBBitX) == 0) {
118 2 pevent->OSEventGrp &= ~OSTCBCur->OSTCBBitY;
119 2 }
120 1 OSTCBCur->OSTCBStat = OS_STAT_RDY; /* Set status to ready */
121 1 OSTCBCur->OSTCBEventPtr = (OS_EVENT *)0; /* No longer waiting for event */
122 1 }
123 #endif
124
125 //初始化一个事件控制快
126 #if (OS_Q_EN && (OS_MAX_QS >= 2)) || OS_MBOX_EN || OS_Sem_EN
127 void OSEventWaitListInit (OS_EVENT *pevent)reentrant
128 {
129 1 INT8U i;
130 1
131 1 pevent->OSEventGrp = 0x00; /* No task waiting on event */
132 1 for (i = 0; i < OS_EVENT_TBL_SIZE; i++) {
133 2 pevent->OSEventTbl[i] = 0x00;
134 2 }
135 1 }
136 #endif
137
138 //系统初始化
139 void OSInit (void)
140 {
141 1 INT8U i;
142 1 OSTime = 0;
143 1 OSIntNesting = 0;
144 1 OSLockNesting = 0;
145 1 #if OS_TASK_CREATE_EN || OS_TASK_CREATE_EXT_EN || OS_TASK_DEL_EN
146 1 OSTaskCtr = 0;
147 1 #endif
148 1 OSRunning = FALSE;
149 1 OSIdleCtr = 0;
150 1 #if OS_TASK_STAT_EN && OS_TASK_CREATE_EXT_EN
151 1 OSIdleCtrRun = 0;
152 1 OSIdleCtrMax = 0;
153 1 OSStatRdy = FALSE;
154 1 #endif
155 1 OSCtxSwCtr = 0;
156 1 OSRdyGrp = 0;
157 1 for (i = 0; i < OS_RDY_TBL_SIZE; i++) {
158 2 OSRdyTbl[i] = 0;
159 2 }
160 1
161 1 OSPrioCur = 0;
162 1 OSPrioHighRdy = 0;
163 1 OSTCBHighRdy = (OS_TCB *)0;
164 1 OSTCBCur = (OS_TCB *)0;
165 1 OSTCBList = (OS_TCB *)0;
166 1 //初始化优先级任务控制块列表
167 1 for (i = 0; i < (OS_LOWEST_PRIO + 1);i++){
168 2 OSTCBPrioTbl[i] = (OS_TCB *)0;
169 2 }
170 1 //连接空闲OS_TCB
171 1 for (i = 0; i < OS_MAX_TASKS + OS_N_SYS_TASKS - 1; i++) {
172 2 OSTCBTbl[i].OSTCBNext = &OSTCBTbl[i + 1];
173 2 }
174 1 OSTCBTbl[OS_MAX_TASKS + OS_N_SYS_TASKS - 1].OSTCBNext = (OS_TCB *)0;
175 1 OSTCBFreeList = &OSTCBTbl[0];
176 1
177 1 #if OS_STK_GROWTH==1
178 1 //连接OS_STKCB并指向各自的堆栈首地址
C51 COMPILER V7.02b OS_CORE 07/08/2007 20:25:02 PAGE 4
179 1 for (i = 0; i < OS_MAX_TASKS + OS_N_SYS_TASKS - 1; i++) {
180 2 OSTKCBTbl[i].OSTKCBNext = &OSTKCBTbl[i + 1];
181 2 OSTKCBTbl[i].OSTKBtomPtr = &OSTaskStk[i][0];
182 2 }
183 1 OSTKCBTbl[OS_MAX_TASKS + OS_N_SYS_TASKS - 1].OSTKCBNext = (OS_STKCB *)0;
184 1 OSTKCBTbl[OS_MAX_TASKS + OS_N_SYS_TASKS - 1].OSTKBtomPtr = &OSTaskStk[OS_MAX_TASKS + OS_N_SYS_TASKS -
-1][0];
185 1 OSTKCBFreeList = &OSTKCBTbl[0];
186 1 #else
//连接OS_STKCB并指向各自的堆栈尾地址
for (i = 0; i < OS_MAX_TASKS + OS_N_SYS_TASKS - 1; i++) {
OSTKCBTbl[i].OSTKCBNext = &OSTKCBTbl[i + 1];
OSTKCBTbl[i].OSTKBtomPtr= &OSTaskStk[i][OS_STK_SIZE-1];
}
OSTKCBTbl[OS_MAX_TASKS + OS_N_SYS_TASKS - 1].OSTKCBNext = (OS_STKCB *)0;
OSTKCBTbl[OS_MAX_TASKS + OS_N_SYS_TASKS - 1].OSTKBtomPtr = &OSTaskStk[OS_MAX_TASKS + OS_N_SYS_TASKS -
-1][OS_STK_SIZE-1];
OSTKCBFreeList = &OSTKCBTbl[0];
#endif
196 1
197 1 #if OS_MAX_EVENTS >= 2
198 1 for (i = 0; i < (OS_MAX_EVENTS - 1); i++) {
199 2 OSEventTbl[i].OSEventPtr = (OS_EVENT *)&OSEventTbl[i + 1];
200 2 }
201 1 OSEventTbl[OS_MAX_EVENTS - 1].OSEventPtr = (OS_EVENT *)0;
202 1 OSEventFreeList = &OSEventTbl[0];
203 1 #endif
204 1
205 1 #if OS_Q_EN && (OS_MAX_QS >= 2)
OSQInit();
#endif
208 1
209 1 #if OS_MEM_EN && OS_MAX_MEM_PART >= 2
OSMemInit();
#endif
212 1 //建立IDLE任务
213 1 OSTaskIdleCreate();
214 1 //建立STAT任务
215 1 #if OS_TASK_STAT_EN
216 1 OSTaskStatCreate();
217 1 #endif
218 1 }
219
220 //进入中断
221 void OSIntEnter (void)
222 {
223 1 OS_ENTER_CRITICAL();
224 1 OSIntNesting++; /* Increment ISR nesting level */
225 1 OS_EXIT_CRITICAL();
226 1 }
227
228 //退出中断
229 void OSIntExit (void)
230 {
231 1 OS_ENTER_CRITICAL();
232 1 if ((--OSIntNesting | OSLockNesting) == 0) { /* Reschedule only if all ISRs completed & not locked */
233 2 OSIntExitY = OSUnMapTbl[OSRdyGrp];
234 2 OSPrioHighRdy = (INT8U)((OSIntExitY << 3) + OSUnMapTbl[OSRdyTbl[OSIntExitY]]);
235 2 if (OSPrioHighRdy != OSPrioCur) { /* No context switch if current task is highest ready */
236 3 OSTCBHighRdy = OSTCBPrioTbl[OSPrioHighRdy];
237 3 OSCtxSwCtr++; /* Keep track of the number of context switches */
238 3 OSIntCtxSw(); /* Perform interrupt level context switch */
C51 COMPILER V7.02b OS_CORE 07/08/2007 20:25:02 PAGE 5
239 3 }
240 2 }
241 1 OS_EXIT_CRITICAL();
242 1 }
243
244 //任务调度
245 void OSSched (void)reentrant
246 {
247 1 INT8U y;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -