os_flag.c
上传用户:yj_qqy
上传日期:2017-01-28
资源大小:2911k
文件大小:55k
源码类别:

uCOS

开发平台:

C/C++

  1. /*
  2. *********************************************************************************************************
  3. *                                                uC/OS-II
  4. *                                          The Real-Time Kernel
  5. *                                         EVENT FLAG  MANAGEMENT
  6. *
  7. *                              (c) Copyright 1992-2007, Micrium, Weston, FL
  8. *                                           All Rights Reserved
  9. *
  10. * File    : OS_FLAG.C
  11. * By      : Jean J. Labrosse
  12. * Version : V2.86
  13. *
  14. * LICENSING TERMS:
  15. * ---------------
  16. *   uC/OS-II is provided in source form for FREE evaluation, for educational use or for peaceful research.  
  17. * If you plan on using  uC/OS-II  in a commercial product you need to contact Micri祄 to properly license 
  18. * its use in your product. We provide ALL the source code for your convenience and to help you experience 
  19. * uC/OS-II.   The fact that the  source is provided does  NOT  mean that you can use it without  paying a 
  20. * licensing fee.
  21. *********************************************************************************************************
  22. */
  23. #ifndef  OS_MASTER_FILE
  24. #include <ucos_ii.h>
  25. #endif
  26. #if (OS_FLAG_EN > 0) && (OS_MAX_FLAGS > 0)
  27. /*
  28. *********************************************************************************************************
  29. *                                            LOCAL PROTOTYPES
  30. *********************************************************************************************************
  31. */
  32. static  void     OS_FlagBlock(OS_FLAG_GRP *pgrp, OS_FLAG_NODE *pnode, OS_FLAGS flags, INT8U wait_type, INT16U timeout);
  33. static  BOOLEAN  OS_FlagTaskRdy(OS_FLAG_NODE *pnode, OS_FLAGS flags_rdy);
  34. /*$PAGE*/
  35. /*
  36. *********************************************************************************************************
  37. *                              CHECK THE STATUS OF FLAGS IN AN EVENT FLAG GROUP
  38. *
  39. * Description: This function is called to check the status of a combination of bits to be set or cleared
  40. *              in an event flag group.  Your application can check for ANY bit to be set/cleared or ALL
  41. *              bits to be set/cleared.
  42. *
  43. *              This call does not block if the desired flags are not present.
  44. *
  45. * Arguments  : pgrp          is a pointer to the desired event flag group.
  46. *
  47. *              flags         Is a bit pattern indicating which bit(s) (i.e. flags) you wish to check.
  48. *                            The bits you want are specified by setting the corresponding bits in
  49. *                            'flags'.  e.g. if your application wants to wait for bits 0 and 1 then
  50. *                            'flags' would contain 0x03.
  51. *
  52. *              wait_type     specifies whether you want ALL bits to be set/cleared or ANY of the bits
  53. *                            to be set/cleared.
  54. *                            You can specify the following argument:
  55. *
  56. *                            OS_FLAG_WAIT_CLR_ALL   You will check ALL bits in 'flags' to be clear (0)
  57. *                            OS_FLAG_WAIT_CLR_ANY   You will check ANY bit  in 'flags' to be clear (0)
  58. *                            OS_FLAG_WAIT_SET_ALL   You will check ALL bits in 'flags' to be set   (1)
  59. *                            OS_FLAG_WAIT_SET_ANY   You will check ANY bit  in 'flags' to be set   (1)
  60. *
  61. *                            NOTE: Add OS_FLAG_CONSUME if you want the event flag to be 'consumed' by
  62. *                                  the call.  Example, to wait for any flag in a group AND then clear
  63. *                                  the flags that are present, set 'wait_type' to:
  64. *
  65. *                                  OS_FLAG_WAIT_SET_ANY + OS_FLAG_CONSUME
  66. *
  67. *              perr          is a pointer to an error code and can be:
  68. *                            OS_ERR_NONE               No error
  69. *                            OS_ERR_EVENT_TYPE         You are not pointing to an event flag group
  70. *                            OS_ERR_FLAG_WAIT_TYPE     You didn't specify a proper 'wait_type' argument.
  71. *                            OS_ERR_FLAG_INVALID_PGRP  You passed a NULL pointer instead of the event flag
  72. *                                                      group handle.
  73. *                            OS_ERR_FLAG_NOT_RDY       The desired flags you are waiting for are not
  74. *                                                      available.
  75. *
  76. * Returns    : The flags in the event flag group that made the task ready or, 0 if a timeout or an error
  77. *              occurred.
  78. *
  79. * Called from: Task or ISR
  80. *
  81. * Note(s)    : 1) IMPORTANT, the behavior of this function has changed from PREVIOUS versions.  The
  82. *                 function NOW returns the flags that were ready INSTEAD of the current state of the
  83. *                 event flags.
  84. *********************************************************************************************************
  85. */
  86. #if OS_FLAG_ACCEPT_EN > 0
  87. OS_FLAGS  OSFlagAccept (OS_FLAG_GRP *pgrp, OS_FLAGS flags, INT8U wait_type, INT8U *perr)
  88. {
  89.     OS_FLAGS      flags_rdy;
  90.     INT8U         result;
  91.     BOOLEAN       consume;
  92. #if OS_CRITICAL_METHOD == 3                                /* Allocate storage for CPU status register */
  93.     OS_CPU_SR     cpu_sr = 0;
  94. #endif
  95. #if OS_ARG_CHK_EN > 0
  96.     if (perr == (INT8U *)0) {                              /* Validate 'perr'                          */
  97.         return ((OS_FLAGS)0);
  98.     }
  99.     if (pgrp == (OS_FLAG_GRP *)0) {                        /* Validate 'pgrp'                          */
  100.         *perr = OS_ERR_FLAG_INVALID_PGRP;
  101.         return ((OS_FLAGS)0);
  102.     }
  103. #endif
  104.     if (pgrp->OSFlagType != OS_EVENT_TYPE_FLAG) {          /* Validate event block type                */
  105.         *perr = OS_ERR_EVENT_TYPE;
  106.         return ((OS_FLAGS)0);
  107.     }
  108.     result = (INT8U)(wait_type & OS_FLAG_CONSUME);
  109.     if (result != (INT8U)0) {                              /* See if we need to consume the flags      */
  110.         wait_type &= ~OS_FLAG_CONSUME;
  111.         consume    = OS_TRUE;
  112.     } else {
  113.         consume    = OS_FALSE;
  114.     }
  115. /*$PAGE*/
  116.     *perr = OS_ERR_NONE;                                   /* Assume NO error until proven otherwise.  */
  117.     OS_ENTER_CRITICAL();
  118.     switch (wait_type) {
  119.         case OS_FLAG_WAIT_SET_ALL:                         /* See if all required flags are set        */
  120.              flags_rdy = (OS_FLAGS)(pgrp->OSFlagFlags & flags);     /* Extract only the bits we want   */
  121.              if (flags_rdy == flags) {                     /* Must match ALL the bits that we want     */
  122.                  if (consume == OS_TRUE) {                 /* See if we need to consume the flags      */
  123.                      pgrp->OSFlagFlags &= ~flags_rdy;      /* Clear ONLY the flags that we wanted      */
  124.                  }
  125.              } else {
  126.                  *perr = OS_ERR_FLAG_NOT_RDY;
  127.              }
  128.              OS_EXIT_CRITICAL();
  129.              break;
  130.         case OS_FLAG_WAIT_SET_ANY:
  131.              flags_rdy = (OS_FLAGS)(pgrp->OSFlagFlags & flags);     /* Extract only the bits we want   */
  132.              if (flags_rdy != (OS_FLAGS)0) {               /* See if any flag set                      */
  133.                  if (consume == OS_TRUE) {                 /* See if we need to consume the flags      */
  134.                      pgrp->OSFlagFlags &= ~flags_rdy;      /* Clear ONLY the flags that we got         */
  135.                  }
  136.              } else {
  137.                  *perr = OS_ERR_FLAG_NOT_RDY;
  138.              }
  139.              OS_EXIT_CRITICAL();
  140.              break;
  141. #if OS_FLAG_WAIT_CLR_EN > 0
  142.         case OS_FLAG_WAIT_CLR_ALL:                         /* See if all required flags are cleared    */
  143.              flags_rdy = (OS_FLAGS)(~pgrp->OSFlagFlags & flags);  /* Extract only the bits we want     */
  144.              if (flags_rdy == flags) {                     /* Must match ALL the bits that we want     */
  145.                  if (consume == OS_TRUE) {                 /* See if we need to consume the flags      */
  146.                      pgrp->OSFlagFlags |= flags_rdy;       /* Set ONLY the flags that we wanted        */
  147.                  }
  148.              } else {
  149.                  *perr = OS_ERR_FLAG_NOT_RDY;
  150.              }
  151.              OS_EXIT_CRITICAL();
  152.              break;
  153.         case OS_FLAG_WAIT_CLR_ANY:
  154.              flags_rdy = (OS_FLAGS)(~pgrp->OSFlagFlags & flags); /* Extract only the bits we want      */
  155.              if (flags_rdy != (OS_FLAGS)0) {               /* See if any flag cleared                  */
  156.                  if (consume == OS_TRUE) {                 /* See if we need to consume the flags      */
  157.                      pgrp->OSFlagFlags |= flags_rdy;       /* Set ONLY the flags that we got           */
  158.                  }
  159.              } else {
  160.                  *perr = OS_ERR_FLAG_NOT_RDY;
  161.              }
  162.              OS_EXIT_CRITICAL();
  163.              break;
  164. #endif
  165.         default:
  166.              OS_EXIT_CRITICAL();
  167.              flags_rdy = (OS_FLAGS)0;
  168.              *perr     = OS_ERR_FLAG_WAIT_TYPE;
  169.              break;
  170.     }
  171.     return (flags_rdy);
  172. }
  173. #endif
  174. /*$PAGE*/
  175. /*
  176. *********************************************************************************************************
  177. *                                           CREATE AN EVENT FLAG
  178. *
  179. * Description: This function is called to create an event flag group.
  180. *
  181. * Arguments  : flags         Contains the initial value to store in the event flag group.
  182. *
  183. *              perr          is a pointer to an error code which will be returned to your application:
  184. *                               OS_ERR_NONE               if the call was successful.
  185. *                               OS_ERR_CREATE_ISR         if you attempted to create an Event Flag from an
  186. *                                                         ISR.
  187. *                               OS_ERR_FLAG_GRP_DEPLETED  if there are no more event flag groups
  188. *
  189. * Returns    : A pointer to an event flag group or a NULL pointer if no more groups are available.
  190. *
  191. * Called from: Task ONLY
  192. *********************************************************************************************************
  193. */
  194. OS_FLAG_GRP  *OSFlagCreate (OS_FLAGS flags, INT8U *perr)
  195. {
  196.     OS_FLAG_GRP *pgrp;
  197. #if OS_CRITICAL_METHOD == 3                         /* Allocate storage for CPU status register        */
  198.     OS_CPU_SR    cpu_sr = 0;
  199. #endif
  200. #if OS_ARG_CHK_EN > 0
  201.     if (perr == (INT8U *)0) {                       /* Validate 'perr'                                 */
  202.         return ((OS_FLAG_GRP *)0);
  203.     }
  204. #endif
  205.     if (OSIntNesting > 0) {                         /* See if called from ISR ...                      */
  206.         *perr = OS_ERR_CREATE_ISR;                  /* ... can't CREATE from an ISR                    */
  207.         return ((OS_FLAG_GRP *)0);
  208.     }
  209.     OS_ENTER_CRITICAL();
  210.     pgrp = OSFlagFreeList;                          /* Get next free event flag                        */
  211.     if (pgrp != (OS_FLAG_GRP *)0) {                 /* See if we have event flag groups available      */
  212.                                                     /* Adjust free list                                */
  213.         OSFlagFreeList       = (OS_FLAG_GRP *)OSFlagFreeList->OSFlagWaitList;
  214.         pgrp->OSFlagType     = OS_EVENT_TYPE_FLAG;  /* Set to event flag group type                    */
  215.         pgrp->OSFlagFlags    = flags;               /* Set to desired initial value                    */
  216.         pgrp->OSFlagWaitList = (void *)0;           /* Clear list of tasks waiting on flags            */
  217. #if OS_FLAG_NAME_SIZE > 1
  218.         pgrp->OSFlagName[0]  = '?';
  219.         pgrp->OSFlagName[1]  = OS_ASCII_NUL;
  220. #endif
  221.         OS_EXIT_CRITICAL();
  222.         *perr                = OS_ERR_NONE;
  223.     } else {
  224.         OS_EXIT_CRITICAL();
  225.         *perr                = OS_ERR_FLAG_GRP_DEPLETED;
  226.     }
  227.     return (pgrp);                                  /* Return pointer to event flag group              */
  228. }
  229. /*$PAGE*/
  230. /*
  231. *********************************************************************************************************
  232. *                                     DELETE AN EVENT FLAG GROUP
  233. *
  234. * Description: This function deletes an event flag group and readies all tasks pending on the event flag
  235. *              group.
  236. *
  237. * Arguments  : pgrp          is a pointer to the desired event flag group.
  238. *
  239. *              opt           determines delete options as follows:
  240. *                            opt == OS_DEL_NO_PEND   Deletes the event flag group ONLY if no task pending
  241. *                            opt == OS_DEL_ALWAYS    Deletes the event flag group even if tasks are
  242. *                                                    waiting.  In this case, all the tasks pending will be
  243. *                                                    readied.
  244. *
  245. *              perr          is a pointer to an error code that can contain one of the following values:
  246. *                            OS_ERR_NONE               The call was successful and the event flag group was
  247. *                                                      deleted
  248. *                            OS_ERR_DEL_ISR            If you attempted to delete the event flag group from
  249. *                                                      an ISR
  250. *                            OS_ERR_FLAG_INVALID_PGRP  If 'pgrp' is a NULL pointer.
  251. *                            OS_ERR_EVENT_TYPE         If you didn't pass a pointer to an event flag group
  252. *                            OS_ERR_INVALID_OPT        An invalid option was specified
  253. *                            OS_ERR_TASK_WAITING       One or more tasks were waiting on the event flag
  254. *                                                      group.
  255. *
  256. * Returns    : pgrp          upon error
  257. *              (OS_EVENT *)0 if the event flag group was successfully deleted.
  258. *
  259. * Note(s)    : 1) This function must be used with care.  Tasks that would normally expect the presence of
  260. *                 the event flag group MUST check the return code of OSFlagAccept() and OSFlagPend().
  261. *              2) This call can potentially disable interrupts for a long time.  The interrupt disable
  262. *                 time is directly proportional to the number of tasks waiting on the event flag group.
  263. *********************************************************************************************************
  264. */
  265. #if OS_FLAG_DEL_EN > 0
  266. OS_FLAG_GRP  *OSFlagDel (OS_FLAG_GRP *pgrp, INT8U opt, INT8U *perr)
  267. {
  268.     BOOLEAN       tasks_waiting;
  269.     OS_FLAG_NODE *pnode;
  270.     OS_FLAG_GRP  *pgrp_return;
  271. #if OS_CRITICAL_METHOD == 3                                /* Allocate storage for CPU status register */
  272.     OS_CPU_SR     cpu_sr = 0;
  273. #endif
  274. #if OS_ARG_CHK_EN > 0
  275.     if (perr == (INT8U *)0) {                              /* Validate 'perr'                          */
  276.         return (pgrp);
  277.     }
  278.     if (pgrp == (OS_FLAG_GRP *)0) {                        /* Validate 'pgrp'                          */
  279.         *perr = OS_ERR_FLAG_INVALID_PGRP;
  280.         return (pgrp);
  281.     }
  282. #endif
  283.     if (OSIntNesting > 0) {                                /* See if called from ISR ...               */
  284.         *perr = OS_ERR_DEL_ISR;                            /* ... can't DELETE from an ISR             */
  285.         return (pgrp);
  286.     }
  287.     if (pgrp->OSFlagType != OS_EVENT_TYPE_FLAG) {          /* Validate event group type                */
  288.         *perr = OS_ERR_EVENT_TYPE;
  289.         return (pgrp);
  290.     }
  291.     OS_ENTER_CRITICAL();
  292.     if (pgrp->OSFlagWaitList != (void *)0) {               /* See if any tasks waiting on event flags  */
  293.         tasks_waiting = OS_TRUE;                           /* Yes                                      */
  294.     } else {
  295.         tasks_waiting = OS_FALSE;                          /* No                                       */
  296.     }
  297.     switch (opt) {
  298.         case OS_DEL_NO_PEND:                               /* Delete group if no task waiting          */
  299.              if (tasks_waiting == OS_FALSE) {
  300. #if OS_FLAG_NAME_SIZE > 1
  301.                  pgrp->OSFlagName[0]  = '?';               /* Unknown name                             */
  302.                  pgrp->OSFlagName[1]  = OS_ASCII_NUL;
  303. #endif
  304.                  pgrp->OSFlagType     = OS_EVENT_TYPE_UNUSED;
  305.                  pgrp->OSFlagWaitList = (void *)OSFlagFreeList; /* Return group to free list           */
  306.                  pgrp->OSFlagFlags    = (OS_FLAGS)0;
  307.                  OSFlagFreeList       = pgrp;
  308.                  OS_EXIT_CRITICAL();
  309.                  *perr                = OS_ERR_NONE;
  310.                  pgrp_return          = (OS_FLAG_GRP *)0;  /* Event Flag Group has been deleted        */
  311.              } else {
  312.                  OS_EXIT_CRITICAL();
  313.                  *perr                = OS_ERR_TASK_WAITING;
  314.                  pgrp_return          = pgrp;
  315.              }
  316.              break;
  317.         case OS_DEL_ALWAYS:                                /* Always delete the event flag group       */
  318.              pnode = (OS_FLAG_NODE *)pgrp->OSFlagWaitList;
  319.              while (pnode != (OS_FLAG_NODE *)0) {          /* Ready ALL tasks waiting for flags        */
  320.                  (void)OS_FlagTaskRdy(pnode, (OS_FLAGS)0);
  321.                  pnode = (OS_FLAG_NODE *)pnode->OSFlagNodeNext;
  322.              }
  323. #if OS_FLAG_NAME_SIZE > 1
  324.              pgrp->OSFlagName[0]  = '?';                   /* Unknown name                             */
  325.              pgrp->OSFlagName[1]  = OS_ASCII_NUL;
  326. #endif
  327.              pgrp->OSFlagType     = OS_EVENT_TYPE_UNUSED;
  328.              pgrp->OSFlagWaitList = (void *)OSFlagFreeList;/* Return group to free list                */
  329.              pgrp->OSFlagFlags    = (OS_FLAGS)0;
  330.              OSFlagFreeList       = pgrp;
  331.              OS_EXIT_CRITICAL();
  332.              if (tasks_waiting == OS_TRUE) {               /* Reschedule only if task(s) were waiting  */
  333.                  OS_Sched();                               /* Find highest priority task ready to run  */
  334.              }
  335.              *perr = OS_ERR_NONE;
  336.              pgrp_return          = (OS_FLAG_GRP *)0;      /* Event Flag Group has been deleted        */
  337.              break;
  338.         default:
  339.              OS_EXIT_CRITICAL();
  340.              *perr                = OS_ERR_INVALID_OPT;
  341.              pgrp_return          = pgrp;
  342.              break;
  343.     }
  344.     return (pgrp_return);
  345. }
  346. #endif
  347. /*$PAGE*/
  348. /*
  349. *********************************************************************************************************
  350. *                                 GET THE NAME OF AN EVENT FLAG GROUP
  351. *
  352. * Description: This function is used to obtain the name assigned to an event flag group
  353. *
  354. * Arguments  : pgrp      is a pointer to the event flag group.
  355. *
  356. *              pname     is a pointer to an ASCII string that will receive the name of the event flag
  357. *                        group.  The string must be able to hold at least OS_FLAG_NAME_SIZE characters.
  358. *
  359. *              perr      is a pointer to an error code that can contain one of the following values:
  360. *
  361. *                        OS_ERR_NONE                if the requested task is resumed
  362. *                        OS_ERR_EVENT_TYPE          if 'pevent' is not pointing to an event flag group
  363. *                        OS_ERR_PNAME_NULL          You passed a NULL pointer for 'pname'
  364. *                        OS_ERR_FLAG_INVALID_PGRP   if you passed a NULL pointer for 'pgrp'
  365. *                        OS_ERR_NAME_GET_ISR        if you called this function from an ISR
  366. *
  367. * Returns    : The length of the string or 0 if the 'pgrp' is a NULL pointer.
  368. *********************************************************************************************************
  369. */
  370. #if OS_FLAG_NAME_SIZE > 1
  371. INT8U  OSFlagNameGet (OS_FLAG_GRP *pgrp, INT8U *pname, INT8U *perr)
  372. {
  373.     INT8U      len;
  374. #if OS_CRITICAL_METHOD == 3                      /* Allocate storage for CPU status register           */
  375.     OS_CPU_SR  cpu_sr = 0;
  376. #endif
  377. #if OS_ARG_CHK_EN > 0
  378.     if (perr == (INT8U *)0) {                    /* Validate 'perr'                                    */
  379.         return (0);
  380.     }
  381.     if (pgrp == (OS_FLAG_GRP *)0) {              /* Is 'pgrp' a NULL pointer?                          */
  382.         *perr = OS_ERR_FLAG_INVALID_PGRP;
  383.         return (0);
  384.     }
  385.     if (pname == (INT8U *)0) {                   /* Is 'pname' a NULL pointer?                         */
  386.         *perr = OS_ERR_PNAME_NULL;
  387.         return (0);
  388.     }
  389. #endif
  390.     if (OSIntNesting > 0) {                      /* See if trying to call from an ISR                  */
  391.         *perr = OS_ERR_NAME_GET_ISR;
  392.         return (0);
  393.     }
  394.     OS_ENTER_CRITICAL();
  395.     if (pgrp->OSFlagType != OS_EVENT_TYPE_FLAG) {
  396.         OS_EXIT_CRITICAL();
  397.         *perr = OS_ERR_EVENT_TYPE;
  398.         return (0);
  399.     }
  400.     len   = OS_StrCopy(pname, pgrp->OSFlagName); /* Copy name from OS_FLAG_GRP                         */
  401.     OS_EXIT_CRITICAL();
  402.     *perr = OS_ERR_NONE;
  403.     return (len);
  404. }
  405. #endif
  406. /*$PAGE*/
  407. /*
  408. *********************************************************************************************************
  409. *                                 ASSIGN A NAME TO AN EVENT FLAG GROUP
  410. *
  411. * Description: This function assigns a name to an event flag group.
  412. *
  413. * Arguments  : pgrp      is a pointer to the event flag group.
  414. *
  415. *              pname     is a pointer to an ASCII string that will be used as the name of the event flag
  416. *                        group.  The string must be able to hold at least OS_FLAG_NAME_SIZE characters.
  417. *
  418. *              perr      is a pointer to an error code that can contain one of the following values:
  419. *
  420. *                        OS_ERR_NONE                if the requested task is resumed
  421. *                        OS_ERR_EVENT_TYPE          if 'pevent' is not pointing to an event flag group
  422. *                        OS_ERR_PNAME_NULL          You passed a NULL pointer for 'pname'
  423. *                        OS_ERR_FLAG_INVALID_PGRP   if you passed a NULL pointer for 'pgrp'
  424. *                        OS_ERR_NAME_SET_ISR        if you called this function from an ISR
  425. *
  426. * Returns    : None
  427. *********************************************************************************************************
  428. */
  429. #if OS_FLAG_NAME_SIZE > 1
  430. void  OSFlagNameSet (OS_FLAG_GRP *pgrp, INT8U *pname, INT8U *perr)
  431. {
  432.     INT8U      len;
  433. #if OS_CRITICAL_METHOD == 3                      /* Allocate storage for CPU status register           */
  434.     OS_CPU_SR  cpu_sr = 0;
  435. #endif
  436. #if OS_ARG_CHK_EN > 0
  437.     if (perr == (INT8U *)0) {                    /* Validate 'perr'                                    */
  438.         return;
  439.     }
  440.     if (pgrp == (OS_FLAG_GRP *)0) {              /* Is 'pgrp' a NULL pointer?                          */
  441.         *perr = OS_ERR_FLAG_INVALID_PGRP;
  442.         return;
  443.     }
  444.     if (pname == (INT8U *)0) {                   /* Is 'pname' a NULL pointer?                         */
  445.         *perr = OS_ERR_PNAME_NULL;
  446.         return;
  447.     }
  448. #endif
  449.     if (OSIntNesting > 0) {                      /* See if trying to call from an ISR                  */
  450.         *perr = OS_ERR_NAME_SET_ISR;
  451.         return;
  452.     }
  453.     OS_ENTER_CRITICAL();
  454.     if (pgrp->OSFlagType != OS_EVENT_TYPE_FLAG) {
  455.         OS_EXIT_CRITICAL();
  456.         *perr = OS_ERR_EVENT_TYPE;
  457.         return;
  458.     }
  459.     len = OS_StrLen(pname);                      /* Can we fit the string in the storage area?         */
  460.     if (len > (OS_FLAG_NAME_SIZE - 1)) {         /* No                                                 */
  461.         OS_EXIT_CRITICAL();
  462.         *perr = OS_ERR_FLAG_NAME_TOO_LONG;
  463.         return;
  464.     }
  465.     (void)OS_StrCopy(pgrp->OSFlagName, pname);   /* Yes, copy name from OS_FLAG_GRP                    */
  466.     OS_EXIT_CRITICAL();
  467.     *perr = OS_ERR_NONE;
  468.     return;
  469. }
  470. #endif
  471. /*$PAGE*/
  472. /*
  473. *********************************************************************************************************
  474. *                                        WAIT ON AN EVENT FLAG GROUP
  475. *
  476. * Description: This function is called to wait for a combination of bits to be set in an event flag
  477. *              group.  Your application can wait for ANY bit to be set or ALL bits to be set.
  478. *
  479. * Arguments  : pgrp          is a pointer to the desired event flag group.
  480. *
  481. *              flags         Is a bit pattern indicating which bit(s) (i.e. flags) you wish to wait for.
  482. *                            The bits you want are specified by setting the corresponding bits in
  483. *                            'flags'.  e.g. if your application wants to wait for bits 0 and 1 then
  484. *                            'flags' would contain 0x03.
  485. *
  486. *              wait_type     specifies whether you want ALL bits to be set or ANY of the bits to be set.
  487. *                            You can specify the following argument:
  488. *
  489. *                            OS_FLAG_WAIT_CLR_ALL   You will wait for ALL bits in 'mask' to be clear (0)
  490. *                            OS_FLAG_WAIT_SET_ALL   You will wait for ALL bits in 'mask' to be set   (1)
  491. *                            OS_FLAG_WAIT_CLR_ANY   You will wait for ANY bit  in 'mask' to be clear (0)
  492. *                            OS_FLAG_WAIT_SET_ANY   You will wait for ANY bit  in 'mask' to be set   (1)
  493. *
  494. *                            NOTE: Add OS_FLAG_CONSUME if you want the event flag to be 'consumed' by
  495. *                                  the call.  Example, to wait for any flag in a group AND then clear
  496. *                                  the flags that are present, set 'wait_type' to:
  497. *
  498. *                                  OS_FLAG_WAIT_SET_ANY + OS_FLAG_CONSUME
  499. *
  500. *              timeout       is an optional timeout (in clock ticks) that your task will wait for the
  501. *                            desired bit combination.  If you specify 0, however, your task will wait
  502. *                            forever at the specified event flag group or, until a message arrives.
  503. *
  504. *              perr          is a pointer to an error code and can be:
  505. *                            OS_ERR_NONE               The desired bits have been set within the specified
  506. *                                                      'timeout'.
  507. *                            OS_ERR_PEND_ISR           If you tried to PEND from an ISR
  508. *                            OS_ERR_FLAG_INVALID_PGRP  If 'pgrp' is a NULL pointer.
  509. *                            OS_ERR_EVENT_TYPE         You are not pointing to an event flag group
  510. *                            OS_ERR_TIMEOUT            The bit(s) have not been set in the specified
  511. *                                                      'timeout'.
  512. *                            OS_ERR_PEND_ABORT         The wait on the flag was aborted.
  513. *                            OS_ERR_FLAG_WAIT_TYPE     You didn't specify a proper 'wait_type' argument.
  514. *
  515. * Returns    : The flags in the event flag group that made the task ready or, 0 if a timeout or an error
  516. *              occurred.
  517. *
  518. * Called from: Task ONLY
  519. *
  520. * Note(s)    : 1) IMPORTANT, the behavior of this function has changed from PREVIOUS versions.  The
  521. *                 function NOW returns the flags that were ready INSTEAD of the current state of the
  522. *                 event flags.
  523. *********************************************************************************************************
  524. */
  525. OS_FLAGS  OSFlagPend (OS_FLAG_GRP *pgrp, OS_FLAGS flags, INT8U wait_type, INT16U timeout, INT8U *perr)
  526. {
  527.     OS_FLAG_NODE  node;
  528.     OS_FLAGS      flags_rdy;
  529.     INT8U         result;
  530.     INT8U         pend_stat;
  531.     BOOLEAN       consume;
  532. #if OS_CRITICAL_METHOD == 3                                /* Allocate storage for CPU status register */
  533.     OS_CPU_SR     cpu_sr = 0;
  534. #endif
  535. #if OS_ARG_CHK_EN > 0
  536.     if (perr == (INT8U *)0) {                              /* Validate 'perr'                          */
  537.         return ((OS_FLAGS)0);
  538.     }
  539.     if (pgrp == (OS_FLAG_GRP *)0) {                        /* Validate 'pgrp'                          */
  540.         *perr = OS_ERR_FLAG_INVALID_PGRP;
  541.         return ((OS_FLAGS)0);
  542.     }
  543. #endif
  544.     if (OSIntNesting > 0) {                                /* See if called from ISR ...               */
  545.         *perr = OS_ERR_PEND_ISR;                           /* ... can't PEND from an ISR               */
  546.         return ((OS_FLAGS)0);
  547.     }
  548.     if (OSLockNesting > 0) {                               /* See if called with scheduler locked ...  */
  549.         *perr = OS_ERR_PEND_LOCKED;                        /* ... can't PEND when locked               */
  550.         return ((OS_FLAGS)0);
  551.     }
  552.     if (pgrp->OSFlagType != OS_EVENT_TYPE_FLAG) {          /* Validate event block type                */
  553.         *perr = OS_ERR_EVENT_TYPE;
  554.         return ((OS_FLAGS)0);
  555.     }
  556.     result = (INT8U)(wait_type & OS_FLAG_CONSUME);
  557.     if (result != (INT8U)0) {                             /* See if we need to consume the flags      */
  558.         wait_type &= ~(INT8U)OS_FLAG_CONSUME;
  559.         consume    = OS_TRUE;
  560.     } else {
  561.         consume    = OS_FALSE;
  562.     }
  563. /*$PAGE*/
  564.     OS_ENTER_CRITICAL();
  565.     switch (wait_type) {
  566.         case OS_FLAG_WAIT_SET_ALL:                         /* See if all required flags are set        */
  567.              flags_rdy = (OS_FLAGS)(pgrp->OSFlagFlags & flags);   /* Extract only the bits we want     */
  568.              if (flags_rdy == flags) {                     /* Must match ALL the bits that we want     */
  569.                  if (consume == OS_TRUE) {                 /* See if we need to consume the flags      */
  570.                      pgrp->OSFlagFlags &= ~flags_rdy;      /* Clear ONLY the flags that we wanted      */
  571.                  }
  572.                  OSTCBCur->OSTCBFlagsRdy = flags_rdy;      /* Save flags that were ready               */
  573.                  OS_EXIT_CRITICAL();                       /* Yes, condition met, return to caller     */
  574.                  *perr                   = OS_ERR_NONE;
  575.                  return (flags_rdy);
  576.              } else {                                      /* Block task until events occur or timeout */
  577.                  OS_FlagBlock(pgrp, &node, flags, wait_type, timeout);
  578.                  OS_EXIT_CRITICAL();
  579.              }
  580.              break;
  581.         case OS_FLAG_WAIT_SET_ANY:
  582.              flags_rdy = (OS_FLAGS)(pgrp->OSFlagFlags & flags);    /* Extract only the bits we want    */
  583.              if (flags_rdy != (OS_FLAGS)0) {               /* See if any flag set                      */
  584.                  if (consume == OS_TRUE) {                 /* See if we need to consume the flags      */
  585.                      pgrp->OSFlagFlags &= ~flags_rdy;      /* Clear ONLY the flags that we got         */
  586.                  }
  587.                  OSTCBCur->OSTCBFlagsRdy = flags_rdy;      /* Save flags that were ready               */
  588.                  OS_EXIT_CRITICAL();                       /* Yes, condition met, return to caller     */
  589.                  *perr                   = OS_ERR_NONE;
  590.                  return (flags_rdy);
  591.              } else {                                      /* Block task until events occur or timeout */
  592.                  OS_FlagBlock(pgrp, &node, flags, wait_type, timeout);
  593.                  OS_EXIT_CRITICAL();
  594.              }
  595.              break;
  596. #if OS_FLAG_WAIT_CLR_EN > 0
  597.         case OS_FLAG_WAIT_CLR_ALL:                         /* See if all required flags are cleared    */
  598.              flags_rdy = (OS_FLAGS)(~pgrp->OSFlagFlags & flags);  /* Extract only the bits we want     */
  599.              if (flags_rdy == flags) {                     /* Must match ALL the bits that we want     */
  600.                  if (consume == OS_TRUE) {                 /* See if we need to consume the flags      */
  601.                      pgrp->OSFlagFlags |= flags_rdy;       /* Set ONLY the flags that we wanted        */
  602.                  }
  603.                  OSTCBCur->OSTCBFlagsRdy = flags_rdy;      /* Save flags that were ready               */
  604.                  OS_EXIT_CRITICAL();                       /* Yes, condition met, return to caller     */
  605.                  *perr                   = OS_ERR_NONE;
  606.                  return (flags_rdy);
  607.              } else {                                      /* Block task until events occur or timeout */
  608.                  OS_FlagBlock(pgrp, &node, flags, wait_type, timeout);
  609.                  OS_EXIT_CRITICAL();
  610.              }
  611.              break;
  612.         case OS_FLAG_WAIT_CLR_ANY:
  613.              flags_rdy = (OS_FLAGS)(~pgrp->OSFlagFlags & flags); /* Extract only the bits we want      */
  614.              if (flags_rdy != (OS_FLAGS)0) {               /* See if any flag cleared                  */
  615.                  if (consume == OS_TRUE) {                 /* See if we need to consume the flags      */
  616.                      pgrp->OSFlagFlags |= flags_rdy;       /* Set ONLY the flags that we got           */
  617.                  }
  618.                  OSTCBCur->OSTCBFlagsRdy = flags_rdy;      /* Save flags that were ready               */
  619.                  OS_EXIT_CRITICAL();                       /* Yes, condition met, return to caller     */
  620.                  *perr                   = OS_ERR_NONE;
  621.                  return (flags_rdy);
  622.              } else {                                      /* Block task until events occur or timeout */
  623.                  OS_FlagBlock(pgrp, &node, flags, wait_type, timeout);
  624.                  OS_EXIT_CRITICAL();
  625.              }
  626.              break;
  627. #endif
  628.         default:
  629.              OS_EXIT_CRITICAL();
  630.              flags_rdy = (OS_FLAGS)0;
  631.              *perr      = OS_ERR_FLAG_WAIT_TYPE;
  632.              return (flags_rdy);
  633.     }
  634. /*$PAGE*/
  635.     OS_Sched();                                            /* Find next HPT ready to run               */
  636.     OS_ENTER_CRITICAL();
  637.     if (OSTCBCur->OSTCBStatPend != OS_STAT_PEND_OK) {      /* Have we timed-out or aborted?            */
  638.         pend_stat                = OSTCBCur->OSTCBStatPend;
  639.         OSTCBCur->OSTCBStatPend  = OS_STAT_PEND_OK;
  640.         OS_FlagUnlink(&node);
  641.         OSTCBCur->OSTCBStat      = OS_STAT_RDY;            /* Yes, make task ready-to-run              */
  642.         OS_EXIT_CRITICAL();
  643.         flags_rdy                = (OS_FLAGS)0;
  644.         switch (pend_stat) {
  645.             case OS_STAT_PEND_ABORT:
  646.                  *perr = OS_ERR_PEND_ABORT;                 /* Indicate that we aborted   waiting       */
  647.                  break;
  648.             case OS_STAT_PEND_TO:
  649.             default:
  650.                  *perr = OS_ERR_TIMEOUT;                    /* Indicate that we timed-out waiting       */
  651.                  break;
  652.         }
  653.         return (flags_rdy);
  654.     }
  655.     flags_rdy = OSTCBCur->OSTCBFlagsRdy;
  656.     if (consume == OS_TRUE) {                              /* See if we need to consume the flags      */
  657.         switch (wait_type) {
  658.             case OS_FLAG_WAIT_SET_ALL:
  659.             case OS_FLAG_WAIT_SET_ANY:                     /* Clear ONLY the flags we got              */
  660.                  pgrp->OSFlagFlags &= ~flags_rdy;
  661.                  break;
  662. #if OS_FLAG_WAIT_CLR_EN > 0
  663.             case OS_FLAG_WAIT_CLR_ALL:
  664.             case OS_FLAG_WAIT_CLR_ANY:                     /* Set   ONLY the flags we got              */
  665.                  pgrp->OSFlagFlags |=  flags_rdy;
  666.                  break;
  667. #endif
  668.             default:
  669.                  OS_EXIT_CRITICAL();
  670.                  *perr = OS_ERR_FLAG_WAIT_TYPE;
  671.                  return ((OS_FLAGS)0);
  672.         }
  673.     }
  674.     OS_EXIT_CRITICAL();
  675.     *perr = OS_ERR_NONE;                                   /* Event(s) must have occurred              */
  676.     return (flags_rdy);
  677. }
  678. /*$PAGE*/
  679. /*
  680. *********************************************************************************************************
  681. *                               GET FLAGS WHO CAUSED TASK TO BECOME READY
  682. *
  683. * Description: This function is called to obtain the flags that caused the task to become ready to run.
  684. *              In other words, this function allows you to tell "Who done it!".
  685. *
  686. * Arguments  : None
  687. *
  688. * Returns    : The flags that caused the task to be ready.
  689. *
  690. * Called from: Task ONLY
  691. *********************************************************************************************************
  692. */
  693. OS_FLAGS  OSFlagPendGetFlagsRdy (void)
  694. {
  695.     OS_FLAGS      flags;
  696. #if OS_CRITICAL_METHOD == 3                                /* Allocate storage for CPU status register */
  697.     OS_CPU_SR     cpu_sr = 0;
  698. #endif
  699.     OS_ENTER_CRITICAL();
  700.     flags = OSTCBCur->OSTCBFlagsRdy;
  701.     OS_EXIT_CRITICAL();
  702.     return (flags);
  703. }
  704. /*$PAGE*/
  705. /*
  706. *********************************************************************************************************
  707. *                                         POST EVENT FLAG BIT(S)
  708. *
  709. * Description: This function is called to set or clear some bits in an event flag group.  The bits to
  710. *              set or clear are specified by a 'bit mask'.
  711. *
  712. * Arguments  : pgrp          is a pointer to the desired event flag group.
  713. *
  714. *              flags         If 'opt' (see below) is OS_FLAG_SET, each bit that is set in 'flags' will
  715. *                            set the corresponding bit in the event flag group.  e.g. to set bits 0, 4
  716. *                            and 5 you would set 'flags' to:
  717. *
  718. *                                0x31     (note, bit 0 is least significant bit)
  719. *
  720. *                            If 'opt' (see below) is OS_FLAG_CLR, each bit that is set in 'flags' will
  721. *                            CLEAR the corresponding bit in the event flag group.  e.g. to clear bits 0,
  722. *                            4 and 5 you would specify 'flags' as:
  723. *
  724. *                                0x31     (note, bit 0 is least significant bit)
  725. *
  726. *              opt           indicates whether the flags will be:
  727. *                                set     (OS_FLAG_SET) or
  728. *                                cleared (OS_FLAG_CLR)
  729. *
  730. *              perr          is a pointer to an error code and can be:
  731. *                            OS_ERR_NONE                The call was successfull
  732. *                            OS_ERR_FLAG_INVALID_PGRP   You passed a NULL pointer
  733. *                            OS_ERR_EVENT_TYPE          You are not pointing to an event flag group
  734. *                            OS_ERR_FLAG_INVALID_OPT    You specified an invalid option
  735. *
  736. * Returns    : the new value of the event flags bits that are still set.
  737. *
  738. * Called From: Task or ISR
  739. *
  740. * WARNING(s) : 1) The execution time of this function depends on the number of tasks waiting on the event
  741. *                 flag group.
  742. *              2) The amount of time interrupts are DISABLED depends on the number of tasks waiting on
  743. *                 the event flag group.
  744. *********************************************************************************************************
  745. */
  746. OS_FLAGS  OSFlagPost (OS_FLAG_GRP *pgrp, OS_FLAGS flags, INT8U opt, INT8U *perr)
  747. {
  748.     OS_FLAG_NODE *pnode;
  749.     BOOLEAN       sched;
  750.     OS_FLAGS      flags_cur;
  751.     OS_FLAGS      flags_rdy;
  752.     BOOLEAN       rdy;
  753. #if OS_CRITICAL_METHOD == 3                          /* Allocate storage for CPU status register       */
  754.     OS_CPU_SR     cpu_sr = 0;
  755. #endif
  756. #if OS_ARG_CHK_EN > 0
  757.     if (perr == (INT8U *)0) {                        /* Validate 'perr'                                */
  758.         return ((OS_FLAGS)0);
  759.     }
  760.     if (pgrp == (OS_FLAG_GRP *)0) {                  /* Validate 'pgrp'                                */
  761.         *perr = OS_ERR_FLAG_INVALID_PGRP;
  762.         return ((OS_FLAGS)0);
  763.     }
  764. #endif
  765.     if (pgrp->OSFlagType != OS_EVENT_TYPE_FLAG) {    /* Make sure we are pointing to an event flag grp */
  766.         *perr = OS_ERR_EVENT_TYPE;
  767.         return ((OS_FLAGS)0);
  768.     }
  769. /*$PAGE*/
  770.     OS_ENTER_CRITICAL();
  771.     switch (opt) {
  772.         case OS_FLAG_CLR:
  773.              pgrp->OSFlagFlags &= ~flags;            /* Clear the flags specified in the group         */
  774.              break;
  775.         case OS_FLAG_SET:
  776.              pgrp->OSFlagFlags |=  flags;            /* Set   the flags specified in the group         */
  777.              break;
  778.         default:
  779.              OS_EXIT_CRITICAL();                     /* INVALID option                                 */
  780.              *perr = OS_ERR_FLAG_INVALID_OPT;
  781.              return ((OS_FLAGS)0);
  782.     }
  783.     sched = OS_FALSE;                                /* Indicate that we don't need rescheduling       */
  784.     pnode = (OS_FLAG_NODE *)pgrp->OSFlagWaitList;
  785.     while (pnode != (OS_FLAG_NODE *)0) {             /* Go through all tasks waiting on event flag(s)  */
  786.         switch (pnode->OSFlagNodeWaitType) {
  787.             case OS_FLAG_WAIT_SET_ALL:               /* See if all req. flags are set for current node */
  788.                  flags_rdy = (OS_FLAGS)(pgrp->OSFlagFlags & pnode->OSFlagNodeFlags);
  789.                  if (flags_rdy == pnode->OSFlagNodeFlags) {
  790.                      rdy = OS_FlagTaskRdy(pnode, flags_rdy);  /* Make task RTR, event(s) Rx'd          */
  791.                      if (rdy == OS_TRUE) {
  792.                          sched = OS_TRUE;                     /* When done we will reschedule          */
  793.                      }
  794.                  }
  795.                  break;
  796.             case OS_FLAG_WAIT_SET_ANY:               /* See if any flag set                            */
  797.                  flags_rdy = (OS_FLAGS)(pgrp->OSFlagFlags & pnode->OSFlagNodeFlags);
  798.                  if (flags_rdy != (OS_FLAGS)0) {
  799.                      rdy = OS_FlagTaskRdy(pnode, flags_rdy);  /* Make task RTR, event(s) Rx'd          */
  800.                      if (rdy == OS_TRUE) {
  801.                          sched = OS_TRUE;                     /* When done we will reschedule          */
  802.                      }
  803.                  }
  804.                  break;
  805. #if OS_FLAG_WAIT_CLR_EN > 0
  806.             case OS_FLAG_WAIT_CLR_ALL:               /* See if all req. flags are set for current node */
  807.                  flags_rdy = (OS_FLAGS)(~pgrp->OSFlagFlags & pnode->OSFlagNodeFlags);
  808.                  if (flags_rdy == pnode->OSFlagNodeFlags) {
  809.                      rdy = OS_FlagTaskRdy(pnode, flags_rdy);  /* Make task RTR, event(s) Rx'd          */
  810.                      if (rdy == OS_TRUE) {
  811.                          sched = OS_TRUE;                     /* When done we will reschedule          */
  812.                      }
  813.                  }
  814.                  break;
  815.             case OS_FLAG_WAIT_CLR_ANY:               /* See if any flag set                            */
  816.                  flags_rdy = (OS_FLAGS)(~pgrp->OSFlagFlags & pnode->OSFlagNodeFlags);
  817.                  if (flags_rdy != (OS_FLAGS)0) {
  818.                      rdy = OS_FlagTaskRdy(pnode, flags_rdy);  /* Make task RTR, event(s) Rx'd          */
  819.                      if (rdy == OS_TRUE) {
  820.                          sched = OS_TRUE;                     /* When done we will reschedule          */
  821.                      }
  822.                  }
  823.                  break;
  824. #endif
  825.             default:
  826.                  OS_EXIT_CRITICAL();
  827.                  *perr = OS_ERR_FLAG_WAIT_TYPE;
  828.                  return ((OS_FLAGS)0);
  829.         }
  830.         pnode = (OS_FLAG_NODE *)pnode->OSFlagNodeNext; /* Point to next task waiting for event flag(s) */
  831.     }
  832.     OS_EXIT_CRITICAL();
  833.     if (sched == OS_TRUE) {
  834.         OS_Sched();
  835.     }
  836.     OS_ENTER_CRITICAL();
  837.     flags_cur = pgrp->OSFlagFlags;
  838.     OS_EXIT_CRITICAL();
  839.     *perr     = OS_ERR_NONE;
  840.     return (flags_cur);
  841. }
  842. /*$PAGE*/
  843. /*
  844. *********************************************************************************************************
  845. *                                           QUERY EVENT FLAG
  846. *
  847. * Description: This function is used to check the value of the event flag group.
  848. *
  849. * Arguments  : pgrp         is a pointer to the desired event flag group.
  850. *
  851. *              perr          is a pointer to an error code returned to the called:
  852. *                            OS_ERR_NONE                The call was successfull
  853. *                            OS_ERR_FLAG_INVALID_PGRP   You passed a NULL pointer
  854. *                            OS_ERR_EVENT_TYPE          You are not pointing to an event flag group
  855. *
  856. * Returns    : The current value of the event flag group.
  857. *
  858. * Called From: Task or ISR
  859. *********************************************************************************************************
  860. */
  861. #if OS_FLAG_QUERY_EN > 0
  862. OS_FLAGS  OSFlagQuery (OS_FLAG_GRP *pgrp, INT8U *perr)
  863. {
  864.     OS_FLAGS   flags;
  865. #if OS_CRITICAL_METHOD == 3                       /* Allocate storage for CPU status register          */
  866.     OS_CPU_SR  cpu_sr = 0;
  867. #endif
  868. #if OS_ARG_CHK_EN > 0
  869.     if (perr == (INT8U *)0) {                     /* Validate 'perr'                                   */
  870.         return ((OS_FLAGS)0);
  871.     }
  872.     if (pgrp == (OS_FLAG_GRP *)0) {               /* Validate 'pgrp'                                   */
  873.         *perr = OS_ERR_FLAG_INVALID_PGRP;
  874.         return ((OS_FLAGS)0);
  875.     }
  876. #endif
  877.     if (pgrp->OSFlagType != OS_EVENT_TYPE_FLAG) { /* Validate event block type                         */
  878.         *perr = OS_ERR_EVENT_TYPE;
  879.         return ((OS_FLAGS)0);
  880.     }
  881.     OS_ENTER_CRITICAL();
  882.     flags = pgrp->OSFlagFlags;
  883.     OS_EXIT_CRITICAL();
  884.     *perr = OS_ERR_NONE;
  885.     return (flags);                               /* Return the current value of the event flags       */
  886. }
  887. #endif
  888. /*$PAGE*/
  889. /*
  890. *********************************************************************************************************
  891. *                         SUSPEND TASK UNTIL EVENT FLAG(s) RECEIVED OR TIMEOUT OCCURS
  892. *
  893. * Description: This function is internal to uC/OS-II and is used to put a task to sleep until the desired
  894. *              event flag bit(s) are set.
  895. *
  896. * Arguments  : pgrp          is a pointer to the desired event flag group.
  897. *
  898. *              pnode         is a pointer to a structure which contains data about the task waiting for
  899. *                            event flag bit(s) to be set.
  900. *
  901. *              flags         Is a bit pattern indicating which bit(s) (i.e. flags) you wish to check.
  902. *                            The bits you want are specified by setting the corresponding bits in
  903. *                            'flags'.  e.g. if your application wants to wait for bits 0 and 1 then
  904. *                            'flags' would contain 0x03.
  905. *
  906. *              wait_type     specifies whether you want ALL bits to be set/cleared or ANY of the bits
  907. *                            to be set/cleared.
  908. *                            You can specify the following argument:
  909. *
  910. *                            OS_FLAG_WAIT_CLR_ALL   You will check ALL bits in 'mask' to be clear (0)
  911. *                            OS_FLAG_WAIT_CLR_ANY   You will check ANY bit  in 'mask' to be clear (0)
  912. *                            OS_FLAG_WAIT_SET_ALL   You will check ALL bits in 'mask' to be set   (1)
  913. *                            OS_FLAG_WAIT_SET_ANY   You will check ANY bit  in 'mask' to be set   (1)
  914. *
  915. *              timeout       is the desired amount of time that the task will wait for the event flag
  916. *                            bit(s) to be set.
  917. *
  918. * Returns    : none
  919. *
  920. * Called by  : OSFlagPend()  OS_FLAG.C
  921. *
  922. * Note(s)    : This function is INTERNAL to uC/OS-II and your application should not call it.
  923. *********************************************************************************************************
  924. */
  925. static  void  OS_FlagBlock (OS_FLAG_GRP *pgrp, OS_FLAG_NODE *pnode, OS_FLAGS flags, INT8U wait_type, INT16U timeout)
  926. {
  927.     OS_FLAG_NODE  *pnode_next;
  928.     INT8U          y;
  929.     OSTCBCur->OSTCBStat      |= OS_STAT_FLAG;
  930.     OSTCBCur->OSTCBStatPend   = OS_STAT_PEND_OK;
  931.     OSTCBCur->OSTCBDly        = timeout;              /* Store timeout in task's TCB                   */
  932. #if OS_TASK_DEL_EN > 0
  933.     OSTCBCur->OSTCBFlagNode   = pnode;                /* TCB to link to node                           */
  934. #endif
  935.     pnode->OSFlagNodeFlags    = flags;                /* Save the flags that we need to wait for       */
  936.     pnode->OSFlagNodeWaitType = wait_type;            /* Save the type of wait we are doing            */
  937.     pnode->OSFlagNodeTCB      = (void *)OSTCBCur;     /* Link to task's TCB                            */
  938.     pnode->OSFlagNodeNext     = pgrp->OSFlagWaitList; /* Add node at beginning of event flag wait list */
  939.     pnode->OSFlagNodePrev     = (void *)0;
  940.     pnode->OSFlagNodeFlagGrp  = (void *)pgrp;         /* Link to Event Flag Group                      */
  941.     pnode_next                = (OS_FLAG_NODE *)pgrp->OSFlagWaitList;
  942.     if (pnode_next != (void *)0) {                    /* Is this the first NODE to insert?             */
  943.         pnode_next->OSFlagNodePrev = pnode;           /* No, link in doubly linked list                */
  944.     }
  945.     pgrp->OSFlagWaitList = (void *)pnode;
  946.     y            =  OSTCBCur->OSTCBY;                 /* Suspend current task until flag(s) received   */
  947.     OSRdyTbl[y] &= ~OSTCBCur->OSTCBBitX;
  948.     if (OSRdyTbl[y] == 0x00) {
  949.         OSRdyGrp &= ~OSTCBCur->OSTCBBitY;
  950.     }
  951. }
  952. /*$PAGE*/
  953. /*
  954. *********************************************************************************************************
  955. *                                    INITIALIZE THE EVENT FLAG MODULE
  956. *
  957. * Description: This function is called by uC/OS-II to initialize the event flag module.  Your application
  958. *              MUST NOT call this function.  In other words, this function is internal to uC/OS-II.
  959. *
  960. * Arguments  : none
  961. *
  962. * Returns    : none
  963. *
  964. * WARNING    : You MUST NOT call this function from your code.  This is an INTERNAL function to uC/OS-II.
  965. *********************************************************************************************************
  966. */
  967. void  OS_FlagInit (void)
  968. {
  969. #if OS_MAX_FLAGS == 1
  970.     OSFlagFreeList                 = (OS_FLAG_GRP *)&OSFlagTbl[0];  /* Only ONE event flag group!      */
  971.     OSFlagFreeList->OSFlagType     = OS_EVENT_TYPE_UNUSED;
  972.     OSFlagFreeList->OSFlagWaitList = (void *)0;
  973.     OSFlagFreeList->OSFlagFlags    = (OS_FLAGS)0;
  974. #if OS_FLAG_NAME_SIZE > 1
  975.     OSFlagFreeList->OSFlagName[0]  = '?';
  976.     OSFlagFreeList->OSFlagName[1]  = OS_ASCII_NUL;
  977. #endif
  978. #endif
  979. #if OS_MAX_FLAGS >= 2
  980.     INT16U       i;
  981.     OS_FLAG_GRP *pgrp1;
  982.     OS_FLAG_GRP *pgrp2;
  983.     OS_MemClr((INT8U *)&OSFlagTbl[0], sizeof(OSFlagTbl));           /* Clear the flag group table      */
  984.     pgrp1 = &OSFlagTbl[0];
  985.     pgrp2 = &OSFlagTbl[1];
  986.     for (i = 0; i < (OS_MAX_FLAGS - 1); i++) {                      /* Init. list of free EVENT FLAGS  */
  987.         pgrp1->OSFlagType     = OS_EVENT_TYPE_UNUSED;
  988.         pgrp1->OSFlagWaitList = (void *)pgrp2;
  989. #if OS_FLAG_NAME_SIZE > 1
  990.         pgrp1->OSFlagName[0]  = '?';                                /* Unknown name                    */
  991.         pgrp1->OSFlagName[1]  = OS_ASCII_NUL;
  992. #endif
  993.         pgrp1++;
  994.         pgrp2++;
  995.     }
  996.     pgrp1->OSFlagType     = OS_EVENT_TYPE_UNUSED;
  997.     pgrp1->OSFlagWaitList = (void *)0;
  998. #if OS_FLAG_NAME_SIZE > 1
  999.     pgrp1->OSFlagName[0]  = '?';                                    /* Unknown name                    */
  1000.     pgrp1->OSFlagName[1]  = OS_ASCII_NUL;
  1001. #endif
  1002.     OSFlagFreeList        = &OSFlagTbl[0];
  1003. #endif
  1004. }
  1005. /*$PAGE*/
  1006. /*
  1007. *********************************************************************************************************
  1008. *                              MAKE TASK READY-TO-RUN, EVENT(s) OCCURRED
  1009. *
  1010. * Description: This function is internal to uC/OS-II and is used to make a task ready-to-run because the
  1011. *              desired event flag bits have been set.
  1012. *
  1013. * Arguments  : pnode         is a pointer to a structure which contains data about the task waiting for
  1014. *                            event flag bit(s) to be set.
  1015. *
  1016. *              flags_rdy     contains the bit pattern of the event flags that cause the task to become
  1017. *                            ready-to-run.
  1018. *
  1019. * Returns    : OS_TRUE       If the task has been placed in the ready list and thus needs scheduling
  1020. *              OS_FALSE      The task is still not ready to run and thus scheduling is not necessary
  1021. *
  1022. * Called by  : OSFlagsPost() OS_FLAG.C
  1023. *
  1024. * Note(s)    : 1) This function assumes that interrupts are disabled.
  1025. *              2) This function is INTERNAL to uC/OS-II and your application should not call it.
  1026. *********************************************************************************************************
  1027. */
  1028. static  BOOLEAN  OS_FlagTaskRdy (OS_FLAG_NODE *pnode, OS_FLAGS flags_rdy)
  1029. {
  1030.     OS_TCB   *ptcb;
  1031.     BOOLEAN   sched;
  1032.     ptcb                 = (OS_TCB *)pnode->OSFlagNodeTCB; /* Point to TCB of waiting task             */
  1033.     ptcb->OSTCBDly       = 0;
  1034.     ptcb->OSTCBFlagsRdy  = flags_rdy;
  1035.     ptcb->OSTCBStat     &= ~(INT8U)OS_STAT_FLAG;
  1036.     ptcb->OSTCBStatPend  = OS_STAT_PEND_OK;
  1037.     if (ptcb->OSTCBStat == OS_STAT_RDY) {                  /* Task now ready?                          */
  1038.         OSRdyGrp               |= ptcb->OSTCBBitY;         /* Put task into ready list                 */
  1039.         OSRdyTbl[ptcb->OSTCBY] |= ptcb->OSTCBBitX;
  1040.         sched                   = OS_TRUE;
  1041.     } else {
  1042.         sched                   = OS_FALSE;
  1043.     }
  1044.     OS_FlagUnlink(pnode);
  1045.     return (sched);
  1046. }
  1047. /*$PAGE*/
  1048. /*
  1049. *********************************************************************************************************
  1050. *                                  UNLINK EVENT FLAG NODE FROM WAITING LIST
  1051. *
  1052. * Description: This function is internal to uC/OS-II and is used to unlink an event flag node from a
  1053. *              list of tasks waiting for the event flag.
  1054. *
  1055. * Arguments  : pnode         is a pointer to a structure which contains data about the task waiting for
  1056. *                            event flag bit(s) to be set.
  1057. *
  1058. * Returns    : none
  1059. *
  1060. * Called by  : OS_FlagTaskRdy() OS_FLAG.C
  1061. *              OSFlagPend()     OS_FLAG.C
  1062. *              OSTaskDel()      OS_TASK.C
  1063. *
  1064. * Note(s)    : 1) This function assumes that interrupts are disabled.
  1065. *              2) This function is INTERNAL to uC/OS-II and your application should not call it.
  1066. *********************************************************************************************************
  1067. */
  1068. void  OS_FlagUnlink (OS_FLAG_NODE *pnode)
  1069. {
  1070. #if OS_TASK_DEL_EN > 0
  1071.     OS_TCB       *ptcb;
  1072. #endif
  1073.     OS_FLAG_GRP  *pgrp;
  1074.     OS_FLAG_NODE *pnode_prev;
  1075.     OS_FLAG_NODE *pnode_next;
  1076.     pnode_prev = (OS_FLAG_NODE *)pnode->OSFlagNodePrev;
  1077.     pnode_next = (OS_FLAG_NODE *)pnode->OSFlagNodeNext;
  1078.     if (pnode_prev == (OS_FLAG_NODE *)0) {                      /* Is it first node in wait list?      */
  1079.         pgrp                 = (OS_FLAG_GRP *)pnode->OSFlagNodeFlagGrp;
  1080.         pgrp->OSFlagWaitList = (void *)pnode_next;              /*      Update list for new 1st node   */
  1081.         if (pnode_next != (OS_FLAG_NODE *)0) {
  1082.             pnode_next->OSFlagNodePrev = (OS_FLAG_NODE *)0;     /*      Link new 1st node PREV to NULL */
  1083.         }
  1084.     } else {                                                    /* No,  A node somewhere in the list   */
  1085.         pnode_prev->OSFlagNodeNext = pnode_next;                /*      Link around the node to unlink */
  1086.         if (pnode_next != (OS_FLAG_NODE *)0) {                  /*      Was this the LAST node?        */
  1087.             pnode_next->OSFlagNodePrev = pnode_prev;            /*      No, Link around current node   */
  1088.         }
  1089.     }
  1090. #if OS_TASK_DEL_EN > 0
  1091.     ptcb                = (OS_TCB *)pnode->OSFlagNodeTCB;
  1092.     ptcb->OSTCBFlagNode = (OS_FLAG_NODE *)0;
  1093. #endif
  1094. }
  1095. #endif