1 /* dict_cursor - iterators over dictionnaries */
3 /* Copyright (c) 2004, 2005, 2006, 2007, 2008, 2009, 2010. The SimGrid Team.
4 * All rights reserved. */
6 /* This program is free software; you can redistribute it and/or modify it
7 * under the terms of the license (GNU LGPL) which comes with this package. */
11 #include "dict_private.h"
13 #include <string.h> /* strlen() */
15 XBT_LOG_EXTERNAL_CATEGORY(xbt_dict);
16 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(xbt_dict_cursor, xbt_dict,
17 "To traverse dictionaries");
20 /*####[ Dict cursor functions ]#############################################*/
21 /* To traverse (simple) dicts */
22 /* Don't add or remove entries to the dict while traversing !!! */
23 /*###########################################################################*/
24 struct xbt_dict_cursor_ {
25 xbt_dictelm_t current;
30 #undef xbt_dict_CURSOR_DEBUG
31 /*#define xbt_dict_CURSOR_DEBUG 1*/
34 * @param dict the dict
36 XBT_INLINE xbt_dict_cursor_t xbt_dict_cursor_new(const xbt_dict_t dict)
38 xbt_dict_cursor_t res = NULL;
40 res = xbt_new(s_xbt_dict_cursor_t, 1);
43 xbt_dict_cursor_rewind(res);
50 * @param cursor poor victim
52 XBT_INLINE void xbt_dict_cursor_free(xbt_dict_cursor_t * cursor)
61 * Sanity check to see if the head contains something
63 static XBT_INLINE void __cursor_not_null(xbt_dict_cursor_t cursor)
65 xbt_assert0(cursor, "Null cursor");
69 /** @brief Reinitialize the cursor. Mandatory after removal or add in dict. */
70 XBT_INLINE void xbt_dict_cursor_rewind(xbt_dict_cursor_t cursor)
72 CDEBUG0(xbt_dict_cursor, "xbt_dict_cursor_rewind");
76 if (cursor->dict != NULL) {
77 cursor->current = cursor->dict->table[0];
79 cursor->current = NULL;
84 * @brief Create the cursor if it does not exists. Rewind it in any case.
86 * @param dict on what to let the cursor iterate
87 * @param[out] cursor dest address
89 XBT_INLINE void xbt_dict_cursor_first(const xbt_dict_t dict, xbt_dict_cursor_t * cursor)
91 DEBUG0("xbt_dict_cursor_first");
93 DEBUG0("Create the cursor on first use");
94 *cursor = xbt_dict_cursor_new(dict);
96 xbt_dict_cursor_rewind(*cursor);
98 if (dict != NULL && (*cursor)->current == NULL) {
99 xbt_dict_cursor_step(*cursor); /* find the first element */
105 * \brief Move to the next element.
107 XBT_INLINE void xbt_dict_cursor_step(xbt_dict_cursor_t cursor)
109 xbt_dictelm_t current;
112 DEBUG0("xbt_dict_cursor_step");
115 current = cursor->current;
118 if (cursor->dict != NULL) {
120 if (current != NULL) {
121 DEBUG0("current is not null, take the next element");
122 current = current->next;
123 DEBUG1("next element: %p", current);
126 while (current == NULL && ++line <= cursor->dict->table_size) {
127 DEBUG0("current is NULL, take the next line");
128 current = cursor->dict->table[line];
129 DEBUG1("element in the next line: %p", current);
131 DEBUG2("search finished, current = %p, line = %d", current, line);
133 cursor->current = current;
139 * @brief Get current data, or free the cursor if there is no data left
141 * @returns true if it's ok, false if there is no more data
143 XBT_INLINE int xbt_dict_cursor_get_or_free(xbt_dict_cursor_t * cursor,
144 char **key, void **data)
147 xbt_dictelm_t current;
149 DEBUG0("xbt_dict_get_or_free");
152 if (!cursor || !(*cursor))
155 current = (*cursor)->current;
156 if (current == NULL) { /* no data left */
157 xbt_dict_cursor_free(cursor);
162 *data = current->content;
167 * @brief Get current key
168 * @param cursor: the cursor
169 * @returns the current key
171 XBT_INLINE char *xbt_dict_cursor_get_key(xbt_dict_cursor_t cursor)
173 __cursor_not_null(cursor);
175 return cursor->current->key;
179 * @brief Get current data
180 * @param cursor the cursor
181 * @returns the current data
183 XBT_INLINE void *xbt_dict_cursor_get_data(xbt_dict_cursor_t cursor)
185 __cursor_not_null(cursor);
187 return cursor->current->content;
191 * @brief Set current data
192 * @param cursor the cursor
193 * @param data the new data
194 * @param free_ctn the function to free the new data
196 XBT_INLINE void xbt_dict_cursor_set_data(xbt_dict_cursor_t cursor,
197 void *data, void_f_pvoid_t free_ctn)
199 __cursor_not_null(cursor);
200 if(cursor->current->free_f)
201 cursor->current->free_f(cursor->current->content);
203 cursor->current->content = data;
204 cursor->current->free_f = free_ctn;