blob: af2bccb96654ee2a99305ade72286da93b2c315b [file] [log] [blame]
adamdunkels60612e72004-08-09 20:21:30 +00001/*
2 * Copyright (c) 2002, Adam Dunkels.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above
11 * copyright notice, this list of conditions and the following
12 * disclaimer in the documentation and/or other materials provided
13 * with the distribution.
14 * 3. The name of the author may not be used to endorse or promote
15 * products derived from this software without specific prior
16 * written permission.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
19 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
20 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
22 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
24 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
26 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
27 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
28 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 *
30 * This file is part of the "ctk" console GUI toolkit for cc65
31 *
oliverschmidtadf27db2005-03-15 15:51:17 +000032 * $Id: ctk-conio-service.c,v 1.6 2005/03/15 15:51:17 oliverschmidt Exp $
adamdunkels60612e72004-08-09 20:21:30 +000033 *
34 */
35
36#include <conio.h>
37
38#include "ctk.h"
39#include "ctk-draw.h"
40
41#include "ctk-draw-service.h"
42
43#include "ctk-conio-conf.h"
44#include <string.h>
45
46#ifndef NULL
47#define NULL (void *)0
48#endif /* NULL */
49
50static unsigned char sizex, sizey;
51
52/*unsigned char ctk_draw_windowborder_height = 1;
53unsigned char ctk_draw_windowborder_width = 1;
54unsigned char ctk_draw_windowtitle_height = 1;*/
55
56
57/*-----------------------------------------------------------------------------------*/
58static void
59cputsn(char *str, unsigned char len)
60{
61 char c;
62
63 while(len > 0) {
64 --len;
65 c = *str;
66 if(c == 0) {
67 break;
68 }
69 cputc(c);
70 ++str;
71 }
72}
73/*-----------------------------------------------------------------------------------*/
74static void
75s_ctk_draw_init(void)
76{
77 bgcolor(SCREENCOLOR);
78 bordercolor(BORDERCOLOR);
79 screensize(&sizex, &sizey);
80 ctk_draw_clear(0, sizey);
81}
82/*-----------------------------------------------------------------------------------*/
83static void
84draw_widget(struct ctk_widget *w,
85 unsigned char x, unsigned char y,
86 unsigned char clipx,
87 unsigned char clipy,
88 unsigned char clipy1, unsigned char clipy2,
89 unsigned char focus)
90{
91 unsigned char xpos, ypos, xscroll;
92 unsigned char i, j;
93 char c, *text;
94 unsigned char len, wfocus;
95
96 wfocus = 0;
97 if(focus & CTK_FOCUS_WINDOW) {
98 textcolor(WIDGETCOLOR_FWIN);
99 if(focus & CTK_FOCUS_WIDGET) {
100 textcolor(WIDGETCOLOR_FOCUS);
101 wfocus = 1;
102 }
103 } else if(focus & CTK_FOCUS_DIALOG) {
104 textcolor(WIDGETCOLOR_DIALOG);
105 if(focus & CTK_FOCUS_WIDGET) {
106 textcolor(WIDGETCOLOR_FOCUS);
107 wfocus = 1;
108 }
109 } else {
110 textcolor(WIDGETCOLOR);
111 }
112
113 xpos = x + w->x;
114 ypos = y + w->y;
115
116 switch(w->type) {
117 case CTK_WIDGET_SEPARATOR:
118 if(ypos >= clipy1 && ypos < clipy2) {
119 chlinexy(xpos, ypos, w->w);
120 }
121 break;
122 case CTK_WIDGET_LABEL:
123 text = w->widget.label.text;
124 for(i = 0; i < w->h; ++i) {
125 if(ypos >= clipy1 && ypos < clipy2) {
126 gotoxy(xpos, ypos);
127 cputsn(text, w->w);
128 if(w->w - (wherex() - xpos) > 0) {
129 cclear(w->w - (wherex() - xpos));
130 }
131 }
132 ++ypos;
133 text += w->w;
134 }
135 break;
136 case CTK_WIDGET_BUTTON:
137 if(ypos >= clipy1 && ypos < clipy2) {
138 if(wfocus != 0) {
139 revers(1);
140 } else {
141 revers(0);
142 }
143 cputcxy(xpos, ypos, '[');
144 cputsn(w->widget.button.text, w->w);
145 cputc(']');
146 revers(0);
147 }
148 break;
149 case CTK_WIDGET_HYPERLINK:
150 if(ypos >= clipy1 && ypos < clipy2) {
151 if(wfocus != 0) {
152 revers(0);
153 } else {
154 revers(1);
155 }
156 gotoxy(xpos, ypos);
157 textcolor(WIDGETCOLOR_HLINK);
158 cputsn(w->widget.button.text, w->w);
159 revers(0);
160 }
161 break;
162 case CTK_WIDGET_TEXTENTRY:
163 text = w->widget.textentry.text;
164 if(wfocus != 0) {
165 revers(1);
166 } else {
167 revers(0);
168 }
169 xscroll = 0;
170 if(w->widget.textentry.xpos >= w->w - 1) {
171 xscroll = w->widget.textentry.xpos - w->w + 1;
172 }
173 for(j = 0; j < w->h; ++j) {
174 if(ypos >= clipy1 && ypos < clipy2) {
175 if(w->widget.textentry.state == CTK_TEXTENTRY_EDIT &&
176 w->widget.textentry.ypos == j) {
177 revers(0);
178 cputcxy(xpos, ypos, '>');
179 for(i = 0; i < w->w; ++i) {
180 c = text[i + xscroll];
181 if(i == w->widget.textentry.xpos - xscroll) {
182 revers(1);
183 } else {
184 revers(0);
185 }
186 if(c == 0) {
187 cputc(' ');
188 } else {
189 cputc(c);
190 }
191 revers(0);
192 }
193 cputc('<');
194 } else {
195 cvlinexy(xpos, ypos, 1);
196 gotoxy(xpos + 1, ypos);
197 cputsn(text, w->w);
198 i = wherex();
199 if(i - xpos - 1 < w->w) {
200 cclear(w->w - (i - xpos) + 1);
201 }
202 cvline(1);
203 }
204 }
205 ++ypos;
206 text += w->w;
207 }
208 revers(0);
209 break;
210 case CTK_WIDGET_ICON:
211 if(ypos >= clipy1 && ypos < clipy2) {
212 if(focus & 1) {
213 revers(1);
214 } else {
215 revers(0);
216 }
217 gotoxy(xpos, ypos);
218 if(w->widget.icon.textmap != NULL) {
219 for(i = 0; i < 3; ++i) {
220 gotoxy(xpos, ypos);
221 if(ypos >= clipy1 && ypos < clipy2) {
222 cputc(w->widget.icon.textmap[0 + 3 * i]);
223 cputc(w->widget.icon.textmap[1 + 3 * i]);
224 cputc(w->widget.icon.textmap[2 + 3 * i]);
225 }
226 ++ypos;
227 }
228 }
229 x = xpos;
230
231 len = strlen(w->widget.icon.title);
232 if(x + len >= sizex) {
233 x = sizex - len;
234 }
235
236 gotoxy(x, ypos);
237 if(ypos >= clipy1 && ypos < clipy2) {
238 cputs(w->widget.icon.title);
239 }
240 revers(0);
241 }
242 break;
243
244 default:
245 break;
246 }
247}
248/*-----------------------------------------------------------------------------------*/
249static void
250s_ctk_draw_widget(struct ctk_widget *w,
251 unsigned char focus,
252 unsigned char clipy1,
253 unsigned char clipy2)
254{
255 struct ctk_window *win = w->window;
256 unsigned char posx, posy;
257
258 posx = win->x + 1;
259 posy = win->y + 2;
260
261 if(w == win->focused) {
262 focus |= CTK_FOCUS_WIDGET;
263 }
264
265 draw_widget(w, posx, posy,
266 posx + win->w,
267 posy + win->h,
268 clipy1, clipy2,
269 focus);
270
271#ifdef CTK_CONIO_CONF_UPDATE
272 CTK_CONIO_CONF_UPDATE();
273#endif /* CTK_CONIO_CONF_UPDATE */
274}
275/*-----------------------------------------------------------------------------------*/
276static void
277s_ctk_draw_clear_window(struct ctk_window *window,
278 unsigned char focus,
279 unsigned char clipy1,
280 unsigned char clipy2)
281{
282 unsigned char i;
283 unsigned char h;
284
oliverschmidt0e144fb2004-08-12 21:52:03 +0000285 if(focus & CTK_FOCUS_WINDOW) {
286 textcolor(WINDOWCOLOR_FOCUS);
287 } else {
288 textcolor(WINDOWCOLOR);
289 }
290
adamdunkels60612e72004-08-09 20:21:30 +0000291 h = window->y + 2 + window->h;
oliverschmidt2b1582b2005-03-15 14:19:40 +0000292
adamdunkels60612e72004-08-09 20:21:30 +0000293 /* Clear window contents. */
294 for(i = window->y + 2; i < h; ++i) {
295 if(i >= clipy1 && i < clipy2) {
296 cclearxy(window->x + 1, i, window->w);
297 }
298 }
299}
300/*-----------------------------------------------------------------------------------*/
301static void
302draw_window_contents(struct ctk_window *window, unsigned char focus,
303 unsigned char clipy1, unsigned char clipy2,
304 unsigned char x1, unsigned char x2,
305 unsigned char y1, unsigned char y2)
306{
307 struct ctk_widget *w;
308 unsigned char wfocus;
309
310 /* Draw inactive widgets. */
311 for(w = window->inactive; w != NULL; w = w->next) {
312 draw_widget(w, x1, y1, x2, y2,
313 clipy1, clipy2,
314 focus);
315 }
316
317 /* Draw active widgets. */
318 for(w = window->active; w != NULL; w = w->next) {
319 wfocus = focus;
320 if(w == window->focused) {
321 wfocus |= CTK_FOCUS_WIDGET;
322 }
323
324 draw_widget(w, x1, y1, x2, y2,
325 clipy1, clipy2,
326 wfocus);
327 }
328
329#ifdef CTK_CONIO_CONF_UPDATE
330 CTK_CONIO_CONF_UPDATE();
331#endif /* CTK_CONIO_CONF_UPDATE */
332
333}
334/*-----------------------------------------------------------------------------------*/
335static void
336s_ctk_draw_window(struct ctk_window *window, unsigned char focus,
oliverschmidtadf27db2005-03-15 15:51:17 +0000337 unsigned char clipy1, unsigned char clipy2,
338 unsigned char draw_borders)
adamdunkels60612e72004-08-09 20:21:30 +0000339{
340 unsigned char x, y;
341 unsigned char h;
342 unsigned char x1, y1, x2, y2;
343
344 if(window->y + 1 >= clipy2) {
345 return;
346 }
347
348 x = window->x;
349 y = window->y + 1;
adamdunkels60612e72004-08-09 20:21:30 +0000350 x1 = x + 1;
351 y1 = y + 1;
352 x2 = x1 + window->w;
353 y2 = y1 + window->h;
354
oliverschmidtadf27db2005-03-15 15:51:17 +0000355 if(draw_borders) {
adamdunkels60612e72004-08-09 20:21:30 +0000356
oliverschmidtadf27db2005-03-15 15:51:17 +0000357 /* Draw window frame. */
358 if(focus & CTK_FOCUS_WINDOW) {
359 textcolor(WINDOWCOLOR_FOCUS);
360 } else {
361 textcolor(WINDOWCOLOR);
362 }
363
364 if(y >= clipy1) {
365 cputcxy(x, y, CH_ULCORNER);
366 gotoxy(wherex() + window->titlelen + 2, wherey());
367 chline(window->w - (wherex() - x) - 2);
368 cputcxy(x2, y, CH_URCORNER);
369 }
370
371 h = window->h;
adamdunkels60612e72004-08-09 20:21:30 +0000372
oliverschmidtadf27db2005-03-15 15:51:17 +0000373 if(clipy1 > y1) {
374 if(clipy1 - y1 < h) {
375 h = clipy1 - y1;
376 y1 = clipy1;
377 } else {
378 h = 0;
379 }
adamdunkels60612e72004-08-09 20:21:30 +0000380 }
adamdunkels60612e72004-08-09 20:21:30 +0000381
oliverschmidtadf27db2005-03-15 15:51:17 +0000382 if(clipy2 < y1 + h) {
383 if(y1 >= clipy2) {
384 h = 0;
385 } else {
386 h = clipy2 - y1;
387 }
adamdunkels60612e72004-08-09 20:21:30 +0000388 }
adamdunkels60612e72004-08-09 20:21:30 +0000389
oliverschmidtadf27db2005-03-15 15:51:17 +0000390 cvlinexy(x, y1, h);
391 cvlinexy(x2, y1, h);
adamdunkels60612e72004-08-09 20:21:30 +0000392
oliverschmidtadf27db2005-03-15 15:51:17 +0000393 if(y + window->h >= clipy1 &&
394 y + window->h < clipy2) {
395 cputcxy(x, y2, CH_LLCORNER);
396 chlinexy(x1, y2, window->w);
397 cputcxy(x2, y2, CH_LRCORNER);
398 }
adamdunkels60612e72004-08-09 20:21:30 +0000399 }
400
oliverschmidte99386b2004-12-27 22:03:04 +0000401 draw_window_contents(window, focus, clipy1, clipy2,
adamdunkels60612e72004-08-09 20:21:30 +0000402 x1, x2, y + 1, y2);
403}
404/*-----------------------------------------------------------------------------------*/
405static void
406s_ctk_draw_dialog(struct ctk_window *dialog)
407{
408 unsigned char x, y;
409 unsigned char i;
410 unsigned char x1, y1, x2, y2;
411
412 textcolor(DIALOGCOLOR);
413
414 x = dialog->x;
415 y = dialog->y + 1;
416
adamdunkels60612e72004-08-09 20:21:30 +0000417 x1 = x + 1;
418 y1 = y + 1;
419 x2 = x1 + dialog->w;
420 y2 = y1 + dialog->h;
421
adamdunkels60612e72004-08-09 20:21:30 +0000422 /* Draw dialog frame. */
adamdunkels60612e72004-08-09 20:21:30 +0000423 cvlinexy(x, y1,
424 dialog->h);
425 cvlinexy(x2, y1,
426 dialog->h);
427
428 chlinexy(x1, y,
429 dialog->w);
430 chlinexy(x1, y2,
431 dialog->w);
432
433 cputcxy(x, y, CH_ULCORNER);
434 cputcxy(x, y2, CH_LLCORNER);
435 cputcxy(x2, y, CH_URCORNER);
436 cputcxy(x2, y2, CH_LRCORNER);
437
adamdunkels60612e72004-08-09 20:21:30 +0000438 /* Clear dialog contents. */
439 for(i = y1; i < y2; ++i) {
440 cclearxy(x1, i, dialog->w);
441 }
442
443 draw_window_contents(dialog, CTK_FOCUS_DIALOG, 0, sizey,
444 x1, x2, y1, y2);
445}
446/*-----------------------------------------------------------------------------------*/
447static void
448s_ctk_draw_clear(unsigned char y1, unsigned char y2)
449{
450 unsigned char i;
451
oliverschmidt0e144fb2004-08-12 21:52:03 +0000452 textcolor(BACKGROUNDCOLOR);
adamdunkels60612e72004-08-09 20:21:30 +0000453 for(i = y1; i < y2; ++i) {
454 cclearxy(0, i, sizex);
455 }
456}
457/*-----------------------------------------------------------------------------------*/
458static void
oliverschmidt2b1582b2005-03-15 14:19:40 +0000459draw_menu(struct ctk_menu *m, unsigned char open)
adamdunkels60612e72004-08-09 20:21:30 +0000460{
461 unsigned char x, x2, y;
oliverschmidt2b1582b2005-03-15 14:19:40 +0000462
463 if(open) {
464 x = x2 = wherex();
465 if(x2 + CTK_CONF_MENUWIDTH > sizex) {
466 x2 = sizex - CTK_CONF_MENUWIDTH;
467 }
468
469 for(y = 0; y < m->nitems; ++y) {
470 if(y == m->active) {
471 textcolor(ACTIVEMENUITEMCOLOR);
472 revers(0);
473 } else {
474 textcolor(MENUCOLOR);
475 revers(1);
476 }
477 gotoxy(x2, y + 1);
478 if(m->items[y].title[0] == '-') {
479 chline(CTK_CONF_MENUWIDTH);
480 } else {
481 cputs(m->items[y].title);
482 }
483 if(x2 + CTK_CONF_MENUWIDTH > wherex()) {
484 cclear(x2 + CTK_CONF_MENUWIDTH - wherex());
485 }
486 }
487
488 gotoxy(x, 0);
489 textcolor(OPENMENUCOLOR);
490 revers(0);
491 }
492
adamdunkels60612e72004-08-09 20:21:30 +0000493 cputs(m->title);
494 cputc(' ');
adamdunkels60612e72004-08-09 20:21:30 +0000495 textcolor(MENUCOLOR);
496 revers(1);
497}
498/*-----------------------------------------------------------------------------------*/
499static void
500s_ctk_draw_menus(struct ctk_menus *menus)
501{
oliverschmidt2b1582b2005-03-15 14:19:40 +0000502 struct ctk_menu *m;
adamdunkels60612e72004-08-09 20:21:30 +0000503
504 /* Draw menus */
505 textcolor(MENUCOLOR);
506 gotoxy(0, 0);
507 revers(1);
508 cputc(' ');
509 for(m = menus->menus->next; m != NULL; m = m->next) {
oliverschmidt2b1582b2005-03-15 14:19:40 +0000510 draw_menu(m, m == menus->open);
adamdunkels60612e72004-08-09 20:21:30 +0000511 }
512
oliverschmidt2b1582b2005-03-15 14:19:40 +0000513 /* Draw desktopmenu */
514 if(wherex() + strlen(menus->desktopmenu->title) + 1 >= sizex) {
adamdunkels60612e72004-08-09 20:21:30 +0000515 gotoxy(sizex - strlen(menus->desktopmenu->title) - 1, 0);
516 } else {
517 cclear(sizex - wherex() -
518 strlen(menus->desktopmenu->title) - 1);
519 }
oliverschmidt2b1582b2005-03-15 14:19:40 +0000520 draw_menu(menus->desktopmenu, menus->desktopmenu == menus->open);
adamdunkels60612e72004-08-09 20:21:30 +0000521
522 revers(0);
523}
524/*-----------------------------------------------------------------------------------*/
525static unsigned char
526s_ctk_draw_height(void)
527{
528 return sizey;
529}
530/*-----------------------------------------------------------------------------------*/
531static unsigned char
532s_ctk_draw_width(void)
533{
534 return sizex;
535}
536/*-----------------------------------------------------------------------------------*/
537static unsigned short
538s_ctk_mouse_xtoc(unsigned short x)
539{
540 return x / 8;
541}
542/*-----------------------------------------------------------------------------------*/
543static unsigned short
544s_ctk_mouse_ytoc(unsigned short y)
545{
546 return y / 8;
547}
548/*-----------------------------------------------------------------------------------*/
549static const struct ctk_draw_service_interface interface =
550 {CTK_DRAW_SERVICE_VERSION,
551 1,
552 1,
553 1,
554 s_ctk_draw_init,
555 s_ctk_draw_clear,
556 s_ctk_draw_clear_window,
557 s_ctk_draw_window,
558 s_ctk_draw_dialog,
559 s_ctk_draw_widget,
560 s_ctk_draw_menus,
561 s_ctk_draw_width,
562 s_ctk_draw_height,
563 s_ctk_mouse_xtoc,
564 s_ctk_mouse_ytoc,
565 };
566
567EK_EVENTHANDLER(eventhandler, ev, data);
568EK_PROCESS(proc, CTK_DRAW_SERVICE_NAME ": text", EK_PRIO_NORMAL,
569 eventhandler, NULL, (void *)&interface);
570
571/*--------------------------------------------------------------------------*/
572LOADER_INIT_FUNC(ctk_conio_service_init, arg)
adamdunkels8478bee2004-09-12 17:54:12 +0000573{
574 s_ctk_draw_init();
adamdunkels60612e72004-08-09 20:21:30 +0000575 ek_service_start(CTK_DRAW_SERVICE_NAME, &proc);
576}
577/*--------------------------------------------------------------------------*/
578EK_EVENTHANDLER(eventhandler, ev, data)
579{
580 EK_EVENTHANDLER_ARGS(ev, data);
581
582 switch(ev) {
583 case EK_EVENT_INIT:
584 case EK_EVENT_REPLACE:
adamdunkels8478bee2004-09-12 17:54:12 +0000585 s_ctk_draw_init();
adamdunkels60612e72004-08-09 20:21:30 +0000586 ctk_restore();
587 break;
588 case EK_EVENT_REQUEST_REPLACE:
589 ek_replace((struct ek_proc *)data, NULL);
590 LOADER_UNLOAD();
591 break;
592 }
593}
594/*--------------------------------------------------------------------------*/