static Token* stack_prevprev(QUEUE *stack)
{
QUEUE *p = QUEUE_PREV(stack);
p = QUEUE_PREV(p);
queue_item *item = queue_node_data(p);
return &item->item;
}
static int rects_add(int px_min, int py_min, int px_max, int py_max)
{
struct fractal_rect *rect = &rectq.rects[rectq.tail];
if (rectq.head == QUEUE_PREV(rectq.tail)) /* queue is full */
return 1;
rect->px_min = px_min;
rect->py_min = py_min;
rect->px_max = px_max;
rect->py_max = py_max;
rect->valid = 1;
rectq.tail = QUEUE_PREV(rectq.tail);
return 0;
}
void rects_calc_all(int (*calc)(struct fractal_rect *, int (*)(void *), void *),
int (*button_yield_cb)(void *), void *ctx)
{
while (rectq.head != rectq.tail) /* queue is not empty */
{
struct fractal_rect *rect = &rectq.rects[rectq.head];
rectq_print();
if (rect->valid)
{
if (calc(rect, button_yield_cb, ctx))
return; /* interrupted by key-press */
}
rectq.head = QUEUE_PREV(rectq.head); /* dequeue */
}
rects_queue_reset();
}
static void rectq_print(void)
{
unsigned i = rectq.head;
printf("Rects queue:\n");
for (i = rectq.head; i != rectq.tail; i = QUEUE_PREV(i))
{
printf("\tItem %d/%d; idx %d; (%d,%d),(%d,%d),%svalid%s%s\n",
(i - rectq.head + 1) % RECT_QUEUE_LEN,
(rectq.head - rectq.tail) % RECT_QUEUE_LEN,
i,
rectq.rects[(i)].px_min,
rectq.rects[(i)].py_min,
rectq.rects[(i)].px_max,
rectq.rects[(i)].py_max,
(rectq.rects[(i)].valid ? "" : "in"),
((i == rectq.head) ? ",head" : ""),
((i == rectq.tail) ? ",tail" : ""));
}
}
int rects_move_right(void)
{
unsigned i;
/* move current regions right */
for (i = rectq.head; i != rectq.tail; i = QUEUE_PREV((i)))
{
struct fractal_rect *rect = QUEUE_ITEM(i);
rect->px_min += LCD_SHIFT_X;
rect->px_max += LCD_SHIFT_X;
if (rect->px_max > LCD_WIDTH)
rect->px_max = LCD_WIDTH;
if (LCD_WIDTH <= rect->px_min)
rect->valid = 0;
}
/* add left region */
return rects_add(0, 0, LCD_SHIFT_X, LCD_HEIGHT);
}
int rects_move_left(void)
{
unsigned i;
/* move current regions left */
for (i = rectq.head; i != rectq.tail; i = QUEUE_PREV((i)))
{
struct fractal_rect *rect = QUEUE_ITEM(i);
rect->px_min -= LCD_SHIFT_X;
rect->px_max -= LCD_SHIFT_X;
if (rect->px_min < 0)
rect->px_min = 0;
if (rect->px_max < 0)
rect->valid = 0;
}
/* add right region */
return rects_add(LCD_WIDTH - LCD_SHIFT_X, 0, LCD_WIDTH, LCD_HEIGHT);
}
int rects_move_down(void)
{
unsigned i;
/* move current regions down */
for (i = rectq.head; i != rectq.tail; i = QUEUE_PREV((i)))
{
struct fractal_rect *rect = QUEUE_ITEM(i);
rect->py_min += LCD_SHIFT_Y;
rect->py_max += LCD_SHIFT_Y;
if (rect->py_max > LCD_HEIGHT)
rect->py_max = LCD_HEIGHT;
if (LCD_HEIGHT <= rect->py_min)
rect->valid = 0;
}
/* add top region */
return rects_add(0, 0, LCD_WIDTH, LCD_SHIFT_Y);
}
int rects_move_up(void)
{
unsigned i;
/* move current regions up */
for (i = rectq.head; i != rectq.tail; i = QUEUE_PREV((i)))
{
struct fractal_rect *rect = QUEUE_ITEM(i);
rect->py_min -= LCD_SHIFT_Y;
rect->py_max -= LCD_SHIFT_Y;
if (rect->py_min < 0)
rect->py_min = 0;
if (rect->py_max < 0)
rect->valid = 0;
}
/* add bottom region */
return rects_add(0, LCD_HEIGHT - LCD_SHIFT_Y, LCD_WIDTH, LCD_HEIGHT);
}
