2 #include "prio-queue.h"
4 static inline int compare(struct prio_queue *queue, int i, int j)
6 int cmp = queue->compare(queue->array[i].data, queue->array[j].data,
9 cmp = queue->array[i].ctr - queue->array[j].ctr;
13 static inline void swap(struct prio_queue *queue, int i, int j)
15 struct prio_queue_entry tmp = queue->array[i];
16 queue->array[i] = queue->array[j];
17 queue->array[j] = tmp;
20 void prio_queue_reverse(struct prio_queue *queue)
24 if (queue->compare != NULL)
25 die("BUG: prio_queue_reverse() on non-LIFO queue");
26 for (i = 0; i <= (j = (queue->nr - 1) - i); i++)
30 void clear_prio_queue(struct prio_queue *queue)
36 queue->insertion_ctr = 0;
39 void prio_queue_put(struct prio_queue *queue, void *thing)
43 /* Append at the end */
44 ALLOC_GROW(queue->array, queue->nr + 1, queue->alloc);
45 queue->array[queue->nr].ctr = queue->insertion_ctr++;
46 queue->array[queue->nr].data = thing;
51 /* Bubble up the new one */
52 for (ix = queue->nr - 1; ix; ix = parent) {
53 parent = (ix - 1) / 2;
54 if (compare(queue, parent, ix) <= 0)
57 swap(queue, parent, ix);
61 void *prio_queue_get(struct prio_queue *queue)
69 return queue->array[--queue->nr].data; /* LIFO */
71 result = queue->array[0].data;
75 queue->array[0] = queue->array[queue->nr];
77 /* Push down the one at the root */
78 for (ix = 0; ix * 2 + 1 < queue->nr; ix = child) {
79 child = ix * 2 + 1; /* left */
80 if (child + 1 < queue->nr &&
81 compare(queue, child, child + 1) >= 0)
82 child++; /* use right child */
84 if (compare(queue, ix, child) <= 0)
87 swap(queue, child, ix);