1 // ============================================================================
2 // Artsoft Retro-Game Library
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
7 // http://www.artsoft.org/
8 // ----------------------------------------------------------------------------
10 // ============================================================================
20 /* values for DrawGadget() */
21 #define DG_UNPRESSED 0
27 #define GADGET_DEACTIVATED(g) ((g)->x < 0 || (g)->y < 0)
29 #define OPTION_TEXT_SELECTABLE(g, t) \
30 (t[0] != g->selectbox.char_unselectable && \
33 #define CURRENT_OPTION_SELECTABLE(g) \
34 OPTION_TEXT_SELECTABLE(g, g->selectbox.options[g->selectbox.current_index].text)
37 static struct GadgetInfo *gadget_list_first_entry = NULL;
38 static struct GadgetInfo *gadget_list_last_entry = NULL;
39 static struct GadgetInfo *last_info_gi = NULL;
40 static int next_free_gadget_id = 1;
41 static boolean gadget_id_wrapped = FALSE;
43 static void (*PlayGadgetSoundActivating)(void) = NULL;
44 static void (*PlayGadgetSoundSelecting)(void) = NULL;
47 void InitGadgetsSoundCallback(void (*activating_function)(void),
48 void (*selecting_function)(void))
50 PlayGadgetSoundActivating = activating_function;
51 PlayGadgetSoundSelecting = selecting_function;
54 static struct GadgetInfo *getGadgetInfoFromGadgetID(int id)
56 struct GadgetInfo *gi = gadget_list_first_entry;
58 while (gi && gi->id != id)
64 static int getNewGadgetID()
66 int id = next_free_gadget_id++;
68 if (next_free_gadget_id <= 0) /* counter overrun */
70 gadget_id_wrapped = TRUE; /* now we must check each ID */
71 next_free_gadget_id = 0;
74 if (gadget_id_wrapped)
76 next_free_gadget_id++;
77 while (getGadgetInfoFromGadgetID(next_free_gadget_id) != NULL)
78 next_free_gadget_id++;
81 if (next_free_gadget_id <= 0) /* cannot get new gadget id */
82 Error(ERR_EXIT, "too much gadgets -- this should not happen");
87 static struct GadgetInfo *getGadgetInfoFromMousePosition(int mx, int my,
90 struct GadgetInfo *gi;
92 /* first check for scrollbars in case of mouse scroll wheel button events */
93 if (IS_WHEEL_BUTTON(button))
95 /* real horizontal wheel or vertical wheel with modifier key pressed */
96 boolean check_horizontal = (IS_WHEEL_BUTTON_HORIZONTAL(button) ||
97 GetKeyModState() & KMOD_Shift);
99 /* check for the first active scrollbar directly under the mouse pointer */
100 for (gi = gadget_list_first_entry; gi != NULL; gi = gi->next)
102 if (gi->mapped && gi->active &&
103 (gi->type & GD_TYPE_SCROLLBAR) &&
104 mx >= gi->x && mx < gi->x + gi->width &&
105 my >= gi->y && my < gi->y + gi->height)
109 /* check for the first active scrollbar with matching mouse wheel area */
110 for (gi = gadget_list_first_entry; gi != NULL; gi = gi->next)
112 if (gi->mapped && gi->active &&
113 ((gi->type & GD_TYPE_SCROLLBAR_HORIZONTAL && check_horizontal) ||
114 (gi->type & GD_TYPE_SCROLLBAR_VERTICAL && !check_horizontal)) &&
115 mx >= gi->wheelarea.x && mx < gi->wheelarea.x + gi->wheelarea.width &&
116 my >= gi->wheelarea.y && my < gi->wheelarea.y + gi->wheelarea.height)
120 /* no active scrollbar found -- ignore this scroll wheel button event */
124 /* open selectboxes may overlap other active gadgets, so check them first */
125 for (gi = gadget_list_first_entry; gi != NULL; gi = gi->next)
127 if (gi->mapped && gi->active &&
128 gi->type & GD_TYPE_SELECTBOX && gi->selectbox.open &&
129 mx >= gi->selectbox.x && mx < gi->selectbox.x + gi->selectbox.width &&
130 my >= gi->selectbox.y && my < gi->selectbox.y + gi->selectbox.height)
134 /* check all other gadgets */
135 for (gi = gadget_list_first_entry; gi != NULL; gi = gi->next)
137 if (gi->mapped && gi->active &&
138 mx >= gi->x && mx < gi->x + gi->width &&
139 my >= gi->y && my < gi->y + gi->height)
146 static void setTextAreaCursorExt(struct GadgetInfo *gi, boolean set_cursor_pos)
148 char *text = gi->textarea.value;
149 int area_xsize = gi->textarea.xsize;
150 int area_ysize = gi->textarea.ysize;
151 int cursor_position = gi->textarea.cursor_position;
152 int cursor_x = gi->textarea.cursor_x;
153 int cursor_y = gi->textarea.cursor_y;
160 if (set_cursor_pos) /* x/y => position */
162 if (y == cursor_y && (x == cursor_x || (x < cursor_x && *text == '\n')))
165 else /* position => x/y */
167 if (pos == cursor_position)
171 if (x + 1 >= area_xsize || *text == '\n')
173 if (y + 1 >= area_ysize)
186 gi->textarea.cursor_x = x;
187 gi->textarea.cursor_y = y;
188 gi->textarea.cursor_x_preferred = x;
189 gi->textarea.cursor_position = pos;
192 static void setTextAreaCursorXY(struct GadgetInfo *gi, int x, int y)
194 gi->textarea.cursor_x = x;
195 gi->textarea.cursor_y = y;
197 setTextAreaCursorExt(gi, TRUE);
200 static void setTextAreaCursorPosition(struct GadgetInfo *gi, int pos)
202 gi->textarea.cursor_position = pos;
204 setTextAreaCursorExt(gi, FALSE);
207 static void default_callback_info(void *ptr)
212 static void default_callback_action(void *ptr)
217 static void DrawGadget(struct GadgetInfo *gi, boolean pressed, boolean direct)
219 struct GadgetDesign *gd;
220 int state = (pressed ? GD_BUTTON_PRESSED : GD_BUTTON_UNPRESSED);
221 boolean redraw_selectbox = FALSE;
226 gd = (!gi->active ? &gi->alt_design[state] :
227 gi->checked ? &gi->alt_design[state] : &gi->design[state]);
231 case GD_TYPE_NORMAL_BUTTON:
232 case GD_TYPE_CHECK_BUTTON:
233 case GD_TYPE_RADIO_BUTTON:
235 BlitBitmapOnBackground(gd->bitmap, drawto,
236 gd->x, gd->y, gi->width, gi->height,
239 if (gi->deco.design.bitmap)
241 // make sure that decoration does not overlap gadget border
242 int deco_x = gi->deco.x + (pressed ? gi->deco.xshift : 0);
243 int deco_y = gi->deco.y + (pressed ? gi->deco.yshift : 0);
244 int deco_width = MIN(gi->deco.width, gi->width - deco_x);
245 int deco_height = MIN(gi->deco.height, gi->height - deco_y);
248 BlitBitmapMasked(gi->deco.design.bitmap, drawto,
249 gi->deco.design.x, gi->deco.design.y,
250 deco_width, deco_height,
251 gi->x + deco_x, gi->y + deco_y);
253 BlitBitmap(gi->deco.design.bitmap, drawto,
254 gi->deco.design.x, gi->deco.design.y,
255 deco_width, deco_height,
256 gi->x + deco_x, gi->y + deco_y);
261 case GD_TYPE_TEXT_BUTTON:
264 int font_nr = (gi->active ? gi->font_active : gi->font);
265 int font_width = getFontWidth(font_nr);
266 int border_x = gi->border.xsize;
267 int border_y = gi->border.ysize;
268 int text_size = strlen(gi->textbutton.value);
269 int text_start = (gi->width - text_size * font_width) / 2;
271 /* left part of gadget */
272 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x, gd->y,
273 border_x, gi->height, gi->x, gi->y);
275 /* middle part of gadget */
276 for (i=0; i < gi->textbutton.size; i++)
277 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x + border_x, gd->y,
278 font_width, gi->height,
279 gi->x + border_x + i * font_width, gi->y);
281 /* right part of gadget */
282 BlitBitmapOnBackground(gd->bitmap, drawto,
283 gd->x + gi->border.width - border_x, gd->y,
284 border_x, gi->height,
285 gi->x + gi->width - border_x, gi->y);
287 /* gadget text value */
289 gi->x + text_start + (pressed ? gi->deco.xshift : 0),
290 gi->y + border_y + (pressed ? gi->deco.yshift : 0),
291 gi->textbutton.value, font_nr, BLIT_MASKED);
295 case GD_TYPE_TEXT_INPUT_ALPHANUMERIC:
296 case GD_TYPE_TEXT_INPUT_NUMERIC:
300 char cursor_string[2];
301 char text[MAX_GADGET_TEXTSIZE + 1];
302 int font_nr = (pressed ? gi->font_active : gi->font);
303 int font_width = getFontWidth(font_nr);
304 int border_x = gi->border.xsize;
305 int border_y = gi->border.ysize;
307 /* left part of gadget */
308 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x, gd->y,
309 border_x, gi->height, gi->x, gi->y);
311 /* middle part of gadget */
312 for (i=0; i < gi->textinput.size + 1; i++)
313 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x + border_x, gd->y,
314 font_width, gi->height,
315 gi->x + border_x + i * font_width, gi->y);
317 /* right part of gadget */
318 BlitBitmapOnBackground(gd->bitmap, drawto,
319 gd->x + gi->border.width - border_x, gd->y,
320 border_x, gi->height,
321 gi->x + gi->width - border_x, gi->y);
324 strcpy(text, gi->textinput.value);
327 /* gadget text value */
329 gi->x + border_x, gi->y + border_y, text,
330 font_nr, BLIT_MASKED);
332 cursor_letter = gi->textinput.value[gi->textinput.cursor_position];
333 cursor_string[0] = (cursor_letter != '\0' ? cursor_letter : ' ');
334 cursor_string[1] = '\0';
336 /* draw cursor, if active */
340 gi->textinput.cursor_position * font_width,
341 gi->y + border_y, cursor_string,
342 font_nr, BLIT_INVERSE);
346 case GD_TYPE_TEXT_AREA:
350 char cursor_string[2];
351 int font_nr = (pressed ? gi->font_active : gi->font);
352 int font_width = getFontWidth(font_nr);
353 int font_height = getFontHeight(font_nr);
354 int border_x = gi->border.xsize;
355 int border_y = gi->border.ysize;
356 int gd_height = 2 * border_y + font_height;
358 /* top left part of gadget border */
359 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x, gd->y,
360 border_x, border_y, gi->x, gi->y);
362 /* top middle part of gadget border */
363 for (i=0; i < gi->textarea.xsize; i++)
364 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x + border_x, gd->y,
365 font_width, border_y,
366 gi->x + border_x + i * font_width, gi->y);
368 /* top right part of gadget border */
369 BlitBitmapOnBackground(gd->bitmap, drawto,
370 gd->x + gi->border.width - border_x, gd->y,
372 gi->x + gi->width - border_x, gi->y);
374 /* left and right part of gadget border for each row */
375 for (i=0; i < gi->textarea.ysize; i++)
377 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x, gd->y + border_y,
378 border_x, font_height,
379 gi->x, gi->y + border_y + i * font_height);
380 BlitBitmapOnBackground(gd->bitmap, drawto,
381 gd->x + gi->border.width - border_x,
383 border_x, font_height,
384 gi->x + gi->width - border_x,
385 gi->y + border_y + i * font_height);
388 /* bottom left part of gadget border */
389 BlitBitmapOnBackground(gd->bitmap, drawto,
390 gd->x, gd->y + gd_height - border_y,
392 gi->x, gi->y + gi->height - border_y);
394 /* bottom middle part of gadget border */
395 for (i=0; i < gi->textarea.xsize; i++)
396 BlitBitmapOnBackground(gd->bitmap, drawto,
398 gd->y + gd_height - border_y,
399 font_width, border_y,
400 gi->x + border_x + i * font_width,
401 gi->y + gi->height - border_y);
403 /* bottom right part of gadget border */
404 BlitBitmapOnBackground(gd->bitmap, drawto,
405 gd->x + gi->border.width - border_x,
406 gd->y + gd_height - border_y,
408 gi->x + gi->width - border_x,
409 gi->y + gi->height - border_y);
411 ClearRectangleOnBackground(drawto,
414 gi->width - 2 * border_x,
415 gi->height - 2 * border_y);
417 /* gadget text value */
418 DrawTextBuffer(gi->x + border_x, gi->y + border_y, gi->textarea.value,
419 font_nr, gi->textarea.xsize, -1, gi->textarea.ysize, 0,
420 BLIT_ON_BACKGROUND, FALSE, FALSE, FALSE);
422 cursor_letter = gi->textarea.value[gi->textarea.cursor_position];
423 cursor_string[0] = (cursor_letter != '\0' ? cursor_letter : ' ');
424 cursor_string[1] = '\0';
426 /* draw cursor, if active */
429 gi->x + border_x + gi->textarea.cursor_x * font_width,
430 gi->y + border_y + gi->textarea.cursor_y * font_height,
432 font_nr, BLIT_INVERSE);
436 case GD_TYPE_SELECTBOX:
439 char text[MAX_GADGET_TEXTSIZE + 1];
440 int font_nr_default = (pressed ? gi->font_active : gi->font);
441 int font_nr = font_nr_default;
442 int font_width = getFontWidth(font_nr);
443 int font_height = getFontHeight(font_nr);
444 int border_x = gi->border.xsize;
445 int border_y = gi->border.ysize;
446 int button = gi->border.xsize_selectbutton;
447 int width_inner = gi->border.width - button - 2 * border_x;
448 int box_width = gi->selectbox.width;
449 int box_height = gi->selectbox.height;
451 /* left part of gadget */
452 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x, gd->y,
453 border_x, gi->height, gi->x, gi->y);
455 /* middle part of gadget */
456 for (i=0; i < gi->selectbox.size; i++)
457 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x + border_x, gd->y,
458 font_width, gi->height,
459 gi->x + border_x + i * font_width, gi->y);
461 /* button part of gadget */
462 BlitBitmapOnBackground(gd->bitmap, drawto,
463 gd->x + border_x + width_inner, gd->y,
465 gi->x + gi->width - border_x - button, gi->y);
467 /* right part of gadget */
468 BlitBitmapOnBackground(gd->bitmap, drawto,
469 gd->x + gi->border.width - border_x, gd->y,
470 border_x, gi->height,
471 gi->x + gi->width - border_x, gi->y);
474 strncpy(text, gi->selectbox.options[gi->selectbox.index].text,
476 text[gi->selectbox.size] = '\0';
479 font_nr = (OPTION_TEXT_SELECTABLE(gi, text) ? font_nr_default :
480 gi->font_unselectable);
482 /* gadget text value */
483 DrawTextExt(drawto, gi->x + border_x, gi->y + border_y, text,
484 font_nr, BLIT_MASKED);
488 if (!gi->selectbox.open)
490 gi->selectbox.open = TRUE;
491 gi->selectbox.stay_open = FALSE;
492 gi->selectbox.current_index = gi->selectbox.index;
494 /* save background under selectbox */
495 BlitBitmap(drawto, gfx.field_save_buffer,
496 gi->selectbox.x, gi->selectbox.y,
497 gi->selectbox.width, gi->selectbox.height,
498 gi->selectbox.x, gi->selectbox.y);
501 /* draw open selectbox */
503 /* top left part of gadget border */
504 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x, gd->y,
506 gi->selectbox.x, gi->selectbox.y);
508 /* top middle part of gadget border */
509 for (i=0; i < gi->selectbox.size; i++)
510 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x + border_x, gd->y,
511 font_width, border_y,
512 gi->selectbox.x + border_x + i * font_width,
515 /* top button part of gadget border */
516 BlitBitmapOnBackground(gd->bitmap, drawto,
517 gd->x + border_x + width_inner, gd->y,
519 gi->selectbox.x + box_width -border_x -button,
522 /* top right part of gadget border */
523 BlitBitmapOnBackground(gd->bitmap, drawto,
524 gd->x + gi->border.width - border_x, gd->y,
526 gi->selectbox.x + box_width - border_x,
529 /* left and right part of gadget border for each row */
530 for (i=0; i < gi->selectbox.num_values; i++)
532 BlitBitmapOnBackground(gd->bitmap, drawto, gd->x, gd->y + border_y,
533 border_x, font_height,
535 gi->selectbox.y + border_y + i*font_height);
536 BlitBitmapOnBackground(gd->bitmap, drawto,
537 gd->x + gi->border.width - border_x,
539 border_x, font_height,
540 gi->selectbox.x + box_width - border_x,
541 gi->selectbox.y + border_y + i*font_height);
544 /* bottom left part of gadget border */
545 BlitBitmapOnBackground(gd->bitmap, drawto,
546 gd->x, gd->y + gi->height - border_y,
549 gi->selectbox.y + box_height - border_y);
551 /* bottom middle part of gadget border */
552 for (i=0; i < gi->selectbox.size; i++)
553 BlitBitmapOnBackground(gd->bitmap, drawto,
555 gd->y + gi->height - border_y,
556 font_width, border_y,
557 gi->selectbox.x + border_x + i * font_width,
558 gi->selectbox.y + box_height - border_y);
560 /* bottom button part of gadget border */
561 BlitBitmapOnBackground(gd->bitmap, drawto,
562 gd->x + border_x + width_inner,
563 gd->y + gi->height - border_y,
565 gi->selectbox.x + box_width -border_x -button,
566 gi->selectbox.y + box_height - border_y);
568 /* bottom right part of gadget border */
569 BlitBitmapOnBackground(gd->bitmap, drawto,
570 gd->x + gi->border.width - border_x,
571 gd->y + gi->height - border_y,
573 gi->selectbox.x + box_width - border_x,
574 gi->selectbox.y + box_height - border_y);
576 ClearRectangleOnBackground(drawto,
577 gi->selectbox.x + border_x,
578 gi->selectbox.y + border_y,
579 gi->selectbox.width - 2 * border_x,
580 gi->selectbox.height - 2 * border_y);
582 /* selectbox text values */
583 for (i=0; i < gi->selectbox.num_values; i++)
585 int mask_mode = BLIT_MASKED;
587 strncpy(text, gi->selectbox.options[i].text, gi->selectbox.size);
588 text[gi->selectbox.size] = '\0';
590 font_nr = (OPTION_TEXT_SELECTABLE(gi, text) ? font_nr_default :
591 gi->font_unselectable);
593 if (i == gi->selectbox.current_index &&
594 OPTION_TEXT_SELECTABLE(gi, text))
596 FillRectangle(drawto,
597 gi->selectbox.x + border_x,
598 gi->selectbox.y + border_y + i * font_height,
599 gi->selectbox.width - 2 * border_x, font_height,
600 gi->selectbox.inverse_color);
602 /* prevent use of cursor graphic by drawing at least two chars */
604 text[gi->selectbox.size] = '\0';
606 mask_mode = BLIT_INVERSE;
610 gi->selectbox.x + border_x,
611 gi->selectbox.y + border_y + i * font_height, text,
615 redraw_selectbox = TRUE;
617 else if (gi->selectbox.open)
619 gi->selectbox.open = FALSE;
621 /* restore background under selectbox */
622 BlitBitmap(gfx.field_save_buffer, drawto,
623 gi->selectbox.x, gi->selectbox.y,
624 gi->selectbox.width, gi->selectbox.height,
625 gi->selectbox.x, gi->selectbox.y);
627 /* redraw closed selectbox */
628 DrawGadget(gi, FALSE, FALSE);
630 redraw_selectbox = TRUE;
635 case GD_TYPE_SCROLLBAR_VERTICAL:
639 int ypos = gi->y + gi->scrollbar.position;
640 int design_full = gi->width;
641 int design_body = design_full - 2 * gi->border.ysize;
642 int size_full = gi->scrollbar.size;
643 int size_body = size_full - 2 * gi->border.ysize;
644 int num_steps = size_body / design_body;
645 int step_size_remain = size_body - num_steps * design_body;
647 /* clear scrollbar area */
648 ClearRectangleOnBackground(backbuffer, gi->x, gi->y,
649 gi->width, gi->height);
651 /* upper part of gadget */
652 BlitBitmapOnBackground(gd->bitmap, drawto,
654 gi->width, gi->border.ysize,
657 /* middle part of gadget */
658 for (i=0; i < num_steps; i++)
659 BlitBitmapOnBackground(gd->bitmap, drawto,
660 gd->x, gd->y + gi->border.ysize,
661 gi->width, design_body,
663 ypos + gi->border.ysize + i * design_body);
665 /* remaining middle part of gadget */
666 if (step_size_remain > 0)
667 BlitBitmapOnBackground(gd->bitmap, drawto,
668 gd->x, gd->y + gi->border.ysize,
669 gi->width, step_size_remain,
671 ypos + gi->border.ysize
672 + num_steps * design_body);
674 /* lower part of gadget */
675 BlitBitmapOnBackground(gd->bitmap, drawto,
676 gd->x, gd->y + design_full - gi->border.ysize,
677 gi->width, gi->border.ysize,
678 xpos, ypos + size_full - gi->border.ysize);
682 case GD_TYPE_SCROLLBAR_HORIZONTAL:
685 int xpos = gi->x + gi->scrollbar.position;
687 int design_full = gi->height;
688 int design_body = design_full - 2 * gi->border.xsize;
689 int size_full = gi->scrollbar.size;
690 int size_body = size_full - 2 * gi->border.xsize;
691 int num_steps = size_body / design_body;
692 int step_size_remain = size_body - num_steps * design_body;
694 /* clear scrollbar area */
695 ClearRectangleOnBackground(backbuffer, gi->x, gi->y,
696 gi->width, gi->height);
698 /* left part of gadget */
699 BlitBitmapOnBackground(gd->bitmap, drawto,
701 gi->border.xsize, gi->height,
704 /* middle part of gadget */
705 for (i=0; i < num_steps; i++)
706 BlitBitmapOnBackground(gd->bitmap, drawto,
707 gd->x + gi->border.xsize, gd->y,
708 design_body, gi->height,
709 xpos + gi->border.xsize + i * design_body,
712 /* remaining middle part of gadget */
713 if (step_size_remain > 0)
714 BlitBitmapOnBackground(gd->bitmap, drawto,
715 gd->x + gi->border.xsize, gd->y,
716 step_size_remain, gi->height,
717 xpos + gi->border.xsize
718 + num_steps * design_body,
721 /* right part of gadget */
722 BlitBitmapOnBackground(gd->bitmap, drawto,
723 gd->x + design_full - gi->border.xsize, gd->y,
724 gi->border.xsize, gi->height,
725 xpos + size_full - gi->border.xsize, ypos);
733 // do not use direct gadget drawing anymore; this worked as a speed-up once,
734 // but would slow things down a lot now the screen is always fully redrawn
739 BlitBitmap(drawto, window,
740 gi->x, gi->y, gi->width, gi->height, gi->x, gi->y);
742 if (gi->type == GD_TYPE_SELECTBOX && redraw_selectbox)
743 BlitBitmap(drawto, window,
744 gi->selectbox.x, gi->selectbox.y,
745 gi->selectbox.width, gi->selectbox.height,
746 gi->selectbox.x, gi->selectbox.y);
753 redraw_mask |= (IN_GFX_FIELD_FULL(x, y) ? REDRAW_FIELD :
754 IN_GFX_DOOR_1(x, y) ? REDRAW_DOOR_1 :
755 IN_GFX_DOOR_2(x, y) ? REDRAW_DOOR_2 :
756 IN_GFX_DOOR_3(x, y) ? REDRAW_DOOR_3 : REDRAW_ALL);
760 static int get_minimal_size_for_numeric_input(int minmax_value)
762 int min_size = 1; /* value needs at least one digit */
765 /* add number of digits needed for absolute value */
766 for (i = 10; i <= ABS(minmax_value); i *= 10)
769 /* if min/max value is negative, add one digit for minus sign */
770 if (minmax_value < 0)
776 static void HandleGadgetTags(struct GadgetInfo *gi, int first_tag, va_list ap)
783 while (tag != GDI_END)
788 gi->custom_id = va_arg(ap, int);
791 case GDI_CUSTOM_TYPE_ID:
792 gi->custom_type_id = va_arg(ap, int);
797 int max_textsize = MAX_INFO_TEXTSIZE;
798 char *text = va_arg(ap, char *);
801 strncpy(gi->info_text, text, max_textsize);
805 gi->info_text[max_textsize] = '\0';
810 gi->x = va_arg(ap, int);
814 gi->y = va_arg(ap, int);
818 gi->width = va_arg(ap, int);
822 gi->height = va_arg(ap, int);
826 gi->type = va_arg(ap, unsigned int);
830 gi->state = va_arg(ap, unsigned int);
834 gi->active = (boolean)va_arg(ap, int);
837 case GDI_DIRECT_DRAW:
838 gi->direct_draw = (boolean)va_arg(ap, int);
842 gi->checked = (boolean)va_arg(ap, int);
846 gi->radio_nr = va_arg(ap, unsigned int);
849 case GDI_NUMBER_VALUE:
850 gi->textinput.number_value = va_arg(ap, int);
851 sprintf(gi->textinput.value, "%d", gi->textinput.number_value);
852 strcpy(gi->textinput.last_value, gi->textinput.value);
853 gi->textinput.cursor_position = strlen(gi->textinput.value);
857 gi->textinput.number_min = va_arg(ap, int);
858 if (gi->textinput.number_value < gi->textinput.number_min)
860 gi->textinput.number_value = gi->textinput.number_min;
861 sprintf(gi->textinput.value, "%d", gi->textinput.number_value);
862 strcpy(gi->textinput.last_value, gi->textinput.value);
867 gi->textinput.number_max = va_arg(ap, int);
868 if (gi->textinput.number_value > gi->textinput.number_max)
870 gi->textinput.number_value = gi->textinput.number_max;
871 sprintf(gi->textinput.value, "%d", gi->textinput.number_value);
872 strcpy(gi->textinput.last_value, gi->textinput.value);
878 int max_textsize = MAX_GADGET_TEXTSIZE;
880 if (gi->textinput.size)
881 max_textsize = MIN(gi->textinput.size, MAX_GADGET_TEXTSIZE);
883 strncpy(gi->textinput.value, va_arg(ap, char *), max_textsize);
884 strcpy(gi->textinput.last_value, gi->textinput.value);
886 gi->textinput.value[max_textsize] = '\0';
887 gi->textinput.cursor_position = strlen(gi->textinput.value);
889 /* same tag also used for other gadget definitions */
890 strcpy(gi->textbutton.value, gi->textinput.value);
891 strcpy(gi->textarea.value, gi->textinput.value);
892 strcpy(gi->textarea.last_value, gi->textinput.value);
898 int tag_value = va_arg(ap, int);
899 int max_textsize = MIN(tag_value, MAX_GADGET_TEXTSIZE);
901 gi->textinput.size = max_textsize;
902 gi->textinput.value[max_textsize] = '\0';
903 strcpy(gi->textinput.last_value, gi->textinput.value);
905 /* same tag also used for other gadget definitions */
907 gi->textarea.size = max_textsize;
908 gi->textarea.value[max_textsize] = '\0';
909 strcpy(gi->textarea.last_value, gi->textinput.value);
911 gi->textbutton.size = max_textsize;
912 gi->textbutton.value[max_textsize] = '\0';
914 gi->selectbox.size = gi->textinput.size;
919 gi->font = va_arg(ap, int);
920 if (gi->font_active == 0)
921 gi->font_active = gi->font;
922 if (gi->font_unselectable == 0)
923 gi->font_unselectable = gi->font;
926 case GDI_TEXT_FONT_ACTIVE:
927 gi->font_active = va_arg(ap, int);
930 case GDI_TEXT_FONT_UNSELECTABLE:
931 gi->font_unselectable = va_arg(ap, int);
934 case GDI_SELECTBOX_OPTIONS:
935 gi->selectbox.options = va_arg(ap, struct ValueTextInfo *);
938 case GDI_SELECTBOX_INDEX:
939 gi->selectbox.index = va_arg(ap, int);
942 case GDI_SELECTBOX_CHAR_UNSELECTABLE:
943 gi->selectbox.char_unselectable = (char)va_arg(ap, int);
946 case GDI_DESIGN_UNPRESSED:
947 gi->design[GD_BUTTON_UNPRESSED].bitmap = va_arg(ap, Bitmap *);
948 gi->design[GD_BUTTON_UNPRESSED].x = va_arg(ap, int);
949 gi->design[GD_BUTTON_UNPRESSED].y = va_arg(ap, int);
952 case GDI_DESIGN_PRESSED:
953 gi->design[GD_BUTTON_PRESSED].bitmap = va_arg(ap, Bitmap *);
954 gi->design[GD_BUTTON_PRESSED].x = va_arg(ap, int);
955 gi->design[GD_BUTTON_PRESSED].y = va_arg(ap, int);
958 case GDI_ALT_DESIGN_UNPRESSED:
959 gi->alt_design[GD_BUTTON_UNPRESSED].bitmap= va_arg(ap, Bitmap *);
960 gi->alt_design[GD_BUTTON_UNPRESSED].x = va_arg(ap, int);
961 gi->alt_design[GD_BUTTON_UNPRESSED].y = va_arg(ap, int);
964 case GDI_ALT_DESIGN_PRESSED:
965 gi->alt_design[GD_BUTTON_PRESSED].bitmap = va_arg(ap, Bitmap *);
966 gi->alt_design[GD_BUTTON_PRESSED].x = va_arg(ap, int);
967 gi->alt_design[GD_BUTTON_PRESSED].y = va_arg(ap, int);
970 case GDI_BORDER_SIZE:
971 gi->border.xsize = va_arg(ap, int);
972 gi->border.ysize = va_arg(ap, int);
975 case GDI_BORDER_SIZE_SELECTBUTTON:
976 gi->border.xsize_selectbutton = va_arg(ap, int);
979 case GDI_DESIGN_WIDTH:
980 gi->border.width = va_arg(ap, int);
983 case GDI_DECORATION_DESIGN:
984 gi->deco.design.bitmap = va_arg(ap, Bitmap *);
985 gi->deco.design.x = va_arg(ap, int);
986 gi->deco.design.y = va_arg(ap, int);
989 case GDI_DECORATION_POSITION:
990 gi->deco.x = va_arg(ap, int);
991 gi->deco.y = va_arg(ap, int);
994 case GDI_DECORATION_SIZE:
995 gi->deco.width = va_arg(ap, int);
996 gi->deco.height = va_arg(ap, int);
999 case GDI_DECORATION_SHIFTING:
1000 gi->deco.xshift = va_arg(ap, int);
1001 gi->deco.yshift = va_arg(ap, int);
1004 case GDI_DECORATION_MASKED:
1005 gi->deco.masked = (boolean)va_arg(ap, int);
1008 case GDI_EVENT_MASK:
1009 gi->event_mask = va_arg(ap, unsigned int);
1013 gi->drawing.area_xsize = va_arg(ap, int);
1014 gi->drawing.area_ysize = va_arg(ap, int);
1016 /* determine dependent values for drawing area gadget, if needed */
1017 if (gi->drawing.item_xsize != 0 && gi->drawing.item_ysize != 0)
1019 gi->width = gi->drawing.area_xsize * gi->drawing.item_xsize;
1020 gi->height = gi->drawing.area_ysize * gi->drawing.item_ysize;
1022 else if (gi->width != 0 && gi->height != 0)
1024 gi->drawing.item_xsize = gi->width / gi->drawing.area_xsize;
1025 gi->drawing.item_ysize = gi->height / gi->drawing.area_ysize;
1028 /* same tag also used for other gadget definitions */
1029 gi->textarea.xsize = gi->drawing.area_xsize;
1030 gi->textarea.ysize = gi->drawing.area_ysize;
1032 if (gi->type & GD_TYPE_TEXT_AREA) /* force recalculation */
1041 gi->drawing.item_xsize = va_arg(ap, int);
1042 gi->drawing.item_ysize = va_arg(ap, int);
1044 /* determine dependent values for drawing area gadget, if needed */
1045 if (gi->drawing.area_xsize != 0 && gi->drawing.area_ysize != 0)
1047 gi->width = gi->drawing.area_xsize * gi->drawing.item_xsize;
1048 gi->height = gi->drawing.area_ysize * gi->drawing.item_ysize;
1050 else if (gi->width != 0 && gi->height != 0)
1052 gi->drawing.area_xsize = gi->width / gi->drawing.item_xsize;
1053 gi->drawing.area_ysize = gi->height / gi->drawing.item_ysize;
1057 case GDI_SCROLLBAR_ITEMS_MAX:
1058 gi->scrollbar.items_max = va_arg(ap, int);
1061 case GDI_SCROLLBAR_ITEMS_VISIBLE:
1062 gi->scrollbar.items_visible = va_arg(ap, int);
1065 case GDI_SCROLLBAR_ITEM_POSITION:
1066 gi->scrollbar.item_position = va_arg(ap, int);
1069 case GDI_WHEEL_AREA_X:
1070 gi->wheelarea.x = va_arg(ap, int);
1073 case GDI_WHEEL_AREA_Y:
1074 gi->wheelarea.y = va_arg(ap, int);
1077 case GDI_WHEEL_AREA_WIDTH:
1078 gi->wheelarea.width = va_arg(ap, int);
1081 case GDI_WHEEL_AREA_HEIGHT:
1082 gi->wheelarea.height = va_arg(ap, int);
1085 case GDI_CALLBACK_INFO:
1086 gi->callback_info = va_arg(ap, gadget_function);
1089 case GDI_CALLBACK_ACTION:
1090 gi->callback_action = va_arg(ap, gadget_function);
1094 Error(ERR_EXIT, "HandleGadgetTags(): unknown tag %d", tag);
1097 tag = va_arg(ap, int); /* read next tag */
1100 /* check if gadget is complete */
1101 if (gi->type != GD_TYPE_DRAWING_AREA &&
1102 (!gi->design[GD_BUTTON_UNPRESSED].bitmap ||
1103 !gi->design[GD_BUTTON_PRESSED].bitmap))
1104 Error(ERR_EXIT, "gadget incomplete (missing Bitmap)");
1106 /* adjust gadget values in relation to other gadget values */
1108 if (gi->type & GD_TYPE_TEXT_INPUT)
1110 int font_nr = gi->font_active;
1111 int font_width = getFontWidth(font_nr);
1112 int font_height = getFontHeight(font_nr);
1113 int border_xsize = gi->border.xsize;
1114 int border_ysize = gi->border.ysize;
1116 if (gi->type == GD_TYPE_TEXT_INPUT_NUMERIC)
1118 int number_min = gi->textinput.number_min;
1119 int number_max = gi->textinput.number_max;
1120 int min_size_min = get_minimal_size_for_numeric_input(number_min);
1121 int min_size_max = get_minimal_size_for_numeric_input(number_max);
1122 int min_size = MAX(min_size_min, min_size_max);
1124 /* expand gadget text input size, if maximal value is too large */
1125 if (gi->textinput.size < min_size)
1126 gi->textinput.size = min_size;
1129 gi->width = 2 * border_xsize + (gi->textinput.size + 1) * font_width;
1130 gi->height = 2 * border_ysize + font_height;
1133 if (gi->type & GD_TYPE_SELECTBOX)
1135 int font_nr = gi->font_active;
1136 int font_width = getFontWidth(font_nr);
1137 int font_height = getFontHeight(font_nr);
1138 int border_xsize = gi->border.xsize;
1139 int border_ysize = gi->border.ysize;
1140 int button_size = gi->border.xsize_selectbutton;
1141 int bottom_screen_border = gfx.sy + gfx.sysize - font_height;
1145 gi->width = 2 * border_xsize + gi->textinput.size*font_width +button_size;
1146 gi->height = 2 * border_ysize + font_height;
1148 if (gi->selectbox.options == NULL)
1149 Error(ERR_EXIT, "selectbox gadget incomplete (missing options array)");
1151 gi->selectbox.num_values = 0;
1152 while (gi->selectbox.options[gi->selectbox.num_values].text != NULL)
1153 gi->selectbox.num_values++;
1155 /* calculate values for open selectbox */
1156 gi->selectbox.width = gi->width;
1157 gi->selectbox.height =
1158 2 * border_ysize + gi->selectbox.num_values * font_height;
1160 gi->selectbox.x = gi->x;
1161 gi->selectbox.y = gi->y + gi->height;
1162 if (gi->selectbox.y + gi->selectbox.height > bottom_screen_border)
1163 gi->selectbox.y = gi->y - gi->selectbox.height;
1164 if (gi->selectbox.y < 0)
1165 gi->selectbox.y = bottom_screen_border - gi->selectbox.height;
1167 getFontCharSource(font_nr, FONT_ASCII_CURSOR, &src_bitmap, &src_x, &src_y);
1168 src_x += font_width / 2;
1169 src_y += font_height / 2;
1171 /* there may be esoteric cases with missing or too small font bitmap */
1172 if (src_bitmap != NULL &&
1173 src_x < src_bitmap->width && src_y < src_bitmap->height)
1174 gi->selectbox.inverse_color = GetPixel(src_bitmap, src_x, src_y);
1176 /* always start with closed selectbox */
1177 gi->selectbox.open = FALSE;
1180 if (gi->type & GD_TYPE_TEXT_INPUT_NUMERIC)
1182 struct GadgetTextInput *text = &gi->textinput;
1183 int value = text->number_value;
1185 text->number_value = (value < text->number_min ? text->number_min :
1186 value > text->number_max ? text->number_max :
1189 sprintf(text->value, "%d", text->number_value);
1192 if (gi->type & GD_TYPE_TEXT_BUTTON)
1194 int font_nr = gi->font_active;
1195 int font_width = getFontWidth(font_nr);
1196 int font_height = getFontHeight(font_nr);
1197 int border_xsize = gi->border.xsize;
1198 int border_ysize = gi->border.ysize;
1200 gi->width = 2 * border_xsize + gi->textbutton.size * font_width;
1201 gi->height = 2 * border_ysize + font_height;
1204 if (gi->type & GD_TYPE_SCROLLBAR)
1206 struct GadgetScrollbar *gs = &gi->scrollbar;
1207 int scrollbar_size_cmp;
1209 if (gi->width == 0 || gi->height == 0 ||
1210 gs->items_max == 0 || gs->items_visible == 0)
1211 Error(ERR_EXIT, "scrollbar gadget incomplete (missing tags)");
1213 /* calculate internal scrollbar values */
1214 gs->size_min = (gi->type == GD_TYPE_SCROLLBAR_VERTICAL ?
1215 gi->width : gi->height);
1216 gs->size_max = (gi->type == GD_TYPE_SCROLLBAR_VERTICAL ?
1217 gi->height : gi->width);
1219 scrollbar_size_cmp = gs->size_max * gs->items_visible / gs->items_max;
1220 gs->size = MAX(scrollbar_size_cmp, gs->size_min);
1221 gs->size_max_cmp = (gs->size_max - (gs->size - scrollbar_size_cmp));
1223 gs->position = gs->size_max_cmp * gs->item_position / gs->items_max;
1224 gs->position_max = gs->size_max - gs->size;
1225 gs->correction = gs->size_max / gs->items_max / 2;
1227 /* finetuning for maximal right/bottom position */
1228 if (gs->item_position == gs->items_max - gs->items_visible)
1229 gs->position = gs->position_max;
1232 if (gi->type & GD_TYPE_TEXT_AREA)
1234 int font_nr = gi->font_active;
1235 int font_width = getFontWidth(font_nr);
1236 int font_height = getFontHeight(font_nr);
1237 int border_xsize = gi->border.xsize;
1238 int border_ysize = gi->border.ysize;
1240 if (gi->width == 0 || gi->height == 0)
1242 gi->width = 2 * border_xsize + gi->textarea.xsize * font_width;
1243 gi->height = 2 * border_ysize + gi->textarea.ysize * font_height;
1247 gi->textarea.xsize = (gi->width - 2 * border_xsize) / font_width;
1248 gi->textarea.ysize = (gi->height - 2 * border_ysize) / font_height;
1253 void ModifyGadget(struct GadgetInfo *gi, int first_tag, ...)
1257 va_start(ap, first_tag);
1258 HandleGadgetTags(gi, first_tag, ap);
1264 void RedrawGadget(struct GadgetInfo *gi)
1270 DrawGadget(gi, gi->state, gi->direct_draw);
1273 struct GadgetInfo *CreateGadget(int first_tag, ...)
1275 struct GadgetInfo *new_gadget = checked_calloc(sizeof(struct GadgetInfo));
1278 /* always start with reliable default values */
1279 new_gadget->id = getNewGadgetID();
1280 new_gadget->callback_info = default_callback_info;
1281 new_gadget->callback_action = default_callback_action;
1282 new_gadget->active = TRUE;
1283 new_gadget->direct_draw = TRUE;
1285 new_gadget->next = NULL;
1287 va_start(ap, first_tag);
1288 HandleGadgetTags(new_gadget, first_tag, ap);
1291 /* insert new gadget into global gadget list */
1292 if (gadget_list_last_entry)
1294 gadget_list_last_entry->next = new_gadget;
1295 gadget_list_last_entry = gadget_list_last_entry->next;
1298 gadget_list_first_entry = gadget_list_last_entry = new_gadget;
1303 void FreeGadget(struct GadgetInfo *gi)
1305 struct GadgetInfo *gi_previous = gadget_list_first_entry;
1310 /* prevent "last_info_gi" from pointing to memory that will be freed */
1311 if (last_info_gi == gi)
1312 last_info_gi = NULL;
1314 while (gi_previous != NULL && gi_previous->next != gi)
1315 gi_previous = gi_previous->next;
1317 if (gi == gadget_list_first_entry)
1318 gadget_list_first_entry = gi->next;
1320 if (gi == gadget_list_last_entry)
1321 gadget_list_last_entry = gi_previous;
1323 if (gi_previous != NULL)
1324 gi_previous->next = gi->next;
1329 static void CheckRangeOfNumericInputGadget(struct GadgetInfo *gi)
1331 if (gi->type != GD_TYPE_TEXT_INPUT_NUMERIC)
1334 gi->textinput.number_value = atoi(gi->textinput.value);
1336 if (gi->textinput.number_value < gi->textinput.number_min)
1337 gi->textinput.number_value = gi->textinput.number_min;
1338 if (gi->textinput.number_value > gi->textinput.number_max)
1339 gi->textinput.number_value = gi->textinput.number_max;
1341 sprintf(gi->textinput.value, "%d", gi->textinput.number_value);
1343 if (gi->textinput.cursor_position < 0)
1344 gi->textinput.cursor_position = 0;
1345 else if (gi->textinput.cursor_position > strlen(gi->textinput.value))
1346 gi->textinput.cursor_position = strlen(gi->textinput.value);
1349 /* global pointer to gadget actually in use (when mouse button pressed) */
1350 static struct GadgetInfo *last_gi = NULL;
1352 static void MapGadgetExt(struct GadgetInfo *gi, boolean redraw)
1354 if (gi == NULL || gi->mapped || GADGET_DEACTIVATED(gi))
1360 DrawGadget(gi, DG_UNPRESSED, DG_BUFFERED);
1363 void MapGadget(struct GadgetInfo *gi)
1365 MapGadgetExt(gi, TRUE);
1368 void UnmapGadget(struct GadgetInfo *gi)
1370 if (gi == NULL || !gi->mapped)
1379 #define MAX_NUM_GADGETS 1024
1380 #define MULTIMAP_UNMAP (1 << 0)
1381 #define MULTIMAP_REMAP (1 << 1)
1382 #define MULTIMAP_REDRAW (1 << 2)
1383 #define MULTIMAP_PLAYFIELD (1 << 3)
1384 #define MULTIMAP_DOOR_1 (1 << 4)
1385 #define MULTIMAP_DOOR_2 (1 << 5)
1386 #define MULTIMAP_DOOR_3 (1 << 6)
1387 #define MULTIMAP_ALL (MULTIMAP_PLAYFIELD | \
1392 static void MultiMapGadgets(int mode)
1394 struct GadgetInfo *gi = gadget_list_first_entry;
1395 static boolean map_state[MAX_NUM_GADGETS];
1403 if ((mode & MULTIMAP_PLAYFIELD && IN_GFX_FIELD_FULL(x, y)) ||
1404 (mode & MULTIMAP_DOOR_1 && IN_GFX_DOOR_1(x, y)) ||
1405 (mode & MULTIMAP_DOOR_2 && IN_GFX_DOOR_2(x, y)) ||
1406 (mode & MULTIMAP_DOOR_3 && IN_GFX_DOOR_3(x, y)) ||
1407 (mode & MULTIMAP_ALL) == MULTIMAP_ALL)
1409 if (mode & MULTIMAP_UNMAP)
1411 map_state[map_count++ % MAX_NUM_GADGETS] = gi->mapped;
1416 if (map_state[map_count++ % MAX_NUM_GADGETS])
1417 MapGadgetExt(gi, (mode & MULTIMAP_REDRAW));
1425 void UnmapAllGadgets()
1427 MultiMapGadgets(MULTIMAP_ALL | MULTIMAP_UNMAP);
1430 void RemapAllGadgets()
1432 MultiMapGadgets(MULTIMAP_ALL | MULTIMAP_REMAP);
1435 boolean anyTextInputGadgetActive()
1437 return (last_gi && (last_gi->type & GD_TYPE_TEXT_INPUT) && last_gi->mapped);
1440 boolean anyTextAreaGadgetActive()
1442 return (last_gi && (last_gi->type & GD_TYPE_TEXT_AREA) && last_gi->mapped);
1445 boolean anySelectboxGadgetActive()
1447 return (last_gi && (last_gi->type & GD_TYPE_SELECTBOX) && last_gi->mapped);
1450 boolean anyScrollbarGadgetActive()
1452 return (last_gi && (last_gi->type & GD_TYPE_SCROLLBAR) && last_gi->mapped);
1455 boolean anyTextGadgetActive()
1457 return (anyTextInputGadgetActive() ||
1458 anyTextAreaGadgetActive() ||
1459 anySelectboxGadgetActive());
1462 static boolean insideSelectboxLine(struct GadgetInfo *gi, int mx, int my)
1464 return (gi != NULL &&
1465 gi->type & GD_TYPE_SELECTBOX &&
1466 mx >= gi->x && mx < gi->x + gi->width &&
1467 my >= gi->y && my < gi->y + gi->height);
1470 static boolean insideSelectboxArea(struct GadgetInfo *gi, int mx, int my)
1472 return (gi != NULL &&
1473 gi->type & GD_TYPE_SELECTBOX &&
1474 mx >= gi->selectbox.x && mx < gi->selectbox.x + gi->selectbox.width &&
1475 my >= gi->selectbox.y && my < gi->selectbox.y + gi->selectbox.height);
1478 void ClickOnGadget(struct GadgetInfo *gi, int button)
1483 /* simulate releasing mouse button over last gadget, if still pressed */
1485 HandleGadgets(-1, -1, 0);
1487 /* simulate pressing mouse button over specified gadget */
1488 HandleGadgets(gi->x, gi->y, button);
1490 /* simulate releasing mouse button over specified gadget */
1491 HandleGadgets(gi->x, gi->y, 0);
1494 boolean HandleGadgets(int mx, int my, int button)
1496 static unsigned int pressed_delay = 0;
1497 static unsigned int pressed_delay_value = GADGET_FRAME_DELAY;
1498 static int last_button = 0;
1499 static int last_mx = 0, last_my = 0;
1500 static int pressed_mx = 0, pressed_my = 0;
1501 static boolean keep_selectbox_open = FALSE;
1502 static boolean gadget_stopped = FALSE;
1503 int scrollbar_mouse_pos = 0;
1504 struct GadgetInfo *new_gi, *gi;
1505 boolean press_event;
1506 boolean release_event;
1507 boolean mouse_moving;
1508 boolean mouse_inside_select_line;
1509 boolean mouse_inside_select_area;
1510 boolean mouse_released_where_pressed;
1511 boolean gadget_pressed;
1512 boolean gadget_pressed_repeated;
1513 boolean gadget_pressed_off_borders;
1514 boolean gadget_pressed_inside_select_line;
1515 boolean gadget_pressed_delay_reached;
1516 boolean gadget_moving;
1517 boolean gadget_moving_inside;
1518 boolean gadget_moving_off_borders;
1519 boolean gadget_draggable;
1520 boolean gadget_dragging;
1521 boolean gadget_released;
1522 boolean gadget_released_inside;
1523 boolean gadget_released_inside_select_area;
1524 boolean gadget_released_off_borders;
1525 boolean changed_position = FALSE;
1527 /* check if there are any gadgets defined */
1528 if (gadget_list_first_entry == NULL)
1531 /* simulated release of mouse button over last gadget */
1532 if (mx == -1 && my == -1 && button == 0)
1538 /* check which gadget is under the mouse pointer */
1539 new_gi = getGadgetInfoFromMousePosition(mx, my, button);
1541 /* check if button state has changed since last invocation */
1542 press_event = (button != 0 && last_button == 0);
1543 release_event = (button == 0 && last_button != 0);
1544 last_button = button;
1546 /* check if mouse has been moved since last invocation */
1547 mouse_moving = ((mx != last_mx || my != last_my) && motion_status);
1551 if (press_event && new_gi != last_gi)
1557 mouse_released_where_pressed =
1558 (release_event && mx == pressed_mx && my == pressed_my);
1560 mouse_inside_select_line = insideSelectboxLine(new_gi, mx, my);
1561 mouse_inside_select_area = insideSelectboxArea(new_gi, mx, my);
1563 gadget_pressed_off_borders = (press_event && new_gi != last_gi);
1565 gadget_pressed_inside_select_line =
1566 (press_event && new_gi != NULL &&
1567 new_gi->type & GD_TYPE_SELECTBOX && new_gi->selectbox.open &&
1568 insideSelectboxLine(new_gi, mx, my));
1570 /* if mouse button pressed outside text or selectbox gadget, deactivate it */
1571 if (anyTextGadgetActive() &&
1572 (gadget_pressed_off_borders ||
1573 (gadget_pressed_inside_select_line && !mouse_inside_select_area)))
1575 struct GadgetInfo *gi = last_gi;
1576 boolean gadget_changed = ((gi->event_mask & GD_EVENT_TEXT_LEAVING) != 0);
1578 /* check if text gadget has changed its value */
1579 if (gi->type & GD_TYPE_TEXT_INPUT)
1581 CheckRangeOfNumericInputGadget(gi);
1583 if (!strEqual(gi->textinput.last_value, gi->textinput.value))
1584 strcpy(gi->textinput.last_value, gi->textinput.value);
1586 gadget_changed = FALSE;
1589 /* selectbox does not change its value when closed by clicking outside */
1590 if (gi->type & GD_TYPE_SELECTBOX)
1591 gadget_changed = FALSE;
1593 DrawGadget(gi, DG_UNPRESSED, gi->direct_draw);
1595 gi->event.type = GD_EVENT_TEXT_LEAVING;
1597 if (gadget_changed && !(gi->type & GD_TYPE_SELECTBOX))
1598 gi->callback_action(gi);
1602 if (gadget_pressed_inside_select_line)
1607 (button != 0 && last_gi == NULL && new_gi != NULL && press_event);
1608 gadget_pressed_repeated =
1609 (button != 0 && last_gi != NULL && new_gi == last_gi);
1611 gadget_pressed_delay_reached =
1612 DelayReached(&pressed_delay, pressed_delay_value);
1614 gadget_released = (release_event && last_gi != NULL);
1615 gadget_released_inside = (gadget_released && new_gi == last_gi);
1616 gadget_released_off_borders = (gadget_released && new_gi != last_gi);
1618 gadget_moving = (button != 0 && last_gi != NULL && mouse_moving);
1619 gadget_moving_inside = (gadget_moving && new_gi == last_gi);
1620 gadget_moving_off_borders = (gadget_moving && new_gi != last_gi);
1622 /* when handling selectbox, set additional state values */
1623 if (gadget_released_inside && (last_gi->type & GD_TYPE_SELECTBOX))
1624 gadget_released_inside_select_area = insideSelectboxArea(last_gi, mx, my);
1626 gadget_released_inside_select_area = FALSE;
1628 /* setting state for handling over-large selectbox */
1629 if (keep_selectbox_open && (press_event || !mouse_inside_select_line))
1630 keep_selectbox_open = FALSE;
1632 /* if new gadget pressed, store this gadget */
1636 /* 'gi' is actually handled gadget */
1639 /* if gadget is scrollbar, choose mouse position value */
1640 if (gi && gi->type & GD_TYPE_SCROLLBAR)
1641 scrollbar_mouse_pos =
1642 (gi->type == GD_TYPE_SCROLLBAR_HORIZONTAL ? mx - gi->x : my - gi->y);
1644 /* if mouse button released, no gadget needs to be handled anymore */
1645 if (gadget_released)
1647 if (gi->type & GD_TYPE_SELECTBOX &&
1648 (keep_selectbox_open ||
1649 mouse_released_where_pressed ||
1650 !gadget_released_inside_select_area ||
1651 !CURRENT_OPTION_SELECTABLE(gi))) /* selectbox stays open */
1653 gi->selectbox.stay_open = TRUE;
1657 else if (!(gi->type & GD_TYPE_TEXT_INPUT ||
1658 gi->type & GD_TYPE_TEXT_AREA)) /* text input stays open */
1662 /* modify event position values even if no gadget is pressed */
1663 if (button == 0 && !release_event)
1666 /* if new gadget or if no gadget was pressed, release stopped processing */
1667 if (gadget_pressed || new_gi == NULL)
1668 gadget_stopped = FALSE;
1670 /* if gadget was stopped while being handled, stop gadget processing here */
1676 int last_x = gi->event.x;
1677 int last_y = gi->event.y;
1679 gi->event.x = mx - gi->x;
1680 gi->event.y = my - gi->y;
1682 if (gi->type == GD_TYPE_DRAWING_AREA)
1684 gi->event.x /= gi->drawing.item_xsize;
1685 gi->event.y /= gi->drawing.item_ysize;
1687 if (last_x != gi->event.x || last_y != gi->event.y)
1688 changed_position = TRUE;
1690 else if (gi->type & GD_TYPE_TEXT_INPUT && button != 0 && !motion_status)
1692 int old_cursor_position = gi->textinput.cursor_position;
1694 /* if mouse button pressed inside activated text gadget, set cursor */
1695 gi->textinput.cursor_position =
1696 (mx - gi->x - gi->border.xsize) / getFontWidth(gi->font);
1698 if (gi->textinput.cursor_position < 0)
1699 gi->textinput.cursor_position = 0;
1700 else if (gi->textinput.cursor_position > strlen(gi->textinput.value))
1701 gi->textinput.cursor_position = strlen(gi->textinput.value);
1703 if (gi->textinput.cursor_position != old_cursor_position)
1704 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
1706 else if (gi->type & GD_TYPE_TEXT_AREA && button != 0 && !motion_status)
1708 int old_cursor_position = gi->textarea.cursor_position;
1709 int x = (mx - gi->x - gi->border.xsize) / getFontWidth(gi->font);
1710 int y = (my - gi->y - gi->border.ysize) / getFontHeight(gi->font);
1712 x = (x < 0 ? 0 : x >= gi->textarea.xsize ? gi->textarea.xsize - 1 : x);
1713 y = (y < 0 ? 0 : y >= gi->textarea.ysize ? gi->textarea.ysize - 1 : y);
1715 setTextAreaCursorXY(gi, x, y);
1717 if (gi->textarea.cursor_position != old_cursor_position)
1718 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
1720 else if (gi->type & GD_TYPE_SELECTBOX && gi->selectbox.open &&
1721 !keep_selectbox_open)
1723 int old_index = gi->selectbox.current_index;
1725 /* if mouse moving inside activated selectbox, select value */
1726 if (my >= gi->selectbox.y && my < gi->selectbox.y + gi->selectbox.height)
1727 gi->selectbox.current_index =
1728 (my - gi->selectbox.y - gi->border.ysize) / getFontHeight(gi->font);
1730 if (gi->selectbox.current_index < 0)
1731 gi->selectbox.current_index = 0;
1732 else if (gi->selectbox.current_index > gi->selectbox.num_values - 1)
1733 gi->selectbox.current_index = gi->selectbox.num_values - 1;
1735 if (gi->selectbox.current_index != old_index)
1736 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
1740 /* handle gadget popup info text */
1741 if (last_info_gi != new_gi ||
1742 (new_gi && new_gi->type == GD_TYPE_DRAWING_AREA && changed_position))
1744 if (new_gi != NULL && (button == 0 || new_gi == last_gi))
1746 new_gi->event.type = GD_EVENT_INFO_ENTERING;
1747 new_gi->callback_info(new_gi);
1749 else if (last_info_gi != NULL)
1751 last_info_gi->event.type = GD_EVENT_INFO_LEAVING;
1752 last_info_gi->callback_info(last_info_gi);
1755 last_info_gi = new_gi;
1758 gadget_draggable = (gi && gi->type & GD_TYPE_SCROLLBAR);
1760 /* reset drag position for newly pressed scrollbar to "not dragging" */
1761 if (gadget_pressed && gadget_draggable)
1762 gi->scrollbar.drag_position = -1;
1764 gadget_dragging = (gadget_draggable && gi->scrollbar.drag_position != -1);
1766 /* clicking next to a scrollbar to move it is not considered "moving" */
1767 if (gadget_draggable && !gadget_dragging)
1768 gadget_moving = FALSE;
1770 /* when leaving scrollbar area when jump-scrolling, stop gadget processing */
1771 if (gadget_draggable && !gadget_dragging && gadget_moving_off_borders)
1772 gadget_stopped = TRUE;
1774 if ((gadget_pressed) ||
1775 (gadget_pressed_repeated && gadget_pressed_delay_reached))
1777 if (gadget_pressed) /* gadget pressed the first time */
1779 /* initialize delay counter */
1780 DelayReached(&pressed_delay, 0);
1782 /* start gadget delay with longer delay after first click on gadget */
1783 pressed_delay_value = GADGET_FRAME_DELAY_FIRST;
1785 else /* gadget hold pressed for some time */
1787 /* after first repeated gadget click, continue with shorter delay value */
1788 pressed_delay_value = GADGET_FRAME_DELAY;
1791 if (gi->type & GD_TYPE_SCROLLBAR && !gadget_dragging)
1793 int mpos = (gi->type == GD_TYPE_SCROLLBAR_HORIZONTAL ? mx : my);
1794 int gpos = (gi->type == GD_TYPE_SCROLLBAR_HORIZONTAL ? gi->x : gi->y);
1795 int slider_start = gpos + gi->scrollbar.position;
1796 int slider_end = gpos + gi->scrollbar.position + gi->scrollbar.size - 1;
1797 boolean inside_slider = (mpos >= slider_start && mpos <= slider_end);
1799 if (IS_WHEEL_BUTTON(button) || !inside_slider)
1801 /* click scrollbar one scrollbar length up/left or down/right */
1803 struct GadgetScrollbar *gs = &gi->scrollbar;
1804 int old_item_position = gs->item_position;
1805 int item_steps = gs->items_visible - 1;
1806 int item_direction = (mpos < gpos + gi->scrollbar.position ? -1 : +1);
1808 if (IS_WHEEL_BUTTON(button))
1810 boolean scroll_single_step = ((GetKeyModState() & KMOD_Alt) != 0);
1812 item_steps = (scroll_single_step ? 1 : wheel_steps);
1813 item_direction = (button == MB_WHEEL_UP ||
1814 button == MB_WHEEL_LEFT ? -1 : +1);
1817 changed_position = FALSE;
1819 gs->item_position += item_steps * item_direction;
1821 if (gs->item_position < 0)
1822 gs->item_position = 0;
1823 else if (gs->item_position > gs->items_max - gs->items_visible)
1824 gs->item_position = gs->items_max - gs->items_visible;
1826 if (old_item_position != gs->item_position)
1828 gi->event.item_position = gs->item_position;
1829 changed_position = TRUE;
1832 ModifyGadget(gi, GDI_SCROLLBAR_ITEM_POSITION, gs->item_position,
1835 gi->state = GD_BUTTON_UNPRESSED;
1836 gi->event.type = GD_EVENT_MOVING;
1837 gi->event.off_borders = FALSE;
1839 if (gi->event_mask & GD_EVENT_MOVING && changed_position)
1840 gi->callback_action(gi);
1846 /* don't handle this scrollbar anymore when mouse position reached */
1847 if (gadget_pressed_repeated)
1849 gadget_stopped = TRUE;
1859 PlayGadgetSoundActivating();
1861 if (gi->type == GD_TYPE_CHECK_BUTTON)
1863 gi->checked = !gi->checked;
1865 else if (gi->type == GD_TYPE_RADIO_BUTTON)
1867 struct GadgetInfo *rgi = gadget_list_first_entry;
1872 rgi->type == GD_TYPE_RADIO_BUTTON &&
1873 rgi->radio_nr == gi->radio_nr &&
1876 rgi->checked = FALSE;
1877 DrawGadget(rgi, DG_UNPRESSED, rgi->direct_draw);
1885 else if (gi->type & GD_TYPE_SCROLLBAR)
1887 int mpos = (gi->type == GD_TYPE_SCROLLBAR_HORIZONTAL ? mx : my);
1888 int gpos = (gi->type == GD_TYPE_SCROLLBAR_HORIZONTAL ? gi->x : gi->y);
1889 int slider_start = gpos + gi->scrollbar.position;
1890 int slider_end = gpos + gi->scrollbar.position + gi->scrollbar.size - 1;
1891 boolean inside_slider = (mpos >= slider_start && mpos <= slider_end);
1893 if (!IS_WHEEL_BUTTON(button) && inside_slider)
1895 /* start dragging scrollbar */
1896 gi->scrollbar.drag_position =
1897 scrollbar_mouse_pos - gi->scrollbar.position;
1900 else if (gi->type & GD_TYPE_SELECTBOX)
1902 /* keep selectbox open in case of over-large selectbox */
1903 keep_selectbox_open = (mouse_inside_select_line &&
1904 mouse_inside_select_area);
1907 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
1909 gi->state = GD_BUTTON_PRESSED;
1910 gi->event.type = GD_EVENT_PRESSED;
1911 gi->event.button = button;
1912 gi->event.off_borders = FALSE;
1914 if (gi->event_mask & GD_EVENT_PRESSED)
1915 gi->callback_action(gi);
1918 if (gadget_pressed_repeated)
1920 gi->event.type = GD_EVENT_PRESSED;
1922 if (gi->event_mask & GD_EVENT_REPEATED && gadget_pressed_delay_reached)
1923 gi->callback_action(gi);
1928 if (gi->type & GD_TYPE_BUTTON)
1930 if (gadget_moving_inside && gi->state == GD_BUTTON_UNPRESSED)
1931 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
1932 else if (gadget_moving_off_borders && gi->state == GD_BUTTON_PRESSED)
1933 DrawGadget(gi, DG_UNPRESSED, gi->direct_draw);
1935 else if (gi->type & GD_TYPE_SELECTBOX && !keep_selectbox_open)
1937 int old_index = gi->selectbox.current_index;
1939 /* if mouse moving inside activated selectbox, select value */
1940 if (my >= gi->selectbox.y && my < gi->selectbox.y + gi->selectbox.height)
1941 gi->selectbox.current_index =
1942 (my - gi->selectbox.y - gi->border.ysize) / getFontHeight(gi->font);
1944 if (gi->selectbox.current_index < 0)
1945 gi->selectbox.current_index = 0;
1946 else if (gi->selectbox.current_index > gi->selectbox.num_values - 1)
1947 gi->selectbox.current_index = gi->selectbox.num_values - 1;
1949 if (gi->selectbox.current_index != old_index)
1950 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
1952 else if (gi->type & GD_TYPE_SCROLLBAR)
1954 struct GadgetScrollbar *gs = &gi->scrollbar;
1955 int old_item_position = gs->item_position;
1957 gs->position = scrollbar_mouse_pos - gs->drag_position;
1959 /* make sure to always precisely reach end positions when dragging */
1960 if (gs->position <= 0)
1963 gs->item_position = 0;
1965 else if (gs->position >= gs->position_max)
1967 gs->position = gs->position_max;
1968 gs->item_position = gs->items_max - gs->items_visible;
1973 gs->items_max * (gs->position + gs->correction) / gs->size_max_cmp;
1976 if (gs->item_position < 0)
1977 gs->item_position = 0;
1978 if (gs->item_position > gs->items_max - 1)
1979 gs->item_position = gs->items_max - 1;
1981 if (old_item_position != gs->item_position)
1983 gi->event.item_position = gs->item_position;
1984 changed_position = TRUE;
1987 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
1990 gi->state = (gadget_moving_inside || gadget_draggable ?
1991 GD_BUTTON_PRESSED : GD_BUTTON_UNPRESSED);
1992 gi->event.type = GD_EVENT_MOVING;
1993 gi->event.off_borders = gadget_moving_off_borders;
1995 if (gi->event_mask & GD_EVENT_MOVING && changed_position &&
1996 (gadget_moving_inside || gi->event_mask & GD_EVENT_OFF_BORDERS))
1997 gi->callback_action(gi);
2000 if (gadget_released_inside)
2002 boolean deactivate_gadget = TRUE;
2003 boolean gadget_changed = TRUE;
2005 if (gi->type & GD_TYPE_SELECTBOX)
2007 if (keep_selectbox_open ||
2008 mouse_released_where_pressed ||
2009 !gadget_released_inside_select_area ||
2010 !CURRENT_OPTION_SELECTABLE(gi)) /* selectbox stays open */
2012 deactivate_gadget = FALSE;
2013 gadget_changed = FALSE;
2015 else if (gi->selectbox.index != gi->selectbox.current_index)
2016 gi->selectbox.index = gi->selectbox.current_index;
2018 gadget_changed = FALSE;
2021 if (deactivate_gadget &&
2022 !(gi->type & GD_TYPE_TEXT_INPUT ||
2023 gi->type & GD_TYPE_TEXT_AREA)) /* text input stays open */
2024 DrawGadget(gi, DG_UNPRESSED, gi->direct_draw);
2026 gi->state = GD_BUTTON_UNPRESSED;
2027 gi->event.type = GD_EVENT_RELEASED;
2029 if ((gi->event_mask & GD_EVENT_RELEASED) && gadget_changed)
2031 gi->callback_action(gi);
2035 if (gadget_released_off_borders)
2037 if (gi->type & GD_TYPE_SCROLLBAR)
2038 DrawGadget(gi, DG_UNPRESSED, gi->direct_draw);
2040 gi->state = GD_BUTTON_UNPRESSED;
2041 gi->event.type = GD_EVENT_RELEASED;
2043 if (gi->event_mask & GD_EVENT_RELEASED &&
2044 gi->event_mask & GD_EVENT_OFF_BORDERS)
2045 gi->callback_action(gi);
2048 /* handle gadgets unmapped/mapped between pressing and releasing */
2049 if (release_event && !gadget_released && new_gi)
2050 new_gi->state = GD_BUTTON_UNPRESSED;
2052 return (gadget_pressed || gadget_pressed_repeated ||
2053 gadget_released || gadget_moving);
2056 static void insertCharIntoTextArea(struct GadgetInfo *gi, char c)
2058 char text[MAX_GADGET_TEXTSIZE + 1];
2059 int cursor_position = gi->textarea.cursor_position;
2061 if (strlen(gi->textarea.value) >= MAX_GADGET_TEXTSIZE) /* no space left */
2064 strcpy(text, gi->textarea.value);
2065 strcpy(&gi->textarea.value[cursor_position + 1], &text[cursor_position]);
2066 gi->textarea.value[cursor_position] = c;
2068 setTextAreaCursorPosition(gi, gi->textarea.cursor_position + 1);
2071 boolean HandleGadgetsKeyInput(Key key)
2073 struct GadgetInfo *gi = last_gi;
2075 if (gi == NULL || !gi->mapped ||
2076 !(gi->type & GD_TYPE_TEXT_INPUT ||
2077 gi->type & GD_TYPE_TEXT_AREA ||
2078 gi->type & GD_TYPE_SELECTBOX))
2081 if (key == KSYM_Return) /* valid for both text input and selectbox */
2083 boolean gadget_changed = ((gi->event_mask & GD_EVENT_TEXT_RETURN) != 0);
2085 if (gi->type & GD_TYPE_TEXT_INPUT)
2087 CheckRangeOfNumericInputGadget(gi);
2089 if (!strEqual(gi->textinput.last_value, gi->textinput.value))
2090 strcpy(gi->textinput.last_value, gi->textinput.value);
2092 gadget_changed = FALSE;
2094 else if (gi->type & GD_TYPE_SELECTBOX)
2096 if (gi->selectbox.index != gi->selectbox.current_index)
2097 gi->selectbox.index = gi->selectbox.current_index;
2099 gadget_changed = FALSE;
2102 if (gi->type & GD_TYPE_TEXT_AREA)
2104 insertCharIntoTextArea(gi, '\n');
2106 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2110 DrawGadget(gi, DG_UNPRESSED, gi->direct_draw);
2112 gi->event.type = GD_EVENT_TEXT_RETURN;
2118 gi->callback_action(gi);
2120 else if (gi->type & GD_TYPE_TEXT_INPUT) /* only valid for text input */
2122 char text[MAX_GADGET_TEXTSIZE + 1];
2123 int text_length = strlen(gi->textinput.value);
2124 int cursor_pos = gi->textinput.cursor_position;
2125 char letter = getCharFromKey(key);
2126 boolean legal_letter = (gi->type == GD_TYPE_TEXT_INPUT_NUMERIC ?
2127 letter >= '0' && letter <= '9' :
2130 if (legal_letter && text_length < gi->textinput.size)
2132 strcpy(text, gi->textinput.value);
2133 strcpy(&gi->textinput.value[cursor_pos + 1], &text[cursor_pos]);
2134 gi->textinput.value[cursor_pos] = letter;
2135 gi->textinput.cursor_position++;
2137 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2139 else if (key == KSYM_Left && cursor_pos > 0)
2141 gi->textinput.cursor_position--;
2143 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2145 else if (key == KSYM_Right && cursor_pos < text_length)
2147 gi->textinput.cursor_position++;
2149 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2151 else if (key == KSYM_BackSpace && cursor_pos > 0)
2153 strcpy(text, gi->textinput.value);
2154 strcpy(&gi->textinput.value[cursor_pos - 1], &text[cursor_pos]);
2155 gi->textinput.cursor_position--;
2157 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2159 else if (key == KSYM_Delete && cursor_pos < text_length)
2161 strcpy(text, gi->textinput.value);
2162 strcpy(&gi->textinput.value[cursor_pos], &text[cursor_pos + 1]);
2164 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2167 else if (gi->type & GD_TYPE_TEXT_AREA) /* only valid for text area */
2169 char text[MAX_GADGET_TEXTSIZE + 1];
2170 int text_length = strlen(gi->textarea.value);
2171 int area_ysize = gi->textarea.ysize;
2172 int cursor_x_pref = gi->textarea.cursor_x_preferred;
2173 int cursor_y = gi->textarea.cursor_y;
2174 int cursor_pos = gi->textarea.cursor_position;
2175 char letter = getCharFromKey(key);
2176 boolean legal_letter = (letter != 0);
2180 insertCharIntoTextArea(gi, letter);
2182 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2184 else if (key == KSYM_Left && cursor_pos > 0)
2186 setTextAreaCursorPosition(gi, gi->textarea.cursor_position - 1);
2188 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2190 else if (key == KSYM_Right && cursor_pos < text_length)
2192 setTextAreaCursorPosition(gi, gi->textarea.cursor_position + 1);
2194 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2196 else if (key == KSYM_Up && cursor_y > 0)
2198 setTextAreaCursorXY(gi, cursor_x_pref, cursor_y - 1);
2199 gi->textarea.cursor_x_preferred = cursor_x_pref;
2201 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2203 else if (key == KSYM_Down && cursor_y < area_ysize - 1)
2205 setTextAreaCursorXY(gi, cursor_x_pref, cursor_y + 1);
2206 gi->textarea.cursor_x_preferred = cursor_x_pref;
2208 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2210 else if (key == KSYM_BackSpace && cursor_pos > 0)
2212 strcpy(text, gi->textarea.value);
2213 strcpy(&gi->textarea.value[cursor_pos - 1], &text[cursor_pos]);
2215 setTextAreaCursorPosition(gi, gi->textarea.cursor_position - 1);
2217 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2219 else if (key == KSYM_Delete && cursor_pos < text_length)
2221 strcpy(text, gi->textarea.value);
2222 strcpy(&gi->textarea.value[cursor_pos], &text[cursor_pos + 1]);
2224 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2227 else if (gi->type & GD_TYPE_SELECTBOX) /* only valid for selectbox */
2229 int index = gi->selectbox.current_index;
2230 int num_values = gi->selectbox.num_values;
2232 if (key == KSYM_Up && index > 0)
2234 gi->selectbox.current_index--;
2236 DrawGadget(gi, DG_PRESSED, gi->direct_draw);
2238 else if (key == KSYM_Down && index < num_values - 1)
2240 gi->selectbox.current_index++;
2242 DrawGadget(gi, DG_PRESSED, gi->direct_draw);