]> pd.if.org Git - liblfds/blob - liblfds/liblfds6.0.0/liblfds600/src/lfds600_slist/lfds600_slist_delete.c
Initial import (all versions, including the new 7.1.0)
[liblfds] / liblfds / liblfds6.0.0 / liblfds600 / src / lfds600_slist / lfds600_slist_delete.c
1 #include "lfds600_slist_internal.h"
2
3
4
5
6
7 /****************************************************************************/
8 void lfds600_slist_delete( struct lfds600_slist_state *ss )
9 {
10   lfds600_slist_delete_all_elements( ss );
11
12   lfds600_abstraction_aligned_free( ss );
13
14   return;
15 }
16
17
18
19
20
21 /****************************************************************************/
22 void lfds600_slist_delete_element( struct lfds600_slist_state *ss, struct lfds600_slist_element *se )
23 {
24   LFDS600_ALIGN(LFDS600_ALIGN_DOUBLE_POINTER) void
25     *volatile user_data_and_flags[2],
26     *volatile new_user_data_and_flags[2];
27
28   unsigned char
29     cas_rv = 0;
30
31   assert( ss != NULL );
32   assert( se != NULL );
33
34   user_data_and_flags[LFDS600_SLIST_USER_DATA] = se->user_data_and_flags[LFDS600_SLIST_USER_DATA];
35   user_data_and_flags[LFDS600_SLIST_FLAGS] = se->user_data_and_flags[LFDS600_SLIST_FLAGS];
36
37   do
38   {
39     new_user_data_and_flags[LFDS600_SLIST_USER_DATA] = user_data_and_flags[LFDS600_SLIST_USER_DATA];
40     new_user_data_and_flags[LFDS600_SLIST_FLAGS] = (void *) ((lfds600_atom_t) user_data_and_flags[LFDS600_SLIST_FLAGS] | LFDS600_SLIST_FLAG_DELETED);
41   }
42   while( !((lfds600_atom_t) user_data_and_flags[LFDS600_SLIST_FLAGS] & LFDS600_SLIST_FLAG_DELETED) and 0 == (cas_rv = lfds600_abstraction_dcas((volatile lfds600_atom_t *) se->user_data_and_flags, (lfds600_atom_t *) new_user_data_and_flags, (lfds600_atom_t *) user_data_and_flags)) );
43
44   if( cas_rv == 1 )
45     if( ss->user_data_delete_function != NULL )
46       ss->user_data_delete_function( (void *) user_data_and_flags[LFDS600_SLIST_USER_DATA], ss->user_state );
47
48   return;
49 }
50
51
52
53
54
55 /****************************************************************************/
56 void lfds600_slist_delete_all_elements( struct lfds600_slist_state *ss )
57 {
58   struct lfds600_slist_element
59     *volatile se,
60     *volatile se_temp;
61
62   se = ss->head;
63
64   while( se != NULL )
65   {
66     // TRD : if a non-deleted element and there is a delete function, call the delete function
67     if( ss->user_data_delete_function != NULL )
68       ss->user_data_delete_function( (void *) se->user_data_and_flags[LFDS600_SLIST_USER_DATA], ss->user_state );
69
70     se_temp = se;
71     se = se->next;
72     lfds600_abstraction_aligned_free( (void *) se_temp );
73   }
74
75   lfds600_slist_internal_init_slist( ss, ss->user_data_delete_function, ss->user_state );
76
77   return;
78 }
79