Ethernetwebsoc

Dependencies:   C12832_lcd LM75B WebSocketClient mbed-rtos mbed Socket lwip-eth lwip-sys lwip

Committer:
GordonSin
Date:
Fri May 31 04:09:54 2013 +0000
Revision:
0:0ed2a7c7190c
31/5/2013;

Who changed what in which revision?

UserRevisionLine numberNew contents of line
GordonSin 0:0ed2a7c7190c 1 /*----------------------------------------------------------------------------
GordonSin 0:0ed2a7c7190c 2 * RL-ARM - RTX
GordonSin 0:0ed2a7c7190c 3 *----------------------------------------------------------------------------
GordonSin 0:0ed2a7c7190c 4 * Name: RT_EVENT.C
GordonSin 0:0ed2a7c7190c 5 * Purpose: Implements waits and wake-ups for event flags
GordonSin 0:0ed2a7c7190c 6 * Rev.: V4.50
GordonSin 0:0ed2a7c7190c 7 *----------------------------------------------------------------------------
GordonSin 0:0ed2a7c7190c 8 *
GordonSin 0:0ed2a7c7190c 9 * Copyright (c) 1999-2009 KEIL, 2009-2012 ARM Germany GmbH
GordonSin 0:0ed2a7c7190c 10 * All rights reserved.
GordonSin 0:0ed2a7c7190c 11 * Redistribution and use in source and binary forms, with or without
GordonSin 0:0ed2a7c7190c 12 * modification, are permitted provided that the following conditions are met:
GordonSin 0:0ed2a7c7190c 13 * - Redistributions of source code must retain the above copyright
GordonSin 0:0ed2a7c7190c 14 * notice, this list of conditions and the following disclaimer.
GordonSin 0:0ed2a7c7190c 15 * - Redistributions in binary form must reproduce the above copyright
GordonSin 0:0ed2a7c7190c 16 * notice, this list of conditions and the following disclaimer in the
GordonSin 0:0ed2a7c7190c 17 * documentation and/or other materials provided with the distribution.
GordonSin 0:0ed2a7c7190c 18 * - Neither the name of ARM nor the names of its contributors may be used
GordonSin 0:0ed2a7c7190c 19 * to endorse or promote products derived from this software without
GordonSin 0:0ed2a7c7190c 20 * specific prior written permission.
GordonSin 0:0ed2a7c7190c 21 *
GordonSin 0:0ed2a7c7190c 22 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
GordonSin 0:0ed2a7c7190c 23 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
GordonSin 0:0ed2a7c7190c 24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
GordonSin 0:0ed2a7c7190c 25 * ARE DISCLAIMED. IN NO EVENT SHALL COPYRIGHT HOLDERS AND CONTRIBUTORS BE
GordonSin 0:0ed2a7c7190c 26 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
GordonSin 0:0ed2a7c7190c 27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
GordonSin 0:0ed2a7c7190c 28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
GordonSin 0:0ed2a7c7190c 29 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
GordonSin 0:0ed2a7c7190c 30 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
GordonSin 0:0ed2a7c7190c 31 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
GordonSin 0:0ed2a7c7190c 32 * POSSIBILITY OF SUCH DAMAGE.
GordonSin 0:0ed2a7c7190c 33 *---------------------------------------------------------------------------*/
GordonSin 0:0ed2a7c7190c 34
GordonSin 0:0ed2a7c7190c 35 #include "rt_TypeDef.h"
GordonSin 0:0ed2a7c7190c 36 #include "RTX_Config.h"
GordonSin 0:0ed2a7c7190c 37 #include "rt_System.h"
GordonSin 0:0ed2a7c7190c 38 #include "rt_Event.h"
GordonSin 0:0ed2a7c7190c 39 #include "rt_List.h"
GordonSin 0:0ed2a7c7190c 40 #include "rt_Task.h"
GordonSin 0:0ed2a7c7190c 41 #include "rt_HAL_CM.h"
GordonSin 0:0ed2a7c7190c 42
GordonSin 0:0ed2a7c7190c 43
GordonSin 0:0ed2a7c7190c 44 /*----------------------------------------------------------------------------
GordonSin 0:0ed2a7c7190c 45 * Functions
GordonSin 0:0ed2a7c7190c 46 *---------------------------------------------------------------------------*/
GordonSin 0:0ed2a7c7190c 47
GordonSin 0:0ed2a7c7190c 48
GordonSin 0:0ed2a7c7190c 49 /*--------------------------- rt_evt_wait -----------------------------------*/
GordonSin 0:0ed2a7c7190c 50
GordonSin 0:0ed2a7c7190c 51 OS_RESULT rt_evt_wait (U16 wait_flags, U16 timeout, BOOL and_wait) {
GordonSin 0:0ed2a7c7190c 52 /* Wait for one or more event flags with optional time-out. */
GordonSin 0:0ed2a7c7190c 53 /* "wait_flags" identifies the flags to wait for. */
GordonSin 0:0ed2a7c7190c 54 /* "timeout" is the time-out limit in system ticks (0xffff if no time-out) */
GordonSin 0:0ed2a7c7190c 55 /* "and_wait" specifies the AND-ing of "wait_flags" as condition to be met */
GordonSin 0:0ed2a7c7190c 56 /* to complete the wait. (OR-ing if set to 0). */
GordonSin 0:0ed2a7c7190c 57 U32 block_state;
GordonSin 0:0ed2a7c7190c 58
GordonSin 0:0ed2a7c7190c 59 if (and_wait) {
GordonSin 0:0ed2a7c7190c 60 /* Check for AND-connected events */
GordonSin 0:0ed2a7c7190c 61 if ((os_tsk.run->events & wait_flags) == wait_flags) {
GordonSin 0:0ed2a7c7190c 62 os_tsk.run->events &= ~wait_flags;
GordonSin 0:0ed2a7c7190c 63 return (OS_R_EVT);
GordonSin 0:0ed2a7c7190c 64 }
GordonSin 0:0ed2a7c7190c 65 block_state = WAIT_AND;
GordonSin 0:0ed2a7c7190c 66 }
GordonSin 0:0ed2a7c7190c 67 else {
GordonSin 0:0ed2a7c7190c 68 /* Check for OR-connected events */
GordonSin 0:0ed2a7c7190c 69 if (os_tsk.run->events & wait_flags) {
GordonSin 0:0ed2a7c7190c 70 os_tsk.run->waits = os_tsk.run->events & wait_flags;
GordonSin 0:0ed2a7c7190c 71 os_tsk.run->events &= ~wait_flags;
GordonSin 0:0ed2a7c7190c 72 return (OS_R_EVT);
GordonSin 0:0ed2a7c7190c 73 }
GordonSin 0:0ed2a7c7190c 74 block_state = WAIT_OR;
GordonSin 0:0ed2a7c7190c 75 }
GordonSin 0:0ed2a7c7190c 76 /* Task has to wait */
GordonSin 0:0ed2a7c7190c 77 os_tsk.run->waits = wait_flags;
GordonSin 0:0ed2a7c7190c 78 rt_block (timeout, (U8)block_state);
GordonSin 0:0ed2a7c7190c 79 return (OS_R_TMO);
GordonSin 0:0ed2a7c7190c 80 }
GordonSin 0:0ed2a7c7190c 81
GordonSin 0:0ed2a7c7190c 82
GordonSin 0:0ed2a7c7190c 83 /*--------------------------- rt_evt_set ------------------------------------*/
GordonSin 0:0ed2a7c7190c 84
GordonSin 0:0ed2a7c7190c 85 void rt_evt_set (U16 event_flags, OS_TID task_id) {
GordonSin 0:0ed2a7c7190c 86 /* Set one or more event flags of a selectable task. */
GordonSin 0:0ed2a7c7190c 87 P_TCB p_tcb;
GordonSin 0:0ed2a7c7190c 88
GordonSin 0:0ed2a7c7190c 89 p_tcb = os_active_TCB[task_id-1];
GordonSin 0:0ed2a7c7190c 90 if (p_tcb == NULL) {
GordonSin 0:0ed2a7c7190c 91 return;
GordonSin 0:0ed2a7c7190c 92 }
GordonSin 0:0ed2a7c7190c 93 p_tcb->events |= event_flags;
GordonSin 0:0ed2a7c7190c 94 event_flags = p_tcb->waits;
GordonSin 0:0ed2a7c7190c 95 /* If the task is not waiting for an event, it should not be put */
GordonSin 0:0ed2a7c7190c 96 /* to ready state. */
GordonSin 0:0ed2a7c7190c 97 if (p_tcb->state == WAIT_AND) {
GordonSin 0:0ed2a7c7190c 98 /* Check for AND-connected events */
GordonSin 0:0ed2a7c7190c 99 if ((p_tcb->events & event_flags) == event_flags) {
GordonSin 0:0ed2a7c7190c 100 goto wkup;
GordonSin 0:0ed2a7c7190c 101 }
GordonSin 0:0ed2a7c7190c 102 }
GordonSin 0:0ed2a7c7190c 103 if (p_tcb->state == WAIT_OR) {
GordonSin 0:0ed2a7c7190c 104 /* Check for OR-connected events */
GordonSin 0:0ed2a7c7190c 105 if (p_tcb->events & event_flags) {
GordonSin 0:0ed2a7c7190c 106 p_tcb->waits &= p_tcb->events;
GordonSin 0:0ed2a7c7190c 107 wkup: p_tcb->events &= ~event_flags;
GordonSin 0:0ed2a7c7190c 108 rt_rmv_dly (p_tcb);
GordonSin 0:0ed2a7c7190c 109 p_tcb->state = READY;
GordonSin 0:0ed2a7c7190c 110 rt_ret_val2(p_tcb, 0x08/*osEventSignal*/, p_tcb->waits);
GordonSin 0:0ed2a7c7190c 111 rt_dispatch (p_tcb);
GordonSin 0:0ed2a7c7190c 112 }
GordonSin 0:0ed2a7c7190c 113 }
GordonSin 0:0ed2a7c7190c 114 }
GordonSin 0:0ed2a7c7190c 115
GordonSin 0:0ed2a7c7190c 116
GordonSin 0:0ed2a7c7190c 117 /*--------------------------- rt_evt_clr ------------------------------------*/
GordonSin 0:0ed2a7c7190c 118
GordonSin 0:0ed2a7c7190c 119 void rt_evt_clr (U16 clear_flags, OS_TID task_id) {
GordonSin 0:0ed2a7c7190c 120 /* Clear one or more event flags (identified by "clear_flags") of a */
GordonSin 0:0ed2a7c7190c 121 /* selectable task (identified by "task"). */
GordonSin 0:0ed2a7c7190c 122 P_TCB task = os_active_TCB[task_id-1];
GordonSin 0:0ed2a7c7190c 123
GordonSin 0:0ed2a7c7190c 124 if (task == NULL) {
GordonSin 0:0ed2a7c7190c 125 return;
GordonSin 0:0ed2a7c7190c 126 }
GordonSin 0:0ed2a7c7190c 127 task->events &= ~clear_flags;
GordonSin 0:0ed2a7c7190c 128 }
GordonSin 0:0ed2a7c7190c 129
GordonSin 0:0ed2a7c7190c 130
GordonSin 0:0ed2a7c7190c 131 /*--------------------------- isr_evt_set -----------------------------------*/
GordonSin 0:0ed2a7c7190c 132
GordonSin 0:0ed2a7c7190c 133 void isr_evt_set (U16 event_flags, OS_TID task_id) {
GordonSin 0:0ed2a7c7190c 134 /* Same function as "os_evt_set", but to be called by ISRs. */
GordonSin 0:0ed2a7c7190c 135 P_TCB p_tcb = os_active_TCB[task_id-1];
GordonSin 0:0ed2a7c7190c 136
GordonSin 0:0ed2a7c7190c 137 if (p_tcb == NULL) {
GordonSin 0:0ed2a7c7190c 138 return;
GordonSin 0:0ed2a7c7190c 139 }
GordonSin 0:0ed2a7c7190c 140 rt_psq_enq (p_tcb, event_flags);
GordonSin 0:0ed2a7c7190c 141 rt_psh_req ();
GordonSin 0:0ed2a7c7190c 142 }
GordonSin 0:0ed2a7c7190c 143
GordonSin 0:0ed2a7c7190c 144
GordonSin 0:0ed2a7c7190c 145 /*--------------------------- rt_evt_get ------------------------------------*/
GordonSin 0:0ed2a7c7190c 146
GordonSin 0:0ed2a7c7190c 147 U16 rt_evt_get (void) {
GordonSin 0:0ed2a7c7190c 148 /* Get events of a running task after waiting for OR connected events. */
GordonSin 0:0ed2a7c7190c 149 return (os_tsk.run->waits);
GordonSin 0:0ed2a7c7190c 150 }
GordonSin 0:0ed2a7c7190c 151
GordonSin 0:0ed2a7c7190c 152
GordonSin 0:0ed2a7c7190c 153 /*--------------------------- rt_evt_psh ------------------------------------*/
GordonSin 0:0ed2a7c7190c 154
GordonSin 0:0ed2a7c7190c 155 void rt_evt_psh (P_TCB p_CB, U16 set_flags) {
GordonSin 0:0ed2a7c7190c 156 /* Check if task has to be waken up */
GordonSin 0:0ed2a7c7190c 157 U16 event_flags;
GordonSin 0:0ed2a7c7190c 158
GordonSin 0:0ed2a7c7190c 159 p_CB->events |= set_flags;
GordonSin 0:0ed2a7c7190c 160 event_flags = p_CB->waits;
GordonSin 0:0ed2a7c7190c 161 if (p_CB->state == WAIT_AND) {
GordonSin 0:0ed2a7c7190c 162 /* Check for AND-connected events */
GordonSin 0:0ed2a7c7190c 163 if ((p_CB->events & event_flags) == event_flags) {
GordonSin 0:0ed2a7c7190c 164 goto rdy;
GordonSin 0:0ed2a7c7190c 165 }
GordonSin 0:0ed2a7c7190c 166 }
GordonSin 0:0ed2a7c7190c 167 if (p_CB->state == WAIT_OR) {
GordonSin 0:0ed2a7c7190c 168 /* Check for OR-connected events */
GordonSin 0:0ed2a7c7190c 169 if (p_CB->events & event_flags) {
GordonSin 0:0ed2a7c7190c 170 p_CB->waits &= p_CB->events;
GordonSin 0:0ed2a7c7190c 171 rdy: p_CB->events &= ~event_flags;
GordonSin 0:0ed2a7c7190c 172 rt_rmv_dly (p_CB);
GordonSin 0:0ed2a7c7190c 173 p_CB->state = READY;
GordonSin 0:0ed2a7c7190c 174 rt_ret_val2(p_CB, 0x08/*osEventSignal*/, p_CB->waits);
GordonSin 0:0ed2a7c7190c 175 rt_put_prio (&os_rdy, p_CB);
GordonSin 0:0ed2a7c7190c 176 }
GordonSin 0:0ed2a7c7190c 177 }
GordonSin 0:0ed2a7c7190c 178 }
GordonSin 0:0ed2a7c7190c 179
GordonSin 0:0ed2a7c7190c 180 /*----------------------------------------------------------------------------
GordonSin 0:0ed2a7c7190c 181 * end of file
GordonSin 0:0ed2a7c7190c 182 *---------------------------------------------------------------------------*/