source: libcaca/trunk/examples/demo.c @ 2101

Last change on this file since 2101 was 2101, checked in by Sam Hocevar, 12 years ago
  • Rename "test" to "examples". The former will become a real testsuite.
  • Autodetect zzuf in the configure step. It might become handy.
  • Property svn:keywords set to Id
File size: 16.5 KB
Line 
1/*
2 *  demo          demo for libcaca
3 *  Copyright (c) 2003 Sam Hocevar <sam@zoy.org>
4 *                All Rights Reserved
5 *
6 *  $Id: demo.c 2101 2007-11-30 23:48:39Z sam $
7 *
8 *  This program is free software. It comes without any warranty, to
9 *  the extent permitted by applicable law. You can redistribute it
10 *  and/or modify it under the terms of the Do What The Fuck You Want
11 *  To Public License, Version 2, as published by Sam Hocevar. See
12 *  http://sam.zoy.org/wtfpl/COPYING for more details.
13 */
14
15#include "config.h"
16#include "common.h"
17#if !defined(__KERNEL__)
18#   include <math.h>
19#   include <string.h>
20#   include <stdio.h>
21#endif
22#include "caca.h"
23
24static void display_menu(void);
25
26static void demo_all(void);
27
28static void demo_dots(void);
29static void demo_lines(void);
30static void demo_boxes(void);
31static void demo_ellipses(void);
32static void demo_triangles(void);
33/*static void demo_sprites(void);*/
34static void demo_render(void);
35
36int bounds = 0;
37int outline = 0;
38int dithering = 0;
39#if 0
40cucul_sprite_t *sprite = NULL;
41#endif
42
43cucul_canvas_t *cv;
44caca_display_t *dp;
45
46int main(int argc, char **argv)
47{
48    void (*demo)(void) = NULL;
49    int quit = 0;
50
51    cv = cucul_create_canvas(80, 24);
52    if(cv == NULL)
53    {
54        printf("Failed to create canvas\n");
55        return 1;
56    }
57
58    dp = caca_create_display(cv);
59    if(dp == NULL)
60    {
61        printf("Failed to create display\n");
62        return 1;
63    }
64
65    caca_set_display_time(dp, 40000);
66
67    /* Initialize data */
68#if 0
69    sprite = cucul_load_sprite(DATADIR "/caca.txt");
70    if(!sprite)
71        sprite = cucul_load_sprite("caca.txt");
72    if(!sprite)
73        sprite = cucul_load_sprite("examples/caca.txt");
74#endif
75
76    /* Disable cursor */
77    caca_set_mouse(dp, 0);
78
79    /* Main menu */
80    display_menu();
81    caca_refresh_display(dp);
82
83    /* Go ! */
84    while(!quit)
85    {
86        caca_event_t ev;
87        int menu = 0, mouse = 0, xmouse = 0, ymouse = 0;
88
89        while(caca_get_event(dp, CACA_EVENT_ANY, &ev, 0))
90        {
91            if(demo && (caca_get_event_type(&ev) & CACA_EVENT_KEY_PRESS))
92            {
93                menu = 1;
94                demo = NULL;
95            }
96            else if(caca_get_event_type(&ev) & CACA_EVENT_KEY_PRESS)
97            {
98                switch(caca_get_event_key_ch(&ev))
99                {
100                case 'q':
101                case 'Q':
102                case CACA_KEY_ESCAPE:
103                    demo = NULL;
104                    quit = 1;
105                    break;
106                case 'o':
107                case 'O':
108                    outline = (outline + 1) % 3;
109                    display_menu();
110                    break;
111                case 'b':
112                case 'B':
113                    bounds = (bounds + 1) % 2;
114                    display_menu();
115                    break;
116#if 0
117                case 'd':
118                case 'D':
119                    dithering = (dithering + 1) % 5;
120                    cucul_set_feature(cv, dithering);
121                    display_menu();
122                    break;
123#endif
124                case 'f':
125                case 'F':
126                    demo = demo_all;
127                    break;
128                case '1':
129                    demo = demo_dots;
130                    break;
131                case '2':
132                    demo = demo_lines;
133                    break;
134                case '3':
135                    demo = demo_boxes;
136                    break;
137                case '4':
138                    demo = demo_triangles;
139                    break;
140                case '5':
141                    demo = demo_ellipses;
142                    break;
143#if 0
144                case 's':
145                case 'S':
146                    if(sprite)
147                        demo = demo_sprites;
148                    break;
149#endif
150                case 'r':
151                case 'R':
152                    demo = demo_render;
153                    break;
154                }
155
156                if(demo)
157                {
158                    cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
159                    cucul_clear_canvas(cv);
160                }
161            }
162            else if(caca_get_event_type(&ev) & CACA_EVENT_MOUSE_MOTION)
163            {
164                mouse = 1;
165                xmouse = caca_get_event_mouse_x(&ev);
166                ymouse = caca_get_event_mouse_y(&ev);
167            }
168            else if(caca_get_event_type(&ev) & CACA_EVENT_RESIZE)
169            {
170                mouse = 1; /* old hack */
171            }
172        }
173
174        if(menu || (mouse && !demo))
175        {
176            display_menu();
177            if(mouse && !demo)
178            {
179                cucul_set_color_ansi(cv, CUCUL_RED, CUCUL_BLACK);
180                cucul_put_str(cv, xmouse, ymouse,     ".");
181                cucul_put_str(cv, xmouse, ymouse + 1, "|\\");
182            }
183            caca_refresh_display(dp);
184            mouse = menu = 0;
185        }
186
187        if(demo)
188        {
189            demo();
190
191            cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
192            cucul_draw_thin_box(cv, 1, 1, cucul_get_canvas_width(cv) - 2,
193                                          cucul_get_canvas_height(cv) - 2);
194            cucul_printf(cv, 4, 1, "[%i.%i fps]----",
195                         1000000 / caca_get_display_time(dp),
196                         (10000000 / caca_get_display_time(dp)) % 10);
197            caca_refresh_display(dp);
198        }
199    }
200
201    /* Clean up */
202#if 0
203    cucul_free_sprite(sprite);
204#endif
205    caca_free_display(dp);
206    cucul_free_canvas(cv);
207
208    return 0;
209}
210
211static void display_menu(void)
212{
213    int xo = cucul_get_canvas_width(cv) - 2;
214    int yo = cucul_get_canvas_height(cv) - 2;
215
216    cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
217    cucul_clear_canvas(cv);
218    cucul_draw_thin_box(cv, 1, 1, xo, yo);
219
220    cucul_put_str(cv, (xo - strlen("libcaca demo")) / 2, 3, "libcaca demo");
221    cucul_put_str(cv, (xo - strlen("==============")) / 2, 4, "==============");
222
223    cucul_put_str(cv, 4, 6, "demos:");
224    cucul_put_str(cv, 4, 7, "'f': full");
225    cucul_put_str(cv, 4, 8, "'1': dots");
226    cucul_put_str(cv, 4, 9, "'2': lines");
227    cucul_put_str(cv, 4, 10, "'3': boxes");
228    cucul_put_str(cv, 4, 11, "'4': triangles");
229    cucul_put_str(cv, 4, 12, "'5': ellipses");
230    cucul_put_str(cv, 4, 13, "'c': colour");
231    cucul_put_str(cv, 4, 14, "'r': render");
232#if 0
233    if(sprite)
234        cucul_put_str(cv, 4, 15, "'s': sprites");
235#endif
236
237    cucul_put_str(cv, 4, 16, "settings:");
238    cucul_printf(cv, 4, 17, "'o': outline: %s",
239                 outline == 0 ? "none" : outline == 1 ? "solid" : "thin");
240    cucul_printf(cv, 4, 18, "'b': drawing boundaries: %s",
241                 bounds == 0 ? "screen" : "infinite");
242    //cucul_printf(cv, 4, 19, "'d': dithering (%s)",
243    //             cucul_get_feature_name(dithering));
244
245    cucul_put_str(cv, 4, yo - 2, "'q': quit");
246
247    caca_refresh_display(dp);
248}
249
250static void demo_all(void)
251{
252    static int i = 0;
253
254    int j, xo, yo, xa, ya, xb, yb, xc, yc;
255
256    i++;
257
258    cucul_set_color_ansi(cv, CUCUL_LIGHTGRAY, CUCUL_BLACK);
259    cucul_clear_canvas(cv);
260
261    /* Draw the sun */
262    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
263    xo = cucul_get_canvas_width(cv) / 4;
264    yo = cucul_get_canvas_height(cv) / 4 + 5 * sin(0.03*i);
265
266    for(j = 0; j < 16; j++)
267    {
268        xa = xo - (30 + sin(0.03*i) * 8) * sin(0.03*i + M_PI*j/8);
269        ya = yo + (15 + sin(0.03*i) * 4) * cos(0.03*i + M_PI*j/8);
270        cucul_draw_thin_line(cv, xo, yo, xa, ya);
271    }
272
273    j = 15 + sin(0.03*i) * 8;
274    cucul_set_color_ansi(cv, CUCUL_WHITE, CUCUL_BLACK);
275    cucul_fill_ellipse(cv, xo, yo, j, j / 2, '#');
276    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
277    cucul_draw_ellipse(cv, xo, yo, j, j / 2, '#');
278
279    /* Draw the pyramid */
280    xo = cucul_get_canvas_width(cv) * 5 / 8;
281    yo = 2;
282
283    xa = cucul_get_canvas_width(cv) / 8 + sin(0.03*i) * 5;
284    ya = cucul_get_canvas_height(cv) / 2 + cos(0.03*i) * 5;
285
286    xb = cucul_get_canvas_width(cv) - 10 - cos(0.02*i) * 10;
287    yb = cucul_get_canvas_height(cv) * 3 / 4 - 5 + sin(0.02*i) * 5;
288
289    xc = cucul_get_canvas_width(cv) / 4 - sin(0.02*i) * 5;
290    yc = cucul_get_canvas_height(cv) * 3 / 4 + cos(0.02*i) * 5;
291
292    cucul_set_color_ansi(cv, CUCUL_GREEN, CUCUL_BLACK);
293    cucul_fill_triangle(cv, xo, yo, xb, yb, xa, ya, '%');
294    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
295    cucul_draw_thin_triangle(cv, xo, yo, xb, yb, xa, ya);
296
297    cucul_set_color_ansi(cv, CUCUL_RED, CUCUL_BLACK);
298    cucul_fill_triangle(cv, xa, ya, xb, yb, xc, yc, '#');
299    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
300    cucul_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);
301
302    cucul_set_color_ansi(cv, CUCUL_BLUE, CUCUL_BLACK);
303    cucul_fill_triangle(cv, xo, yo, xb, yb, xc, yc, '%');
304    cucul_set_color_ansi(cv, CUCUL_YELLOW, CUCUL_BLACK);
305    cucul_draw_thin_triangle(cv, xo, yo, xb, yb, xc, yc);
306
307    /* Draw a background triangle */
308    xa = 2;
309    ya = 2;
310
311    xb = cucul_get_canvas_width(cv) - 3;
312    yb = cucul_get_canvas_height(cv) / 2;
313
314    xc = cucul_get_canvas_width(cv) / 3;
315    yc = cucul_get_canvas_height(cv) - 3;
316
317    cucul_set_color_ansi(cv, CUCUL_CYAN, CUCUL_BLACK);
318    cucul_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);
319
320    xo = cucul_get_canvas_width(cv) / 2 + cos(0.027*i) * cucul_get_canvas_width(cv) / 3;
321    yo = cucul_get_canvas_height(cv) / 2 - sin(0.027*i) * cucul_get_canvas_height(cv) / 2;
322
323    cucul_draw_thin_line(cv, xa, ya, xo, yo);
324    cucul_draw_thin_line(cv, xb, yb, xo, yo);
325    cucul_draw_thin_line(cv, xc, yc, xo, yo);
326
327    /* Draw a sprite on the pyramid */
328#if 0
329    cucul_draw_sprite(cv, xo, yo, sprite, 0);
330#endif
331
332    /* Draw a trail behind the foreground sprite */
333    for(j = i - 60; j < i; j++)
334    {
335        int delta = cucul_rand(-5, 6);
336        cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
337        cucul_put_char(cv, cucul_get_canvas_width(cv) / 2
338                    + cos(0.02*j) * (delta + cucul_get_canvas_width(cv) / 4),
339                   cucul_get_canvas_height(cv) / 2
340                    + sin(0.02*j) * (delta + cucul_get_canvas_height(cv) / 3),
341                   '#');
342    }
343
344    /* Draw foreground sprite */
345#if 0
346    cucul_draw_sprite(cv, cucul_get_canvas_width(cv) / 2 + cos(0.02*i) * cucul_get_canvas_width(cv) / 4,
347                   cucul_get_canvas_height(cv) / 2 + sin(0.02*i) * cucul_get_canvas_height(cv) / 3,
348                   sprite, 0);
349#endif
350}
351
352static void demo_dots(void)
353{
354    int xmax = cucul_get_canvas_width(cv);
355    int ymax = cucul_get_canvas_height(cv);
356    int i;
357    static char chars[10] =
358    {
359        '+', '-', '*', '#', 'X', '@', '%', '$', 'M', 'W'
360    };
361
362    for(i = 1000; i--;)
363    {
364        /* Putpixel */
365        cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
366        cucul_put_char(cv, cucul_rand(0, xmax), cucul_rand(0, ymax),
367                      chars[cucul_rand(0, 9)]);
368    }
369}
370
371static void demo_lines(void)
372{
373    int w = cucul_get_canvas_width(cv);
374    int h = cucul_get_canvas_height(cv);
375    int xa, ya, xb, yb;
376
377    if(bounds)
378    {
379        xa = cucul_rand(- w, 2 * w); ya = cucul_rand(- h, 2 * h);
380        xb = cucul_rand(- w, 2 * w); yb = cucul_rand(- h, 2 * h);
381    }
382    else
383    {
384        xa = cucul_rand(0, w); ya = cucul_rand(0, h);
385        xb = cucul_rand(0, w); yb = cucul_rand(0, h);
386    }
387
388    cucul_set_color_ansi(cv, cucul_rand(0, 16), CUCUL_BLACK);
389    if(outline > 1)
390        cucul_draw_thin_line(cv, xa, ya, xb, yb);
391    else
392        cucul_draw_line(cv, xa, ya, xb, yb, '#');
393}
394
395static void demo_boxes(void)
396{
397    int w = cucul_get_canvas_width(cv);
398    int h = cucul_get_canvas_height(cv);
399    int xa, ya, xb, yb;
400
401    if(bounds)
402    {
403        xa = cucul_rand(- w, 2 * w); ya = cucul_rand(- h, 2 * h);
404        xb = cucul_rand(- w, 2 * w); yb = cucul_rand(- h, 2 * h);
405    }
406    else
407    {
408        xa = cucul_rand(0, w); ya = cucul_rand(0, h);
409        xb = cucul_rand(0, w); yb = cucul_rand(0, h);
410    }
411
412    cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
413    cucul_fill_box(cv, xa, ya, xb, yb, '#');
414
415    cucul_set_color_ansi(cv, cucul_rand(0, 16), CUCUL_BLACK);
416    if(outline == 2)
417        cucul_draw_thin_box(cv, xa, ya, xb, yb);
418    else if(outline == 1)
419        cucul_draw_box(cv, xa, ya, xb, yb, '#');
420}
421
422static void demo_ellipses(void)
423{
424    int w = cucul_get_canvas_width(cv);
425    int h = cucul_get_canvas_height(cv);
426    int x, y, a, b;
427
428    if(bounds)
429    {
430        x = cucul_rand(- w, 2 * w); y = cucul_rand(- h, 2 * h);
431        a = cucul_rand(0, w); b = cucul_rand(0, h);
432    }
433    else
434    {
435        do
436        {
437            x = cucul_rand(0, w); y = cucul_rand(0, h);
438            a = cucul_rand(0, w); b = cucul_rand(0, h);
439
440        } while(x - a < 0 || x + a >= w || y - b < 0 || y + b >= h);
441    }
442
443    cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
444    cucul_fill_ellipse(cv, x, y, a, b, '#');
445
446    cucul_set_color_ansi(cv, cucul_rand(0, 16), CUCUL_BLACK);
447    if(outline == 2)
448        cucul_draw_thin_ellipse(cv, x, y, a, b);
449    else if(outline == 1)
450        cucul_draw_ellipse(cv, x, y, a, b, '#');
451}
452
453static void demo_triangles(void)
454{
455    int w = cucul_get_canvas_width(cv);
456    int h = cucul_get_canvas_height(cv);
457    int xa, ya, xb, yb, xc, yc;
458
459    if(bounds)
460    {
461        xa = cucul_rand(- w, 2 * w); ya = cucul_rand(- h, 2 * h);
462        xb = cucul_rand(- w, 2 * w); yb = cucul_rand(- h, 2 * h);
463        xc = cucul_rand(- w, 2 * w); yc = cucul_rand(- h, 2 * h);
464    }
465    else
466    {
467
468        xa = cucul_rand(0, w); ya = cucul_rand(0, h);
469        xb = cucul_rand(0, w); yb = cucul_rand(0, h);
470        xc = cucul_rand(0, w); yc = cucul_rand(0, h);
471    }
472
473    cucul_set_color_ansi(cv, cucul_rand(0, 16), cucul_rand(0, 16));
474    cucul_fill_triangle(cv, xa, ya, xb, yb, xc, yc, '#');
475
476    cucul_set_color_ansi(cv, cucul_rand(0, 16), CUCUL_BLACK);
477    if(outline == 2)
478        cucul_draw_thin_triangle(cv, xa, ya, xb, yb, xc, yc);
479    else if(outline == 1)
480        cucul_draw_triangle(cv, xa, ya, xb, yb, xc, yc, '#');
481}
482#if 0
483static void demo_sprites(void)
484{
485
486    cucul_draw_sprite(cv, cucul_rand(0, cucul_get_canvas_width(cv)),
487                      cucul_rand(0, cucul_get_canvas_height(cv)), sprite, 0);
488
489}
490#endif
491#if 0
492static void demo_render(void)
493{
494    cucul_dither_t *dither;
495    //short buffer[256*256];
496    //short *dest = buffer;
497    int buffer[256*256];
498    int *dest = buffer;
499    int x, y, z;
500    static int i = 0;
501
502    i = (i + 1) % 512;
503    z = i < 256 ? i : 511 - i;
504
505    for(x = 0; x < 256; x++)
506        for(y = 0; y < 256; y++)
507    {
508        //*dest++ = ((x >> 3) << 11) | ((y >> 2) << 5) | ((z >> 3));
509        *dest++ = (x << 16) | (y << 8) | (z);
510    }
511    cucul_set_dither_invert(dither, 1);
512    //dither = cucul_create_dither(16, 256, 256, 2 * 256, 0xf800, 0x07e0, 0x001f, 0x0000);
513    dither = cucul_create_dither(32, 256, 256, 4 * 256, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000);
514    cucul_dither_bitmap(cv, 0, 0, cucul_get_canvas_width(cv), cucul_get_canvas_height(cv),
515                     dither, buffer);
516    cucul_free_dither(dither);
517}
518#endif
519
520static void draw_circle(int *buffer, int xo, int yo, int r, int mask, int val);
521
522static void demo_render(void)
523{
524    cucul_dither_t *dither;
525    int buffer[256*256];
526    int *dest;
527    int x, y, z, xo, yo;
528    static int i = 0;
529
530    i++;
531
532    dest = buffer;
533    for(x = 0; x < 256; x++)
534        for(y = 0; y < 256; y++)
535    {
536        *dest++ = 0xff000000;
537    }
538
539    /* red */
540    xo = 128 + 48 * sin(0.02 * i);
541    yo = 128 + 48 * cos(0.03 * i);
542    for(z = 0; z < 240; z++)
543        draw_circle(buffer, xo, yo, z, 0x00ff0000, 200 << 16);
544
545    /* green */
546    xo = 128 + 48 * sin(2 + 0.06 * i);
547    yo = 128 + 48 * cos(2 + 0.05 * i);
548    for(z = 0; z < 240; z++)
549        draw_circle(buffer, xo, yo, z, 0x0000ff00, 200 << 8);
550
551    /* blue */
552    xo = 128 + 48 * sin(1 + 0.04 * i);
553    yo = 128 + 48 * cos(1 + 0.03 * i);
554    for(z = 0; z < 240; z++)
555        draw_circle(buffer, xo, yo, z, 0x000000ff, 200);
556
557    dither = cucul_create_dither(32, 256, 256, 4 * 256, 0x00ff0000, 0x0000ff00, 0x000000ff, 0xff000000);
558    cucul_set_dither_gamma(dither, -1.0);
559    cucul_dither_bitmap(cv, 0, 0, cucul_get_canvas_width(cv), cucul_get_canvas_height(cv), dither, (char *)buffer);
560    cucul_free_dither(dither);
561}
562
563static void draw_circle(int *buffer, int x, int y, int r, int mask, int val)
564{
565    int t, dx, dy;
566
567#define POINT(X,Y) \
568    buffer[(X) + 256 * (Y)] = 0xff000000 | (buffer[(X) + 256 * (Y)] & ~mask) | val;
569
570    for(t = 0, dx = 0, dy = r; dx <= dy; dx++)
571    {
572        POINT(x - dx / 3, y - dy / 3);
573        POINT(x + dx / 3, y - dy / 3);
574        POINT(x - dx / 3, y + dy / 3);
575        POINT(x + dx / 3, y + dy / 3);
576
577        POINT(x - dy / 3, y - dx / 3);
578        POINT(x + dy / 3, y - dx / 3);
579        POINT(x - dy / 3, y + dx / 3);
580        POINT(x + dy / 3, y + dx / 3);
581
582        t += t > 0 ? dx - dy-- : dx;
583    }
584}
585
Note: See TracBrowser for help on using the repository browser.