]> pd.if.org Git - liblfds/blob - liblfds/liblfds6.0.1/liblfds601/src/lfds601_freelist/lfds601_freelist_query.c
Initial import (all versions, including the new 7.1.0)
[liblfds] / liblfds / liblfds6.0.1 / liblfds601 / src / lfds601_freelist / lfds601_freelist_query.c
1 #include "lfds601_freelist_internal.h"\r
2 \r
3 \r
4 \r
5 \r
6 \r
7 /****************************************************************************/\r
8 void lfds601_freelist_query( struct lfds601_freelist_state *fs, enum lfds601_freelist_query_type query_type, void *query_input, void *query_output )\r
9 {\r
10   assert( fs != NULL );\r
11   // TRD : query type can be any value in its range\r
12   // TRD : query_input can be NULL in some cases\r
13   assert( query_output != NULL );\r
14 \r
15   switch( query_type )\r
16   {\r
17     case LFDS601_FREELIST_QUERY_ELEMENT_COUNT:\r
18       assert( query_input == NULL );\r
19 \r
20       *(lfds601_atom_t *) query_output = fs->element_count;\r
21     break;\r
22 \r
23     case LFDS601_FREELIST_QUERY_VALIDATE:\r
24       // TRD : query_input can be NULL\r
25 \r
26       lfds601_freelist_internal_validate( fs, (struct lfds601_validation_info *) query_input, (enum lfds601_data_structure_validity *) query_output );\r
27     break;\r
28   }\r
29 \r
30   return;\r
31 }\r
32 \r
33 \r
34 \r
35 \r
36 \r
37 /****************************************************************************/\r
38 void lfds601_freelist_internal_validate( struct lfds601_freelist_state *fs, struct lfds601_validation_info *vi, enum lfds601_data_structure_validity *lfds601_freelist_validity )\r
39 {\r
40   struct lfds601_freelist_element\r
41     *fe,\r
42     *fe_slow,\r
43     *fe_fast;\r
44 \r
45   lfds601_atom_t\r
46     element_count = 0;\r
47 \r
48   assert( fs != NULL );\r
49   // TRD : vi can be NULL\r
50   assert( lfds601_freelist_validity != NULL );\r
51 \r
52   *lfds601_freelist_validity = LFDS601_VALIDITY_VALID;\r
53 \r
54   fe_slow = fe_fast = (struct lfds601_freelist_element *) fs->top[LFDS601_FREELIST_POINTER];\r
55 \r
56   /* TRD : first, check for a loop\r
57            we have two pointers\r
58            both of which start at the top of the lfds601_freelist\r
59            we enter a loop\r
60            and on each iteration\r
61            we advance one pointer by one element\r
62            and the other by two\r
63 \r
64            we exit the loop when both pointers are NULL\r
65            (have reached the end of the lfds601_freelist)\r
66 \r
67            or\r
68 \r
69            if we fast pointer 'sees' the slow pointer\r
70            which means we have a loop\r
71   */\r
72 \r
73   if( fe_slow != NULL )\r
74     do\r
75     {\r
76       fe_slow = fe_slow->next[LFDS601_FREELIST_POINTER];\r
77 \r
78       if( fe_fast != NULL )\r
79         fe_fast = fe_fast->next[LFDS601_FREELIST_POINTER];\r
80 \r
81       if( fe_fast != NULL )\r
82         fe_fast = fe_fast->next[LFDS601_FREELIST_POINTER];\r
83     }\r
84     while( fe_slow != NULL and fe_fast != fe_slow );\r
85 \r
86   if( fe_fast != NULL and fe_slow != NULL and fe_fast == fe_slow )\r
87     *lfds601_freelist_validity = LFDS601_VALIDITY_INVALID_LOOP;\r
88 \r
89   /* TRD : now check for expected number of elements\r
90            vi can be NULL, in which case we do not check\r
91            we know we don't have a loop from our earlier check\r
92   */\r
93 \r
94   if( *lfds601_freelist_validity == LFDS601_VALIDITY_VALID and vi != NULL )\r
95   {\r
96     fe = (struct lfds601_freelist_element *) fs->top[LFDS601_FREELIST_POINTER];\r
97 \r
98     while( fe != NULL )\r
99     {\r
100       element_count++;\r
101       fe = (struct lfds601_freelist_element *) fe->next[LFDS601_FREELIST_POINTER];\r
102     }\r
103 \r
104     if( element_count < vi->min_elements )\r
105       *lfds601_freelist_validity = LFDS601_VALIDITY_INVALID_MISSING_ELEMENTS;\r
106 \r
107     if( element_count > vi->max_elements )\r
108       *lfds601_freelist_validity = LFDS601_VALIDITY_INVALID_ADDITIONAL_ELEMENTS;\r
109   }\r
110 \r
111   return;\r
112 }\r
113 \r