blob: b93aea8807a752e805b6f877c2ad02952ed31e32 [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 *
oliverschmidt0e144fb2004-08-12 21:52:03 +000032 * $Id: ctk-conio-service.c,v 1.2 2004/08/12 21:52:03 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;
292 /* Clear window contents. */
293 for(i = window->y + 2; i < h; ++i) {
294 if(i >= clipy1 && i < clipy2) {
295 cclearxy(window->x + 1, i, window->w);
296 }
297 }
298}
299/*-----------------------------------------------------------------------------------*/
300static void
301draw_window_contents(struct ctk_window *window, unsigned char focus,
302 unsigned char clipy1, unsigned char clipy2,
303 unsigned char x1, unsigned char x2,
304 unsigned char y1, unsigned char y2)
305{
306 struct ctk_widget *w;
307 unsigned char wfocus;
308
309 /* Draw inactive widgets. */
310 for(w = window->inactive; w != NULL; w = w->next) {
311 draw_widget(w, x1, y1, x2, y2,
312 clipy1, clipy2,
313 focus);
314 }
315
316 /* Draw active widgets. */
317 for(w = window->active; w != NULL; w = w->next) {
318 wfocus = focus;
319 if(w == window->focused) {
320 wfocus |= CTK_FOCUS_WIDGET;
321 }
322
323 draw_widget(w, x1, y1, x2, y2,
324 clipy1, clipy2,
325 wfocus);
326 }
327
328#ifdef CTK_CONIO_CONF_UPDATE
329 CTK_CONIO_CONF_UPDATE();
330#endif /* CTK_CONIO_CONF_UPDATE */
331
332}
333/*-----------------------------------------------------------------------------------*/
334static void
335s_ctk_draw_window(struct ctk_window *window, unsigned char focus,
336 unsigned char clipy1, unsigned char clipy2)
337{
338 unsigned char x, y;
339 unsigned char h;
340 unsigned char x1, y1, x2, y2;
341
342 if(window->y + 1 >= clipy2) {
343 return;
344 }
345
346 x = window->x;
347 y = window->y + 1;
348
349 if(focus & CTK_FOCUS_WINDOW) {
350 textcolor(WINDOWCOLOR_FOCUS);
351 } else {
352 textcolor(WINDOWCOLOR);
353 }
354
355 x1 = x + 1;
356 y1 = y + 1;
357 x2 = x1 + window->w;
358 y2 = y1 + window->h;
359
360 /* Draw window frame. */
361 if(y >= clipy1) {
362 cputcxy(x, y, CH_ULCORNER);
363 gotoxy(wherex() + window->titlelen + 2, wherey());
364 chline(window->w - (wherex() - x) - 2);
365 cputcxy(x2, y, CH_URCORNER);
366 }
367
368 h = window->h;
369
370 if(clipy1 > y1) {
371 if(clipy1 - y1 < h) {
372 h = clipy1 - y1;
373 y1 = clipy1;
374 } else {
375 h = 0;
376 }
377 }
378
379 if(clipy2 < y1 + h) {
380 if(y1 >= clipy2) {
381 h = 0;
382 } else {
383 h = clipy2 - y1;
384 }
385 }
386
387 cvlinexy(x, y1, h);
388 cvlinexy(x2, y1, h);
389
390 if(y + window->h >= clipy1 &&
391 y + window->h < clipy2) {
392 cputcxy(x, y2, CH_LLCORNER);
393 chlinexy(x1, y2, window->w);
394 cputcxy(x2, y2, CH_LRCORNER);
395 }
396
397 draw_window_contents(window, focus & CTK_FOCUS_WINDOW, clipy1, clipy2,
398 x1, x2, y + 1, y2);
399}
400/*-----------------------------------------------------------------------------------*/
401static void
402s_ctk_draw_dialog(struct ctk_window *dialog)
403{
404 unsigned char x, y;
405 unsigned char i;
406 unsigned char x1, y1, x2, y2;
407
408 textcolor(DIALOGCOLOR);
409
410 x = dialog->x;
411 y = dialog->y + 1;
412
413
414 x1 = x + 1;
415 y1 = y + 1;
416 x2 = x1 + dialog->w;
417 y2 = y1 + dialog->h;
418
419
420 /* Draw dialog frame. */
421
422 cvlinexy(x, y1,
423 dialog->h);
424 cvlinexy(x2, y1,
425 dialog->h);
426
427 chlinexy(x1, y,
428 dialog->w);
429 chlinexy(x1, y2,
430 dialog->w);
431
432 cputcxy(x, y, CH_ULCORNER);
433 cputcxy(x, y2, CH_LLCORNER);
434 cputcxy(x2, y, CH_URCORNER);
435 cputcxy(x2, y2, CH_LRCORNER);
436
437
438 /* 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
459draw_menu(struct ctk_menu *m)
460{
461 unsigned char x, x2, y;
462 textcolor(OPENMENUCOLOR);
463 revers(0);
464 x = wherex();
465 cputs(m->title);
466 cputc(' ');
467 x2 = wherex();
468 if(x + CTK_CONF_MENUWIDTH > sizex) {
469 x = sizex - CTK_CONF_MENUWIDTH;
470 }
471
472
473 for(y = 0; y < m->nitems; ++y) {
474 if(y == m->active) {
475 textcolor(ACTIVEMENUITEMCOLOR);
476 revers(0);
477 } else {
478 textcolor(MENUCOLOR);
479 revers(1);
480 }
481 gotoxy(x, y + 1);
482 if(m->items[y].title[0] == '-') {
483 chline(CTK_CONF_MENUWIDTH);
484 } else {
485 cputs(m->items[y].title);
486 }
487 if(x + CTK_CONF_MENUWIDTH > wherex()) {
488 cclear(x + CTK_CONF_MENUWIDTH - wherex());
489 }
490
491 }
492 gotoxy(x2, 0);
493 textcolor(MENUCOLOR);
494 revers(1);
495}
496/*-----------------------------------------------------------------------------------*/
497static void
498s_ctk_draw_menus(struct ctk_menus *menus)
499{
500 struct ctk_menu *m;
501
502 /* Draw menus */
503 textcolor(MENUCOLOR);
504 gotoxy(0, 0);
505 revers(1);
506 cputc(' ');
507 for(m = menus->menus->next; m != NULL; m = m->next) {
508 if(m != menus->open) {
509 cputs(m->title);
510 cputc(' ');
511 } else {
512 draw_menu(m);
513 }
514 }
515
516
517 if(wherex() + strlen(menus->desktopmenu->title) + 1>= sizex) {
518 gotoxy(sizex - strlen(menus->desktopmenu->title) - 1, 0);
519 } else {
520 cclear(sizex - wherex() -
521 strlen(menus->desktopmenu->title) - 1);
522 }
523
524 /* Draw desktopmenu */
525 if(menus->desktopmenu != menus->open) {
526 cputs(menus->desktopmenu->title);
527 cputc(' ');
528 } else {
529 draw_menu(menus->desktopmenu);
530 }
531
532 revers(0);
533}
534/*-----------------------------------------------------------------------------------*/
535static unsigned char
536s_ctk_draw_height(void)
537{
538 return sizey;
539}
540/*-----------------------------------------------------------------------------------*/
541static unsigned char
542s_ctk_draw_width(void)
543{
544 return sizex;
545}
546/*-----------------------------------------------------------------------------------*/
547static unsigned short
548s_ctk_mouse_xtoc(unsigned short x)
549{
550 return x / 8;
551}
552/*-----------------------------------------------------------------------------------*/
553static unsigned short
554s_ctk_mouse_ytoc(unsigned short y)
555{
556 return y / 8;
557}
558/*-----------------------------------------------------------------------------------*/
559static const struct ctk_draw_service_interface interface =
560 {CTK_DRAW_SERVICE_VERSION,
561 1,
562 1,
563 1,
564 s_ctk_draw_init,
565 s_ctk_draw_clear,
566 s_ctk_draw_clear_window,
567 s_ctk_draw_window,
568 s_ctk_draw_dialog,
569 s_ctk_draw_widget,
570 s_ctk_draw_menus,
571 s_ctk_draw_width,
572 s_ctk_draw_height,
573 s_ctk_mouse_xtoc,
574 s_ctk_mouse_ytoc,
575 };
576
577EK_EVENTHANDLER(eventhandler, ev, data);
578EK_PROCESS(proc, CTK_DRAW_SERVICE_NAME ": text", EK_PRIO_NORMAL,
579 eventhandler, NULL, (void *)&interface);
580
581/*--------------------------------------------------------------------------*/
582LOADER_INIT_FUNC(ctk_conio_service_init, arg)
583{
584 ek_service_start(CTK_DRAW_SERVICE_NAME, &proc);
585}
586/*--------------------------------------------------------------------------*/
587EK_EVENTHANDLER(eventhandler, ev, data)
588{
589 EK_EVENTHANDLER_ARGS(ev, data);
590
591 switch(ev) {
592 case EK_EVENT_INIT:
593 case EK_EVENT_REPLACE:
594 ctk_restore();
595 break;
596 case EK_EVENT_REQUEST_REPLACE:
597 ek_replace((struct ek_proc *)data, NULL);
598 LOADER_UNLOAD();
599 break;
600 }
601}
602/*--------------------------------------------------------------------------*/