pd.if.org Git - liblfds/blob - liblfds/liblfds6.0.1/liblfds601/src/lfds601_slist/lfds601_slist_get_and_set.c

   1 #include "lfds601_slist_internal.h"\r
   2 \r
   3 \r
   4 \r
   5 \r
   6 \r
   7 /****************************************************************************/\r
   8 int lfds601_slist_get_user_data_from_element( struct lfds601_slist_element *se, void **user_data )\r
   9 {\r
  10   int\r
  11     rv = 1;\r
  12 \r
  13   assert( se != NULL );\r
  14   assert( user_data != NULL );\r
  15 \r
  16   *user_data = (void *) se->user_data_and_flags[LFDS601_SLIST_USER_DATA];\r
  17 \r
  18   if( (lfds601_atom_t) se->user_data_and_flags[LFDS601_SLIST_FLAGS] & LFDS601_SLIST_FLAG_DELETED )\r
  19     rv = 0;\r
  20 \r
  21   return( rv );\r
  22 }\r
  23 \r
  24 \r
  25 \r
  26 \r
  27 \r
  28 /****************************************************************************/\r
  29 int lfds601_slist_set_user_data_in_element( struct lfds601_slist_element *se, void *user_data )\r
  30 {\r
  31   LFDS601_ALIGN(LFDS601_ALIGN_DOUBLE_POINTER) volatile void\r
  32     *user_data_and_flags[2],\r
  33     *new_user_data_and_flags[2];\r
  34 \r
  35   int\r
  36     rv = 1;\r
  37 \r
  38   assert( se != NULL );\r
  39   // TRD : user_data can be NULL\r
  40 \r
  41   user_data_and_flags[LFDS601_SLIST_USER_DATA] = se->user_data_and_flags[LFDS601_SLIST_USER_DATA];\r
  42   user_data_and_flags[LFDS601_SLIST_FLAGS] = se->user_data_and_flags[LFDS601_SLIST_FLAGS];\r
  43 \r
  44   new_user_data_and_flags[LFDS601_SLIST_USER_DATA] = user_data;\r
  45 \r
  46   do\r
  47   {\r
  48     new_user_data_and_flags[LFDS601_SLIST_FLAGS] = user_data_and_flags[LFDS601_SLIST_FLAGS];\r
  49   }\r
  50   while( !((lfds601_atom_t) user_data_and_flags[LFDS601_SLIST_FLAGS] & LFDS601_SLIST_FLAG_DELETED) and 0 == lfds601_abstraction_dcas((volatile lfds601_atom_t *) se->user_data_and_flags, (lfds601_atom_t *) new_user_data_and_flags, (lfds601_atom_t *) user_data_and_flags) );\r
  51 \r
  52   if( (lfds601_atom_t) user_data_and_flags[LFDS601_SLIST_FLAGS] & LFDS601_SLIST_FLAG_DELETED )\r
  53     rv = 0;\r
  54 \r
  55   return( rv );\r
  56 }\r
  57 \r
  58 \r
  59 \r
  60 \r
  61 \r
  62 /****************************************************************************/\r
  63 struct lfds601_slist_element *lfds601_slist_get_head( struct lfds601_slist_state *ss, struct lfds601_slist_element **se )\r
  64 {\r
  65   assert( ss != NULL );\r
  66   assert( se != NULL );\r
  67 \r
  68   *se = (struct lfds601_slist_element *) ss->head;\r
  69 \r
  70   lfds601_slist_internal_move_to_first_undeleted_element( se );\r
  71 \r
  72   return( *se );\r
  73 }\r
  74 \r
  75 \r
  76 \r
  77 \r
  78 \r
  79 /****************************************************************************/\r
  80 struct lfds601_slist_element *lfds601_slist_get_next( struct lfds601_slist_element *se, struct lfds601_slist_element **next_se )\r
  81 {\r
  82   assert( se != NULL );\r
  83   assert( next_se != NULL );\r
  84 \r
  85   *next_se = (struct lfds601_slist_element *) se->next;\r
  86 \r
  87   lfds601_slist_internal_move_to_first_undeleted_element( next_se );\r
  88 \r
  89   return( *next_se );\r
  90 }\r
  91 \r
  92 \r
  93 \r
  94 \r
  95 \r
  96 /****************************************************************************/\r
  97 struct lfds601_slist_element *lfds601_slist_get_head_and_then_next( struct lfds601_slist_state *ss, struct lfds601_slist_element **se )\r
  98 {\r
  99   assert( ss != NULL );\r
 100   assert( se != NULL );\r
 101 \r
 102   if( *se == NULL )\r
 103     lfds601_slist_get_head( ss, se );\r
 104   else\r
 105     lfds601_slist_get_next( *se, se );\r
 106 \r
 107   return( *se );\r
 108 }\r
 109 \r
 110 \r
 111 \r
 112 \r
 113 \r
 114 /****************************************************************************/\r
 115 void lfds601_slist_internal_move_to_first_undeleted_element( struct lfds601_slist_element **se )\r
 116 {\r
 117   assert( se != NULL );\r
 118 \r
 119   while( *se != NULL and (lfds601_atom_t) (*se)->user_data_and_flags[LFDS601_SLIST_FLAGS] & LFDS601_SLIST_FLAG_DELETED )\r
 120     (*se) = (struct lfds601_slist_element *) (*se)->next;\r
 121 \r
 122   return;\r
 123 }\r
 124 \r