source: libcaca/trunk/src/cacaview.c @ 819

Last change on this file since 819 was 819, checked in by Sam Hocevar, 14 years ago
  • More function mass-renaming: caca_attach -> caca_create_display, etc.
  • Property svn:keywords set to Id
File size: 14.8 KB
Line 
1/*
2 *  cacaview      image viewer for libcaca
3 *  Copyright (c) 2003-2006 Sam Hocevar <sam@zoy.org>
4 *                All Rights Reserved
5 *
6 *  $Id: cacaview.c 819 2006-04-19 10:10:58Z sam $
7 *
8 *  This program is free software; you can redistribute it and/or
9 *  modify it under the terms of the Do What The Fuck You Want To
10 *  Public License, Version 2, as published by Sam Hocevar. See
11 *  http://sam.zoy.org/wtfpl/COPYING for more details.
12 */
13
14#include "config.h"
15
16#include <stdio.h>
17#include <string.h>
18#include <stdlib.h>
19
20#if defined(HAVE_SLEEP)
21#   include <windows.h>
22#endif
23
24#include "cucul.h"
25#include "caca.h"
26#include "common-image.h"
27
28/* Local macros */
29#define MODE_IMAGE 1
30#define MODE_FILES 2
31
32#define STATUS_DITHERING 1
33#define STATUS_ANTIALIASING 2
34#define STATUS_BACKGROUND 3
35
36#define ZOOM_FACTOR 1.08f
37#define ZOOM_MAX 50
38#define GAMMA_FACTOR 1.04f
39#define GAMMA_MAX 100
40#define GAMMA(g) (((g) < 0) ? 1.0 / gammatab[-(g)] : gammatab[(g)])
41#define PAD_STEP 0.15
42
43/* libcucul/libcaca contexts */
44cucul_canvas_t *cv; caca_display_t *dp;
45
46/* Local functions */
47static void print_status(void);
48static void print_help(int, int);
49static void set_zoom(int);
50static void set_gamma(int);
51static void draw_checkers(int, int, int, int);
52
53/* Local variables */
54struct image *im = NULL;
55
56float zoomtab[ZOOM_MAX + 1];
57float gammatab[GAMMA_MAX + 1];
58float xfactor = 1.0, yfactor = 1.0, dx = 0.5, dy = 0.5;
59int zoom = 0, g = 0, fullscreen = 0, mode, ww, wh;
60
61int main(int argc, char **argv)
62{
63    int quit = 0, update = 1, help = 0, status = 0;
64    int reload = 0;
65
66    char **list = NULL;
67    int current = 0, items = 0, opts = 1;
68    int i;
69
70    /* Initialise libcucul */
71    cv = cucul_create_canvas(0, 0);
72    if(!cv)
73    {
74        fprintf(stderr, "%s: unable to initialise libcucul\n", argv[0]);
75        return 1;
76    }
77
78    dp = caca_create_display(cv);
79    if(!dp)
80    {
81        fprintf(stderr, "%s: unable to initialise libcaca\n", argv[0]);
82        return 1;
83    }
84
85    /* Set the window title */
86    caca_set_display_title(dp, "cacaview");
87
88    ww = cucul_get_canvas_width(cv);
89    wh = cucul_get_canvas_height(cv);
90
91    /* Fill the zoom table */
92    zoomtab[0] = 1.0;
93    for(i = 0; i < ZOOM_MAX; i++)
94        zoomtab[i + 1] = zoomtab[i] * ZOOM_FACTOR;
95
96    /* Fill the gamma table */
97    gammatab[0] = 1.0;
98    for(i = 0; i < GAMMA_MAX; i++)
99        gammatab[i + 1] = gammatab[i] * GAMMA_FACTOR;
100
101    /* Load items into playlist */
102    for(i = 1; i < argc; i++)
103    {
104        /* Skip options except after `--' */
105        if(opts && argv[i][0] == '-')
106        {
107            if(argv[i][1] == '-' && argv[i][2] == '\0')
108                opts = 0;
109            continue;
110        }
111
112        /* Add argv[i] to the list */
113        if(items)
114            list = realloc(list, (items + 1) * sizeof(char *));
115        else
116            list = malloc(sizeof(char *));
117        list[items] = argv[i];
118        items++;
119
120        reload = 1;
121    }
122
123    /* Go ! */
124    while(!quit)
125    {
126        caca_event_t ev;
127        unsigned int const event_mask = CACA_EVENT_KEY_PRESS
128                                      | CACA_EVENT_RESIZE
129                                      | CACA_EVENT_MOUSE_PRESS;
130        unsigned int new_status = 0, new_help = 0;
131        int event;
132
133        if(update)
134            event = caca_get_event(dp, event_mask, &ev, 0);
135        else
136            event = caca_get_event(dp, event_mask, &ev, -1);
137
138        while(event)
139        {
140            if(ev.type & CACA_EVENT_MOUSE_PRESS)
141            {
142                if(ev.data.mouse.button == 1)
143                {
144                    if(items) current = (current + 1) % items;
145                    reload = 1;
146                }
147                else if(ev.data.mouse.button == 2)
148                {
149                    if(items) current = (items + current - 1) % items;
150                    reload = 1;
151                }
152            }
153            else if(ev.type & CACA_EVENT_KEY_PRESS) switch(ev.data.key.ch)
154            {
155            case 'n':
156            case 'N':
157                if(items) current = (current + 1) % items;
158                reload = 1;
159                break;
160            case 'p':
161            case 'P':
162                if(items) current = (items + current - 1) % items;
163                reload = 1;
164                break;
165            case 'f':
166            case 'F':
167                fullscreen = ~fullscreen;
168                update = 1;
169                set_zoom(zoom);
170                break;
171#if 0 /* FIXME */
172            case 'b':
173                i = 1 + cucul_get_feature(cv, CUCUL_BACKGROUND);
174                if(i > CUCUL_BACKGROUND_MAX) i = CUCUL_BACKGROUND_MIN;
175                cucul_set_feature(cv, i);
176                new_status = STATUS_BACKGROUND;
177                update = 1;
178                break;
179            case 'B':
180                i = -1 + cucul_get_feature(cv, CUCUL_BACKGROUND);
181                if(i < CUCUL_BACKGROUND_MIN) i = CUCUL_BACKGROUND_MAX;
182                cucul_set_feature(cv, i);
183                new_status = STATUS_BACKGROUND;
184                update = 1;
185                break;
186            case 'a':
187                i = 1 + cucul_get_feature(cv, CUCUL_ANTIALIASING);
188                if(i > CUCUL_ANTIALIASING_MAX) i = CUCUL_ANTIALIASING_MIN;
189                cucul_set_feature(cv, i);
190                new_status = STATUS_ANTIALIASING;
191                update = 1;
192                break;
193            case 'A':
194                i = -1 + cucul_get_feature(cv, CUCUL_ANTIALIASING);
195                if(i < CUCUL_ANTIALIASING_MIN) i = CUCUL_ANTIALIASING_MAX;
196                cucul_set_feature(cv, i);
197                new_status = STATUS_ANTIALIASING;
198                update = 1;
199                break;
200            case 'd':
201                i = 1 + cucul_get_feature(cv, CUCUL_DITHERING);
202                if(i > CUCUL_DITHERING_MAX) i = CUCUL_DITHERING_MIN;
203                cucul_set_feature(cv, i);
204                new_status = STATUS_DITHERING;
205                update = 1;
206                break;
207            case 'D':
208                i = -1 + cucul_get_feature(cv, CUCUL_DITHERING);
209                if(i < CUCUL_DITHERING_MIN) i = CUCUL_DITHERING_MAX;
210                cucul_set_feature(cv, i);
211                new_status = STATUS_DITHERING;
212                update = 1;
213                break;
214#endif
215            case '+':
216                update = 1;
217                set_zoom(zoom + 1);
218                break;
219            case '-':
220                update = 1;
221                set_zoom(zoom - 1);
222                break;
223            case 'G':
224                update = 1;
225                set_gamma(g + 1);
226                break;
227            case 'g':
228                update = 1;
229                set_gamma(g - 1);
230                break;
231            case 'x':
232            case 'X':
233                update = 1;
234                set_zoom(0);
235                set_gamma(0);
236                break;
237            case 'k':
238            case 'K':
239            case CACA_KEY_UP:
240                if(yfactor > 1.0) dy -= PAD_STEP / yfactor;
241                if(dy < 0.0) dy = 0.0;
242                update = 1;
243                break;
244            case 'j':
245            case 'J':
246            case CACA_KEY_DOWN:
247                if(yfactor > 1.0) dy += PAD_STEP / yfactor;
248                if(dy > 1.0) dy = 1.0;
249                update = 1;
250                break;
251            case 'h':
252            case 'H':
253            case CACA_KEY_LEFT:
254                if(xfactor > 1.0) dx -= PAD_STEP / xfactor;
255                if(dx < 0.0) dx = 0.0;
256                update = 1;
257                break;
258            case 'l':
259            case 'L':
260            case CACA_KEY_RIGHT:
261                if(xfactor > 1.0) dx += PAD_STEP / xfactor;
262                if(dx > 1.0) dx = 1.0;
263                update = 1;
264                break;
265            case '?':
266                new_help = !help;
267                update = 1;
268                break;
269            case 'q':
270            case 'Q':
271                quit = 1;
272                break;
273            }
274            else if(ev.type == CACA_EVENT_RESIZE)
275            {
276                caca_refresh_display(dp);
277                ww = ev.data.resize.w;
278                wh = ev.data.resize.h;
279                update = 1;
280                set_zoom(zoom);
281            }
282
283            if(status || new_status)
284                status = new_status;
285
286            if(help || new_help)
287                help = new_help;
288
289            event = caca_get_event(dp, CACA_EVENT_KEY_PRESS, &ev, 0);
290        }
291
292        if(items && reload)
293        {
294            char *buffer;
295            int len = strlen(" Loading `%s'... ") + strlen(list[current]);
296
297            if(len < ww + 1)
298                len = ww + 1;
299
300            buffer = malloc(len);
301
302            sprintf(buffer, " Loading `%s'... ", list[current]);
303            buffer[ww] = '\0';
304            cucul_set_color(cv, CUCUL_COLOR_WHITE, CUCUL_COLOR_BLUE);
305            cucul_putstr(cv, (ww - strlen(buffer)) / 2, wh / 2, buffer);
306            caca_refresh_display(dp);
307            ww = cucul_get_canvas_width(cv);
308            wh = cucul_get_canvas_height(cv);
309
310            if(im)
311                unload_image(im);
312            im = load_image(list[current]);
313            reload = 0;
314
315            /* Reset image-specific runtime variables */
316            dx = dy = 0.5;
317            update = 1;
318            set_zoom(0);
319            set_gamma(0);
320
321            free(buffer);
322        }
323
324        cucul_clear_canvas(cv, CUCUL_COLOR_BLACK);
325
326        if(!items)
327        {
328            cucul_set_color(cv, CUCUL_COLOR_WHITE, CUCUL_COLOR_BLUE);
329            cucul_printf(cv, ww / 2 - 5, wh / 2, " No image. ");
330        }
331        else if(!im)
332        {
333#if defined(HAVE_IMLIB2_H)
334#   define ERROR_STRING " Error loading `%s'. "
335#else
336#   define ERROR_STRING " Error loading `%s'. Only BMP is supported. "
337#endif
338            char *buffer;
339            int len = strlen(ERROR_STRING) + strlen(list[current]);
340
341            if(len < ww + 1)
342                len = ww + 1;
343
344            buffer = malloc(len);
345
346            sprintf(buffer, ERROR_STRING, list[current]);
347            buffer[ww] = '\0';
348            cucul_set_color(cv, CUCUL_COLOR_WHITE, CUCUL_COLOR_BLUE);
349            cucul_putstr(cv, (ww - strlen(buffer)) / 2, wh / 2, buffer);
350            free(buffer);
351        }
352        else
353        {
354            float xdelta, ydelta;
355            int y, height;
356
357            y = fullscreen ? 0 : 1;
358            height = fullscreen ? wh : wh - 3;
359
360            xdelta = (xfactor > 1.0) ? dx : 0.5;
361            ydelta = (yfactor > 1.0) ? dy : 0.5;
362
363            draw_checkers(ww * (1.0 - xfactor) / 2,
364                          y + height * (1.0 - yfactor) / 2,
365                          ww * xfactor, height * yfactor);
366
367            cucul_dither_bitmap(cv, ww * (1.0 - xfactor) * xdelta,
368                            y + height * (1.0 - yfactor) * ydelta,
369                            ww * xfactor + 1, height * yfactor + 1,
370                            im->dither, im->pixels);
371        }
372
373        if(!fullscreen)
374        {
375            print_status();
376
377#if 0 /* FIXME */
378            cucul_set_color(cv, CUCUL_COLOR_LIGHTGRAY, CUCUL_COLOR_BLACK);
379            switch(status)
380            {
381                case STATUS_ANTIALIASING:
382                    cucul_printf(cv, 0, wh - 1, "Antialiasing: %s",
383                  cucul_get_feature_name(cucul_get_feature(cv, CUCUL_ANTIALIASING)));
384                    break;
385                case STATUS_DITHERING:
386                    cucul_printf(cv, 0, wh - 1, "Dithering: %s",
387                  cucul_get_feature_name(cucul_get_feature(cv, CUCUL_DITHERING)));
388                    break;
389                case STATUS_BACKGROUND:
390                    cucul_printf(cv, 0, wh - 1, "Background: %s",
391                  cucul_get_feature_name(cucul_get_feature(cv, CUCUL_BACKGROUND)));
392                    break;
393            }
394#endif
395        }
396
397        if(help)
398        {
399            print_help(ww - 26, 2);
400        }
401
402        caca_refresh_display(dp);
403        update = 0;
404    }
405
406    /* Clean up */
407    if(im)
408        unload_image(im);
409    caca_free_display(dp);
410    cucul_free_canvas(cv);
411
412    return 0;
413}
414
415static void print_status(void)
416{
417    cucul_set_color(cv, CUCUL_COLOR_WHITE, CUCUL_COLOR_BLUE);
418    cucul_draw_line(cv, 0, 0, ww - 1, 0, " ");
419    cucul_draw_line(cv, 0, wh - 2, ww - 1, wh - 2, "-");
420    cucul_putstr(cv, 0, 0, "q:Quit  np:Next/Prev  +-x:Zoom  gG:Gamma  "
421                           "hjkl:Move  d:Dither  a:Antialias");
422    cucul_putstr(cv, ww - strlen("?:Help"), 0, "?:Help");
423    cucul_printf(cv, 3, wh - 2, "cacaview %s", VERSION);
424    cucul_printf(cv, ww - 30, wh - 2, "(gamma: %#.3g)", GAMMA(g));
425    cucul_printf(cv, ww - 14, wh - 2, "(zoom: %s%i)", zoom > 0 ? "+" : "", zoom);
426
427    cucul_set_color(cv, CUCUL_COLOR_LIGHTGRAY, CUCUL_COLOR_BLACK);
428    cucul_draw_line(cv, 0, wh - 1, ww - 1, wh - 1, " ");
429}
430
431static void print_help(int x, int y)
432{
433    static char const *help[] =
434    {
435        " +: zoom in              ",
436        " -: zoom out             ",
437        " g: decrease gamma       ",
438        " G: increase gamma       ",
439        " x: reset zoom and gamma ",
440        " ----------------------- ",
441        " hjkl: move view         ",
442        " arrows: move view       ",
443        " ----------------------- ",
444        " a: antialiasing method  ",
445        " d: dithering method     ",
446        " b: background mode      ",
447        " ----------------------- ",
448        " ?: help                 ",
449        " q: quit                 ",
450        NULL
451    };
452
453    int i;
454
455    cucul_set_color(cv, CUCUL_COLOR_WHITE, CUCUL_COLOR_BLUE);
456
457    for(i = 0; help[i]; i++)
458        cucul_putstr(cv, x, y + i, help[i]);
459}
460
461static void set_zoom(int new_zoom)
462{
463    int height;
464
465    if(!im)
466        return;
467
468    zoom = new_zoom;
469
470    if(zoom > ZOOM_MAX) zoom = ZOOM_MAX;
471    if(zoom < -ZOOM_MAX) zoom = -ZOOM_MAX;
472
473    ww = cucul_get_canvas_width(cv);
474    height = fullscreen ? wh : wh - 3;
475
476    xfactor = (zoom < 0) ? 1.0 / zoomtab[-zoom] : zoomtab[zoom];
477    yfactor = xfactor * ww / height * im->h / im->w
478               * cucul_get_canvas_height(cv) / cucul_get_canvas_width(cv)
479               * caca_get_display_width(dp) / caca_get_display_height(dp);
480
481    if(yfactor > xfactor)
482    {
483        float tmp = xfactor;
484        xfactor = tmp * tmp / yfactor;
485        yfactor = tmp;
486    }
487}
488
489static void set_gamma(int new_gamma)
490{
491    if(!im)
492        return;
493
494    g = new_gamma;
495
496    if(g > GAMMA_MAX) g = GAMMA_MAX;
497    if(g < -GAMMA_MAX) g = -GAMMA_MAX;
498
499    cucul_set_dither_gamma(im->dither,
500                           (g < 0) ? 1.0 / gammatab[-g] : gammatab[g]);
501}
502
503static void draw_checkers(int x, int y, int w, int h)
504{
505    int xn, yn;
506
507    if(x + w > (int)cucul_get_canvas_width(cv))
508        w = cucul_get_canvas_width(cv) - x;
509    if(y + h > (int)cucul_get_canvas_height(cv))
510        h = cucul_get_canvas_height(cv) - y;
511
512    for(yn = y > 0 ? y : 0; yn < y + h; yn++)
513        for(xn = x > 0 ? x : 0; xn < x + w; xn++)
514    {
515        if((((xn - x) / 5) ^ ((yn - y) / 3)) & 1)
516            cucul_set_color(cv, CUCUL_COLOR_LIGHTGRAY, CUCUL_COLOR_DARKGRAY);
517        else
518            cucul_set_color(cv, CUCUL_COLOR_DARKGRAY, CUCUL_COLOR_LIGHTGRAY);
519        cucul_putchar(cv, xn, yn, ' ');
520    }
521}
522
Note: See TracBrowser for help on using the repository browser.